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Dosplus shifts into overdrive for business. 



THE NEW DOSPLUS 4.0 HARD 
DRIVE SYSTEM MEANS BUSINESS 

MAKE A SWIFT SHIFT The DOSPLUS 4.0 Hard Drive 
System turns your TRS-80 into a powerhouse for business 
applications. Shifting up to a hard drive is just like moving 
up from tape to floppy. It makes good business sense. You 
get the power, the dependability, the speed and capacity 
of a hard drive to power the software you need to keep 
your business in top gear. 

MIND YOUR OWN BUSINESS The power potential 
of the TRS-80 driven by DOSPLUS 4.0 Hard Drive System 
lets you mind your own business just like the big 
companies do. You can control accounts receivable, 
accounts payable, inventory, payroll, invoicing and a 
whole lot more accurately and with confidence because 
DOSPLUS 4.0 is the only current operating system 
designed from conception for hard disk operation. 
DOSPLUS 4.0 T.C.B. (Takes Care of Business) What good is 
a DOS if you have to spend so much time getting it to 
perform properly that your business suffers? DOSPLUS 4.0 
takes care of the computer while you take care of your 
business, It's a smooth, swift and silent business partner 
with the potential to handle up to 40 megabytes of 
capacity in 4, 10 meg units." So, for only S2995 you can 
shift your TRS-80 into over drive with DOSPLUS. 

THE DOSPLUS 4.0 FEATURES 

• Single volume addressing/Double sided floppies seen 



as one drive — Any single file can expand to limit of 
hard drive (up to 10 meg.) 

• Hard disk — disk editing utilities • Incredible I/O speed 

• Runs any combination of densities or tracks 

• Also operates 8" drives with special hardware — 
comes with expanded users guide and complete DOS 
technical section on I/O calls and DCB organization 

• "PLUS" ALL OF THE SENSATIONAL NEW DOSPLUS 
3.4 FEATURES 

THE COMPLETE SYSTEM 

• Smooth, silent, swift • Error-free disk I/O 

• *Add on up to 4, 1 meg units for a total of 40 
megabytes! 

• Plugs on the 50 pin data bus. — no loss of floppy drives 

• Completely self-contained — just plug it in and go 
*10 meg units available Soon. 

NOTE: Specify 40 or 80 track when ordering DOS diskette. 
After initial bootup, user can create any DOS desired. 

TAKE YOUR ^QQC 
MICRO TO THE MAX. fc M M^ COMPLETE 

Lifetime warranty on original media. 

For more information Reader service card 384 
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^Mrr*' CALL TOLL FREE 

1-800-327-8724 ext. 200 

FOR VJSA/MASTERCMABOE/C.O.D. ORDERS 
TOLL FREE UNES WILL ACCEPT ORDERS ONLY! 

Fcx Applications and Technical information, 
can (305) 983-3390 or drop us a card. 

Dealers inquiries invited „_ . 

v* 384 
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So Far, So Good... 




Your Model III is a fine computer. 

So why settle for less than 

a fine disk storage system? 

A fast, reliable disk storage system — no other 
device is so vital to the satisfactory performance of 
your computer. At Percom we build quality, high- 
performance disk drive systems. From gold-plated 
connector contacts to goldcad metal chassis 
structures. From proven design through 1 00% 
reliability testing. Percom disk systems are the 
standard by which others are judged — the industry's 
"gold standard," in a sense. And since Percom is the 
largest independent manufacturer of disk systems 
for microcomputers, you get Percom quality 
at very competitive prices. Add-on drives for 
TRS-80* computers start as low as $399. 
Complete first-drive systems for the Model III 
start at only $599. Put a quality Percom mini-disk 
storage system in your Model III. And save. 



#1 For Your Model III 

Percom TFD drives for your TRS-80* Model III computer are available in 
40- and 80-track versions with single or dual heads. Single-head 40-track 
drives store 180 Kbytes; dual-head 40-track drives store 360 Kbytes. 
Eighty-track drives store slightly over twice these amounts. Of course 
these are formatted capacities. The Percom Model III controller handles 
up to four drives so it's possible to access almost three million bytes of 
on-line program and data files. You get Percom's OS-80/III Basic 
language DOS with each first-drive system, and your first drive may be 
either internal (add-in) or external (add-on). Percom TFD drives work with 
Model III TRSDOS and other Model III disk-operating systems. First-drive 
systems are pre-assembled. Installation is accomplished with simple tools. 

#1 For Your Model I, Too 

Percom TFD add-on drives for the TRS-80* Model I computer are 
available with the same features and the same quality control measures 
as TFD Model III drives. As for Model III drives, all Percom Model I drives 
are double-density rated. Install Percom's popular DOUBLER II in your 
Model I Expansion Interface and upgrade your Model I to provide the 
same storage capacity as the Model III. 

Watch for Announcement of Percom's Low-Cost 
Hard Disk System for the Model III! 

To order, or for the name of your authorized Percom retailer, 
call toll free 1-800-527-1222. 



Percom TFD disk drive systems have been 
certified to comply with FCC limits for Class 

B computing devices to protect against 
interfering with the operation of home radios 
and televisions. 





PERCOM DATA COMPANY. IIMC. 



1 1 220 Pagemill Road • Dallas. Texas 75243 
(214) 340-7081 



PRICES AND SPECIFICATIONS SUBJECT TO CHANGE WITHOUT NOTICE. 

'TRS-80 is a trademark of Tandy Radio Shack Corporation which has no relationship to 

Percom Data Company, Inc. 

PERCOM, DOUBLER II and OS-80/III are trademarks of Percom Data Company, Inc. 



Yes... I'd like to know more about 
the best for my TRS-80 computer. 
Send me free literature about 
quality Percom products. 

D MODEL I □ MODEL III 

Send lo 

PERCOM DATA COMPANY. INC. Depl. 8-M 

1 1220 Pagemill Road. Dallas. TX. 75243 
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The Editor's Choice 78 

by Jake Commander and Kalvos Gesamte 

Brace yourself to be wowed when two of our 
editors team up to create some graphics to 
dazzle the eye. 




Where There's a Will... 84 

by Shawn A. McClenahan 

When told a Color Computer, printer, and 
CompuServe don't mix, this author was deter- 
mined to do it. 



Color Reversi 90 

by Anthony M. Ledger 

Creating a Color Computer version of Othello was going to be a simple little 
project for Tony Ledger, but he soon discovered it wasn't as simple and little as 
he thought. 




Mirror Imagining 112 

by Bob Boothe 

As long as Bob has been plotting surfaces, 
he's wanted to create a decent sphere. At last 
he has and now you can, too. 



Is a Rose in Color Still a Rose? 142 

by Roy Green 

After seeing what Bob Boothe did in black and 
white, this author thought it would look twice 
as good in color. 



162 



Jake's Wampeters 

by John P. Mello Jr. 

There's been an ironic symmetry in the wacky life of 80 Micro's affable 
Englishman, an irony echoing a Vonnegut novel. 
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APPLICATION 

* 1 52 Priming the Data Base 

Easy find for sequential files. Stuart F. Ring 



176 
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Tax Relief for the Rich 

Manipulating the new estate tax law. 

Charles ft Perelman 

CC— Color Computer or Chamber of Commerce? 

Business can be colorful. Richard S. Adcock 
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•184 Grade Book 

Put it in your computer. B. E. Pugsley 
330 You Light Up My Life 

Teaching light theory. James W. Wood 



106 Subchaser! 

The enemy below on your Color Computer. 

John Steiner 
'154 Save All Humans 

Shooting flying saucers. Bob Boothe 
•252 Flip-A-Piece 

Play your computer in Othello. John Cominio 

GENERAL 

168 Radio Shack vs IBM 

Model II vs 5150. Roger Van Ghent 
234 Two-Way ANOVA 

Analysis of variance. Richard C. McGarvey 
298 Broadening the TRS-80 Horizon 

A change of heart. David D. Busch 
308 When the Postman Doesn't Even Ring Once 

Mail order disorder. Robert E. Averill 



GRAPHICS 

*138 3-D Graphics 

Geometric shapes in 4K. Eric Fogelin 
240 Color From a Model II? 

If you have a digital plotter. 

Paul T. Ward and Rolf A. Deininger 
258 Shady Characters 

Draw silhouettes on your 80. Richard Ramella 
270 Paper Graphics 

On a Line Printer IV. Jay F. Rosenberg 
280 Pictures at a Model II Exhibition 

Have fun on this 80, too. Jesse W. Baker 
•294 When Black Is White 

Drop-out graphics. Thomas W. Tache 

HARDWARE 

1 02 Color Computer Upgrade 

From 4K to 16K. Brian Murphy 
126 Smarten Up, Color Computer! 

Adding 16K of RAM. 

Richard Esposito and Bertram A. Thiel 
156 RAM Wars 

Piggyback RAM chips. Shawn A. McClenahan 
172 Building an M-80 

Or a single-board micro. 

James Hawkes and Grady Reese 
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Two heads are better than one. Matt Robins 
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Building joysticks. Howard Batie 
290 Video Snow Shovel 

Or a plow for your CRT. Brian Smith 

TECHNIQUE 

230 To Err is... Okay 

An error bypass. Richard S. Adcock 
304 Smooth Graphics 

Do the software impossible. Ronald Goodman 

TUTORIAL 

260 Z80 Bit Tables 

Byte off more than you can chew. Herb Robinson 
'314 One-Drive Bulletin Board 

All on a 5.25. John Hodgson 
326 Dizzy Decimals 

How to handle them. James ft Shore 



UTILITY 

120 Back to the Drawing Board 

Beat graphics boredom. Irwin Rappaport 
212 COLORMON 

Monitor your color programs. Douglas ft Cook 
*214 Base 2 Screenprinter 

For the tiger in your printer. William S. Kent 
*216 Secrets 

Program padlock. Stephen Mills 
284 Graphics for Profile 

A patch for a popular program. Charles ft Wood 
318 Reading, Writing and Assembly Language 

Disk I/O in Assembly. Patrick Morgan 
332 TRSDOS 2.0 Fix 

No exit is a good exit. Tom Mornini 
336 VariSpeed 

Stick shift in your 80. Bruce Evans 
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A GALAXY of features .makes the LN.W8b a 
remarkable computer. As you explore the 
LNW80, you will find the most complete, 
powerful, ready to run, feature-packed per- 
sonal and business computer ever made into 
one compact" solid unit. 




MODEL I COMPATIBILITY - The LNW80 is 

fully hardware and software compatible with 
the Model I. Select from a universe of hardware 
accessories and software - from VisiCalc* to 
space games, your LNW80 will launch you 
into a new world of computing. 

• 

FULLY LOAQED - A full payload includes an 
on-board single and double density disk 
controller for 5 'A" and 8" single or double 
sided disk drives. RS23-2C communications 
port, cassette and parallel printer interfaces 
are standard features and ready to go. All 
memory is fully installed - 48K RAM, 16K 
graphics RAM and 12K ROM complete with 
Microsoft BASIC. 



QUALITY CONSTRUCTION - Instrumenta- 
tion quality construction sets LNW80 com- 
puters apart from all the rest. Integrated into 
the sleek solid steel case of the LNW80 is a 
"professional 74-key expanded keyboard that 
includes a twelve key numeric keypad. 

HIG.H RESOLUTION GRAPHICS& COLOR- 

The stunning 480 X 1 92 resolution gives you 
total display control - in color or black and 
white. The choice of display formats is yours; 
80. 64, 40 and 32 columns by 24 or 1 6 lines in - 
any combination of eight colors. 

. PERFORMANCE - Lift-off with a 4MHz Z80A 
CPU for twice the performance. The LNW80 
outperforms all computers in its class. 




Our down to earth price won't send you into 



LNW Research Corp. 



,2(520 WAIA'I "I I uslin. (A. 92K80 



'(7 1 -I Mill HH.'.o 



I).">l4-5744 



Momioi and Dtsft driyes not included 
IM Personal Software fni 
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%r ^^ bv Wavne Green 



". . . the main problem is prying 

the kids away from the computers 

long enough to do other activities." 



Computer Camps 

One of the first computer camps, 
started in Connecticut, was a roaring 
success last summer. Another is getting 
going in Vermont this coming summer. 
This seems to be an idea whose time has 
come. 

As soon as our crew here at 80 heard 
about the camp idea there was a good 
deal of enthusiasm for starting our own 
camp this summer. After all, here we are in 
one of the top vacation areas of the coun- 
try, with rivers, lakes and mountains on 
every side. Here, too, is a wealth of com- 
puters. In the Instant Software lab alone I 
found 25 different microcomputer sys- 
tems which could be used for a camp. 

Ah yes, but where do you house, feed, 
and keep campers busy with recreational 
activities in addition to immersing them in 
computer study? I found our two local col- 
leges to be most interested in the idea. 
With two-week curriculums the colleges 
could handle up to 10,000 campers over a 
summer. That's a bit boggling, even for 
someone (like me) who thinks big 
thoughts. 

Our New Hampshire lakes and moun- 
tains can handle 10,000 extra vacationers 
with no problem. Vacationing is the num- 
ber one industry of New Hampshire. If 
you've ever been here you know why— the 
beauty is almost beyond description. In 
the summer temperatures remain relative- 
ly cool, particularly at night, so it's always 
pleasant. 

Both colleges are ideally situated. One 
is on a 500-acre campus and the other on 
800 acres. Both have lakes nearby, dormi- 
tory buildings and restaurants on 
campus. 

While the camp's main purpose will be 
intensive computer study, there will be 
plenty of regular camp activities to keep 
the teenagers busy. 

If you have any children 12-17 years 
old, two weeks at our New Hampshire 
camp could be the high point of their sum- 
mer vacation. They'll be surrounded with 
computers and their fellow campmates 
will be computer fanatics. The cost of the 
two weeks is not yet firm, but it should be 
around $400 per week. 



With microcomputers proliferating, if 
you have a son or daughter of camp age, 
this is a great opportunity to let them go 
on a two-week computer learning spree. 
While most camps organize games and 
sing-alongs to keep the kids out of trou- 
ble, at a computer camp the main problem 
is prying the kids away from the compu- 
ters long enough to do other activities. 

There will be courses in the fundamen- 
tals of computers, in Basic, Assembly and 
machine language, as well as in the use of 
utilities. Campers will be able to get a cer- 
tificate of competence In the use of 25 dif- 
ferent computers. This Is an opportunity 
for them to learn the differences between 
the many systems. 

Campers will, if they are interested, be 
able to work with the Instant Software 



"Anyone who can come 

up with a good 

diagnostics package 

. . . will find Instant 

Software exceptionally 

receptive." 



crew evaluating programs for possible 
publication. Programs written during the 
camp can be submitted to Instant Soft- 
ware for publication. Who knows, royal- 
ties could easily pay the cost of the camp 
many times over. 

Programs not quite up to par for Instant 
Software can be considered for publica- 
tion in any of our five monthly magazines, 
the monthly Encyclopedia, or any of the 36 
books scheduled to be published during 
1982, with the income going to the 
camper. Our editors and the Instant Soft- 
ware people know what is needed so they 
can offer guidance on what programs 
should be written. 

If you have a teenager interested in the 
Green Computer Camp, drop me a line 
and let me send you full information on it. 
The camp, not far from Peterborough, NH 



will be a blast. Note: no smoking, alcohol 
or drugs. This is a computer experience, 
not the usual teenage bash. 

There will be swimming, hiking, moun- 
tain climbing, and other physical activi- 
ties. There will also be benchmark tests of 
computers as word processors and evalu- 
ations of well known game programs. This 
is the experience of a lifetime! ■ 

A Half Million Here 

The gravy train — you can be on it if 
you come up with a program that 
every TRS-80 owner needs. Now what kind 
of a program would every owner want to 
buy? The idea is simple (as are so many of 
the really big money makers). 

What we all need is a set of diagnostic 
programs for the TRS-80. Every now and 
then something either goes wrong or may 
have gone wrong. When you aren't sure, a 
program to let you know that your system 
is okay would be worth its weight in gold. 
If the program could identify the more 
common problems that would be a plus. 

Anyone who can come up with a good 
diagnostics package for checking out our 
TRS-80s will find Instant Software excep- 
tionally receptive. The program should 
test the memory and report on any bad 
chips. It should check out the peripherals, 
as well as the CPU. Such a program 
should sell around a half million copies if 
it is well-written, and marketed by a pub- 
lisher with the resources to really get it 
spread around. 

If you have something along this line or 
can write such a program, you can do 
worse than contact Instant Software. ■ 



Tandy Boosts Industry 

While many people seem to be critical 
of the Radio Shack folk for some of 
their service and sales policies, if you put 
these into a long-range perspective, they 
are certainly pro-microcomputing. Tandy 
marketing policies, which at first glance 
often appear to be self-serving and protec- 
tive, are in reality most beneficial to the 
entire industry. 



—Reader Service lor lacing page s30 
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Model II 64K$ 3298 




Line Printer VII. 
OKIDATA 

EPSON MX-70 



S329 

Microline 80 S394 
Microline 82 $499 

S369 



EPSON MX-80 



$4 79 



» SAVE 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 



$ 



VERBATIM DATALIFETM DISKETTES 
5'/4-inch (box of 10) $25.95 

8-inch Double-Density, $43.95 

* Payment Money Order. Cashier s 
Check. Certified Check Personal 
Checks require 3 weeks lo clear VISA. 
MASTERCHARGE — Add 3% 

WRITE OR CALL FOR OUR COMPLETE PRICE LIST. 

CALL (602) 458-2477 

mmm All prices are mail order onlv «■■ 

RAND'S - 

2185 E. FRY BLVD. 
SIERRA VISTA, AZ 85635 

TRS-80 is a trademark of Tandy Corporation. 



For instance, rather than force TRS-80 
owners to buy anything more than the 
basic unit at Radio Shack stores, Tandy 
has arranged it so over 99 percent of the 
software available for their system must 
be purchased from independent computer 
stores or mail order firms. What could be 
fairer than that? And, by keeping the 
choice of accessories and peripherals in 
Radio Shack stores to a minimum, again 
they are working to the advantage of non- 
Radio Shack stores. 

Take the matter of books— with only a 
tiny fraction of the published material 
available in their stores, they are forcing 
their customers to seek the information 
and help they need from neighboring com- 
puter stores. You want a magazine? None 
whatever are available at Radio Shack, so 
for up-to-date computer information and 
programs the Tandy owner must go to an 
independent computer store. Even this 
publication, which takes up Radio Shack 
documentation where their own docu- 



"While many people 
are critical of the Radio 
Shack folk for their 
service and sales 
policies, put into long- 
range perspective, they 
are certainly pro- 
microcomputing. " 



mentation leaves off, is only available out- 
side of Radio Shack stores. 

By keeping the Radio Shack produced 
programs to a minimum, owners have no 
choice but to look around for other 
sources. They quickly find local computer 
stores which provide the program and 
peripheral support not available from 
Radio Shack. They also discover Apple 
computers and other systems, which may 
to some extent explain the incredible in- 
crease in Apple sales in proportion to TRS 
computer sales in recent months (and this 
despite the Apple III debacle). 

The Instant Software ads often list the 
independent computer stores which carry 
programs, magazines, books, and periph- 
erals. These stores are often a valuable 
source of information as well, since they 
are in the computer business 100 percent, 
not just carrying a small shelf of com- 
puters in amongst hi-fi, auto sound, CB 
and so forth like most Radio Shacks. 
With around 6,000 stores, Radio Shack 



does have a serious problem finding 
technically expert people to sell and ser- 
vice computers. Computers are still a 
minor item for most stores, so it is often 
difficult to get the help most businessmen 
need to make relatively expensive buying 
decisions. Few Radio Shack store people 
ever see this magazine and other support- 
ing publications, or the wealth of books 
on the TRS computers, so they are under- 
standably short on information about 
their product. 

Is this all a short-sighted not-invented- 
here policy? Or is it a long range strategy 
to keep Radio Shack from getting into 
some of the problems IBM has had in the 
past? By forcing TRS-80 owners to go out- 
side Radio Shack for more and more of 
their purchases, Radio Shack certainly is 
making it difficult for any competitor or 
the government to claim they are monopo- 
listic. With only about one percent of the 
software support for the TRS-80 available 
from Radio Shack, how can any firm sue 
for restraint of trade? 

By the time you add in the computer 
sales via mail order from Radio Shack 
stores which are not factory owned, the 
outside sales of computers, programs, 
peripherals, magazines and books, you 
have a substantial part of the total poten- 
tial Tandy income going via this outside 
route. 

Will this Radio Shack policy pay off in 
the long run? Independent computer store 
owners are hoping so, for this provides 
them with a way of cashing in on the 
Radio Shack onslaught — a way which 
may eventually allow them to make much 
more than Radio Shack from every com- 
puter sale as customers discover the 
wealth of programs and information 
available outside of Radio Shack. 

Another big plus for Radio Shack is the 
change in attitude which their largess has 
brought about in many independent com- 
puter stores. When Radio Shack was 
perceived to be trying to keep all the in- 
come to themselves, the stores reacted 
with anger and harsh words. The TRS-80 
was called the Trash-80 and sneered 
upon. Today you don't hear that much. To- 
day you hear the dinging of the cash 
register as TRS-80 programs are sold by 
the bag full. You see satisfied smiles as 
customers walk out with magazines and 
books on the TRS-80. You see printers, 
memory, modems and so forth being fit- 
ted to systems by happy customers. In- 
deed, the wealth of plug-in accessories for 
the computers is beginning to rival those 
for the S-100 bus, with virtually none 
available through Radio Shack stores. 
Trash-80? No, it's the Cash-80. . .and huz- 
zahs for the enlightened Tandy policies. ■ 
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META TECHNOLOGIES 

26111 Brush Avenue, Euclid Ohio 44132 

CALL TOLL FREE 1 -800-321 -3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 
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THINGS TO 




BY MARK SAWUSCH 

333 pages $10.95 

333 pages, written in simple terms, of 
"what-to-do" and "how- to-do- it". Suitable 
not only for microcomputers, but for pro- 
grammable calculators as well. Includes 
program listings, formulas, a glossary of 
computer terms and more! Definitely a 
MUST BUY! 



"TRS-80™ DISK AND 
OTHER MYSTERIES" 

by Harvard C. Pennington 

132 pages written in PLAIN ENGLISH packed 
with HOW TO information with details, examples 
and in-depth explanations. Recover lost files and 
directories, remove file protection, make BASIC 
programs unlistable. How to use SUPERZAP, 
recover from DOS errors and MORE! 

TRS-80TM DISK $19.95 



"OTHER MYSTERIES" 
VOLUME II 

by James Farvour 

Call now and place your order tor tnis new book, 

-Microsoft™ basic decoded & other 

MYSTERIES for the TRS-80TM", from IJG. Inc. 
A primer for cassette and disk BASIC on the 
TRS-80TM, the information provided applies to 
similar MICROSOFT^ BASIC interpreters. 

microsoft™ basic decoded . $24.95 

"OTHER MYSTERIES" 
VOLUME III 

by Dennis Kitsz 

THE CUSTOM TRS-80™ $28.95 

CALL FOR AVAILABILITY 

"OTHER MYSTERIES" 
VOLUME IV 

"BASIC FASTER 
AND BETTER" 

If you program in BASIC, you want this book! 
Time-tested and proven, the techniques and 
routines can be used in thousands of ways to 
make your programs smaller, faster, and look 
truly professional. 
BASIC FASTER & BETTER $24.95 



EPSON 



MX-80, MX-80FT, MX-100 

PRINTERS 

NEW LOWER PRICES! 

EXTRA-LONG 
10 ft. RIBBON 

CABLE 

$24 95 

CONNECTS EPSON PRINTER 
& TRS-80 MICROCOMPUTER 

40-TRACK, SINGLE/DOUBLE- 
DENSITY, FAST ACCESS, 
5 1 /4 -inch TAN DON 

DISK 
DRIVES 

$289 complete 

FOR MODEL I and MODEL III 

Includes Case, Power Supply 
and External Drive Connector 

DISK DRIVE 

EXTENDER 
CABLE 

$9 95 

for VISTA, MICROPOLIS, 

MTI, PERTEC, SHUGART, 

PERCOM& OTHERS 






Single Sided. Soft-Sectored 5 '/i -inch. 

PARAGON MAGNETICS™ 

PLAIN JANETM 



DISKETTES 

$19 



95 

box of 10 



TRS-80 is a trademark ol the 

Radio Shack Division ol Tandy 

Corporation. DATALIFE is a 

trademark ol VERBATIM. PLAIN 

JANE, PARAGON MAGNETICS. 

are trademarks ol MTC. 

1981 by Meta Technologies 

Corporation 
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SHIPPED WITHIN 

ONE BUSINESS DAY 

Products damaged in 
transit will be exchanged. 
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These are factory fresh, absolutely first 
quality (no seconds!) mini-floppies. They are 
complete with envelopes, labels and write- 
protect tabs in a shrink-wrapped box. 

Box of 10 Diskettes $19.95 

PARAGON 

magnetics™ 

Introducing MTC's premium generic 
diskette. Single-Sided, Soft-Sectored, 
DOUBLE-DENSITY. SVi-inch diskettes with 
reinforcing HUB-RINGS. Individually 100% 
ERROR-FREE certified. Invest in GOLD! 
PARAGON MAGNETICS GOLD $23.95 



VERBATIM'S PREMIUM DISKETTES 

DATALIFE" 

Seven data-shielding improvements mean 

freater durability and longer data life, 
hese individually, 100% error-free cer- 
tified diskettes feature thicker oxide 
coating, longer-lasting lubricant, improved 
liner, superior polishing and more! Meets 
or exceeds IBM. Shugart, ANSI. ECMA 
and ISO standards. 
VERBATIM DATALIFETM DISKETTES 
5'/4-inch(boxof 10) 

MD525-01 $26.95 

8-inch FLOPPIES 

Double-Density. FD34-8000 . $43.95 

'RINGS'^ 
THINGS 

HUB RING KIT for 5V4" disks $10.95 

HUB RING KIT for 8" disks $12.95 

REFILLS (50 Hub Rings) $ 5.95 

CLEANING KIT for 5»/«" drives $24.95 

5'/4-inch diskette case $3.50 

8-inch diskette case $3.95 

5% -inch File Box for 

50 diskettes $24.95 

8-inch File Box for 

50 diskettes $29.95 



WE ACCEPT 

• VISA 

• MASTER CHARGE 

• CHECKS 

• MONEY ORDERS 
COD. 



•Add $3.00 (of shipping 
& handling 
• $3.00 EXTRA lor C.O.D. 

•Ohio residents add 6.5% 
sales tax. 
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Proof Notes 

the editors look at the issues 



Judging from the response we've had 
from our readers in the past, computer 
graphics holds a fascination all its own. It's 
reckoned that 95 percent of human sensory 
input to the brain comes in through the 
eyes, providing a plausible explanation for 
why so many people derive so much plea- 
sure from graphics displayed on a video 
monitor. Not that the video monitor has 
much to do with it; after all, television sta- 
tions use the same output device, but in 
nearly all cases (and on nearly all channels), 
the computer can be more useful and enter- 
taining. 

Computer graphics are being used to cre- 
ate some of the most stunning visual ef- 
fects you're ever likely to see. These visual 
effects range from cross-sections of ma- 
chinery such as the space shuttle, to a sim- 
ulated journey through the Star Gate in the 
movie "2001, A Space Odyssey." The land- 
ing sequence in which the spaceship 
Nostromo lands on the surface of an un- 
known planet during the movie "The Alien" 
is another fine example of computer-gener- 
ated graphics. 

The TRS-80 Color Computer users 
amongst us are lucky— we get a hands-on 
feel for these exciting new graphics techni- 
ques to a greater degree than other TRS-80 
users. Some will argue that computer-aided 
graphics is not so new, but compared with 
the art of hand-drawn graphics, it has only 
just arrived. We have eight colors and a 
matrix of up to 256 by 192 pixels in varying 
combinations at our disposal. That's a total 
of 49,152 video dots, enough for anyone to 
get their feet wet in the world of computer 
graphics, either to design a new piece of 
machinery or create a work of art. 

In this issue we'll be presenting plenty of 
graphics-related topics. Be sure to look at 
"The Editor's Choice," an offering of color 
graphics from our editors which are sure to 
entertain you for many hours, and perhaps 
inspire you to new heights of creativity. 
"Conversion Diversion" by Roy Oreen puts 
Bob Boothe's wonderful Mod I graphics on 
the Color Computer. And for those of you 
who haven't yet taken the plunge into color, 



we have several black-and-white graphics 
offerings, most notably "Mirror Imagining" 
by the master himself, Bob Boothe. Anyone 
with any inclination towards graphics and 
programming should find plenty of active 
inspiration. 

One of the more interesting aspects of 
any graphic art is the technique an artist 
uses to create an effect by overcoming the 
limitations of the medium he's using. For in- 
stance, there's no way a painter can make 
light shine forth from a canvas (short of us- 
ing luminous paint), but glorious painting 
techniques have evolved from surmounting 
this problem. Similarly, computer graphics 
has inherent limitations, such as a two- 
dimensional static display comprised of a 
grid of dots or lines. Yet, we see successful 
attempts to represent three-dimensional 
images which move in time and space. 

Some of these attempts are so astoun- 
ding that even the most mundane graphics 
subjects take on a strange new aesthetic 
appeal. A three-dimensional model of a 
crystalline molecular structure becomes a 
fascinating visual experience as it revolves 
before your eyes. An unbuilt city, still on the 
drawing board or yet in the mind of its de- 
signer, appears as if truly on the monitor in 
front of you. Buildings and skyscrapers 
dance before your eyes, as nothing less 
than a computer program analyzes and dis- 
plays the scene from your imaginary point 
of view. These are not just flights of fan- 
cy—they exist now in the field of computer- 
aided design as implemented on some mini- 
computers. The challenge for many will be 
to achieve similar results with micro- 
computers. 

Graphics are not only being used in the 
kind of modeling situations I've just de- 
scribed, but in purely artistic situations 
where it's a case of art for art's sake. We 
have a few examples in this issue, but don't 
just read the articles. Try the examples and 
see for yourself how your computer can be 
a futuristic art gallery. This is where the 
field offers exciting possibilities. New tech- 
niques are being uncovered in the synthesis 
of video art; for instance, using a combina- 

Coniinued on page 387 



The left bracket, |. replaces the up arrow used by Radio Shack to indicate exponentiation on our printouts. When 
entering programs published in 80 Microcomputing, you should make this change. 

80 formats its program listings to run 64-characters wide, the way they look on your video screen This accounts for 
the occasional wrap-around you will notice in our program listings. Don't let it throw you. particularly when entering 
assembly listings. 



Article submissions Irom our readers are welcomed and encouraged. Inquiries should be addressed to: Submis- 
sions Editor. 80 Pine Street. Peterborough. NH 03458. Include a SASE for a copy of our writers' guidelines. Pay- 
ment for accepted articles is made prior to publication, at a rate of approximately S50 per printed page; all rights 
are purchased. Authors of reviews should contact the Review Editor. 80 Pine Street. Peterborough. NH 03458. 
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MODELS I & III . . .$69.95 MODEL II . . .$99.95 

Introducing the latest addition to MTC"s family of data management systems, AIDS-MI. NO 
PROGRAMMING, easy to use. COMPLETE PACKAGE including demonstration application, 
documentation and MAPS-MI (see below). 

• Up to 20 USER-DEFINED FIELDS of either numeric- or character-type. 

• CHARACTER-type fields may be any length (total: up to 254 characters). 

• NUMERIC-type fields feature automatic formatting, rounding, decimal alignment and 
validation. 

• Full feature EDITING when adding or changing records: 

■ ENTER FIELD (can't type-in more characters than specified). 

■ BACKSPACE (delete last character typed). • RIGHT-JUSTIFY FIELD contents. 

• DELETE FIELD contents. - SKIP FIELD (to next or previous field). 

• RESTORE FIELD contents. - SKIP RECORD (to next or previous record). 

• SORTING of records is MACHINE CODE assisted. 

- 200 RECORDS (40 characters) in about 5 SECONDS. 

- ANY COMBINATION of fields (including numerics) with each field in ascending or 

descending order. 

• SELECTION of records for Loading, Updating, Deleting, Printing and Saving is 
MACHINE CODE assisted. 

- Specify up to 4 CRITERIA, each using one of 6 RELATIONAL COMPARISONS. 

- LOAD or SAVE selected records using MULTIPLE FILES. 

- Example: Select records representing those people who live in the state of Col- 

orado, but not in the city of Denver, whose last names begin with "F" 
and whose incomes exceed $9000.00. 

- Example: Select records representing those sales made to XYZ COMPANY that 

exceed $25.00, between the dates 03/15 and 04/10. 

MAPS-MI (MTC AIDS PRINT SUBSYSTEM), included at no charge, has the following features: 

• Full AIDS-III SELECTION capabilities. 

• Prints user-specified fields DOWN THE PAGE. 

• Prints user-specified fields in titled, columnar REPORT FORMAT, automatically 
generating column headings, paging and (optionally) indentation. 

• Can create a single report from MULTIPLE FILES. 

• Prints user-defined formats for CUSTOM LABELS, custom forms, etc. 



TAIDS OWNERS! 
WE HAVE WHAT 
YOU'VE BEEN 
WAITING IV. . . 

MTC CALCS-IV™, that is. 

• More Computations 

• Save Report Formats on Disk 

• Faster, and more! 

MTC CALCS-IVTM $39.95 

For Models I & III $39.95 

ForModelll $59.95 

MTC AIDS MERGE-III™ 

This subsystem will combine up to 14 AIDS- 
created data files into a single, large file. An op- 
tional purge capability removes duplicate entries 
white performing the merge operation (can even 
be used to eliminate duplicates in a single file). 
Machine-code assisted for high-speed perfor- 
mance, MERGE-IIITM properly handles files sorted 
by any combination of fields, including numerics, 
with each field in ascending or descending order. 

MTC AIDS MERGE-III™ $19.95 

For Models I & III $19.95 

For Model II $29.95 



BELOW ARE TESTIMONIALS from owners of AIDS systems. These are absolutely authentic 
statements and are typical of the comments we receive. 

"This program will do more for my business than all the other programs I 
have, combined." 

David Wareham, Vice President (EDP). National Hospital and Health Care Services Inc. 

"We have 32 different Data Base Management packages for the TRS-80. AIDS-III is easily 

the best. It also makes it easier for us to step up to our Model II since the package is 

available for both computers." . . _... , . n , . __ ... _ 

Jack Bihnski, President, 80 Microcomputer Services 

"Your AIDS program is far and away the finest information management system that I've 
ever seen. I am currently using it to maintain a clear picture of the demographic data on all 
the kids in our residential treatment program and it is working for me superbly." 

Frank Boehm. Director, Front Door Residential Treatment Program 



MTCCALCSIII™ 

Models I & III $24.95 

Modelll $39.95 

MTC's most popular AIDS subsystem. Use 
for report generation involving basic 
manipulation of numeric data. Features are: 

• Columnar Headings 

• Optional Indentation 

• User-specified Columnar Totals 

• Columnar values computed using con- 
stants and/or column values 

• Balance forward calculations 

• Use for accounting, inventory, financial 
and other numeric- based systems. 



EPSON PRINTERS 

DISK DRIVES 

DISKETTES 

BOOKS 
and morel! 



THE COMPLETE 

MTC AIDS-III 

PACKAGE 



TM 









Includes MTC AIDS-HP' 
CALCS-lll™andMERGE-l 



|TM 



A comprehensive system 
at a competitive price! 

MODELI&III $99.95 

MODELII $149.95 

Add $25 for CALCS-IV™ 

AIDS/P™ 

IS COMING! 



TRS-80 is a trademark of the 

Radio Shack Division of Tandy 

Corporation. DATALIFE is a 

trademark ol VERBATIM. PLAIN 

JANE. AIDS-I. AIDS-III. CALCS-III. 

CALCSIV. MERGE-III are 

trademarks of MTC. 

- 1981 by Meta Technologies 

Corporation 
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WE ACCEPT 

VISA 

MASTER CHARGE 

CHECKS 

MONEY ORDERS 

COD. 



1 



•Add $3.00 for shipping 
& handling 
• $3.00 EXTRA for C.O.D. 

•Ohio residents add 6.5% 
sales tax. 



SO INPUT 



"We all know the golden rule 

with computers Is, 'make backups, 

backups and more backups.' " 



Winged Samurai 



Thanks for the favorable review of our 
game Winged Samurai (80 Reviews, 
August 1981). The review leaves the im- 
pression, however, that Winged Samurai 
is only for the Model I. Since July all of our 
Squadron Leader series games have been 
compatible with both TRS-80 Models I and 
III, as well as eight other computer 
models. 

The response to the review has been 
very gratifying. It is clear that 80 
Microcomputing has a large influence in 
the marketplace. We will certainly keep 
you informed of any new releases. 

David A. Wesely 

Discovery Games 

Saint Paul, MN 



Accel2 vs. Microsoft 
Compiler 

In his review on page 38 of the 
November 1981 issue of 80 Microcom- 
puting, Mr. Douglass mentioned a prob- 
lem of the execution of Read statements 
when using Accel2-compiled programs. 
The solution is to use the entire Accel2 
compiler as the run time package. 

Also, it is necessary to compile and run 
a dummy Basic program before trying to 
run the compiled program (I use the Basic 
program to set the USR addresses for 
this). This information was in the 
documentation I received. with the com- 
piler. 

I would like to make four additional 
comments on the Accel2 compiler as 
compared to the Microsoft compiler: 

Accel2 is much more difficult to use. 
For a non-trivial program (current version 
of my Word Processor, 80 Microcom- 
puting, May 1980), Microsoft required a 
few minor changes, adding a half-dozen 
lines to the program. Accel2 required com- 
plete rewriting and restructuring, adding 
over a hundred lines to the program. In ad- 
dition Accel2 will hang or give mean- 
ingless error messages {for example, syn- 
tax errors in non-existent line) if changes 



from normal Basic are not made. 

Accel2 expands a program more than 
does Microsoft. My Word Processor held 
420 text lines as a Basic program on a 48K 
disk system. This was reduced to 155 lines 
with Microsoft, and to 130 lines with Ac- 
cel2. 

Accel2 does not speed up a program as 
much. It compiles about 30 Basic 
statements, leaving about 50 plus all disk 
statements uncompiled. It does not speed 
up the time-consuming string garbage 
collection pauses, as does the Microsoft 
compiler. 

Accel2 compiles slowly. My Word Pro- 
cessor required about 30 minutes, com- 
pared to about 10 minutes with Microsoft. 
On the plus side, all compiling is done in 
memory, without the disk snuffling need- 
ed by Microsoft. 

Accel2 does have two advantages: Its 
compiled programs will run under the im- 
proved disk operating systems (such as 
NEWDOS80) if they are compiled under 
that system, while Microsoft requires 
TRSDOS for proper disk file handling. 
Also, Accel2 does not have the Microsoft 
royalty problem. 

In my opinion, for compiled programs 
for your own use, Microsoft is generally 
superior. 

Delmer D. Hinrichs 
Washougal, WA 



Snapp's XBasic 



I read with great interest the review of 
Snapp's XBasic by Mr. Rick Lederman. Mr. 
Lederman missed one vital aspect of 
XBasic (as well as other Snapp Programs) 
that I believe must be pointed out to any 
prospective buyer. The original disk (call- 
ed the distribution disk cannot be backed 
up\ If you should destroy this disk, you 
need to go to Snapp for a new distribution 
disk to implement Snapp on any new 
disks. 

Currently, I believe, the cost for a new 
distribution disk is $10. But, after spend- 
ing $200, why should you spend an addi- 
tional $10, or even 1« for that matter? What 
happens to the buyer who destroys the 
original disk after (if) Snapp goes out of 



business? If Snapp stays in business, how 
much will a replacement cost next year— 
$15? $20 the year after? What if Snapp de- 
cides not to support your "old" program? 
We all know the golden rule with com- 
puters is, "Make backups, backups and 
more backups." Well folks, with Snapp, 
you cannot make any! While Snapp has 
some very good programs, I will not buy 
any I cannot backup. 

Barry L. Patterson 
Farmington, NY 



Snapp Responds 

/ fully agree that a software purchaser 
should obtain unrestricted use of the 
product. 

There are two distinct types of Snapp 
Basic disks: distribution masters and 
working copies. Distribution masters can 
be used only to create working copies, 
and working copies can only be created 
from a distribution master. Given that a 
distribution master may be used to create 
an unlimited number of working copies, 
we feel that our customers do obtain un- 
restricted use of our products. 

If a customer has a serious concern 
about our ability or willingness to provide 
him with a replacement distribution mas- 
ter, we normally suggest that he make a 
large quantity of working copies imme- 
diately upon receipt of the distribution 
master. 

Robert F. Snapp, 

President 

Snapp Inc. 

Cincinnati, OH 



Centronics 739 



Michael Vose's review of the Centron- 
ics 739 printer {80 Microcomputing, De- 
cember 1981) missed some items which 
make this printer incompatible with its 
earlier version, the Centronics 737 (Radio 
Shack LPIV). The differences are minor 

Continued on page 16 
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MTC AIDS CALCULATION SUBSYSTEM- 

MODEL I . . .$24.95 MODEL II . . .$39.95 



TM 



User-specified ^c USTO mer activity report page 1— 
page title 

p. -CUSTOMER DATE QTY SALE AMT SALES TAX GROSS SALES $/UNIT 

Headings oToo- 

ACME 3/10 100 675.00 37.13 712.13 7.12 

200 1325.00 72.88 2110.00 6.99 

3/20 400 2475.00 136.13 4721.13 6.53 

1/10 600 3625.00 199.38 8545.50 6.37 

4/20 400 2600.00 143.00 11288.50 6.86 

Optional ^ 1700 10700.00 588.50 

indentation META 3/10 200 1345.00 73.98- — -~ 12707.48 7.09-' 

7 3/15 100 674.00 37.07 13418.55 7.11 

/ 200 1295.00 71.23 14784.77 6.83 

/ 4/05 400 2435.00 133.93 17353.70 6.42 

/ 4/10 150 935.00 51.43 18340.12 6.58 

/ 4/20 600 3585.00 197.18 22122.30 6.30 

/ _-— -—■""■" ~* 650 10269.00 564.80 

Columnar subtotals/^—- — — ~ 

omnmratmti whPn^U? C0 3 / 25 200 1325.00 72.88 23520.17 6.99 

£ cTrl««oo ^^ 4 / 10 10 ° 685.00 37.68 24242.85 7.23 

mere is a cnange ^\^^ 300 1940.00 106.70 26289. 55v. 6.82 

in a user-specified ^\ < ™ 

column. ^^»6oo 3950.00 217.25 

XYZCO 3/10 150 995.00 54.73 27339.27 7.00 

200 1345.00 73.98 28758.25 7.09 

3/20 50 355.00 19.53 29132.77 7.49 

4/10 300 1975.00 108.63 31216.40 6.95 

4/15 400 2520.00 138.60 33874.00 6.65 

User-specified 4/20 700 4175.00 229.63 38279.62 6.29 
Columnar Totals 

1300 11365.00 625.08 

•5750 36284.00 1995.62 



Automatic Page 
Numbering 



. User-specified 
initial balance forward 



Columnar values 
computed using 
constants and/or 
column values 



Balance forward 
calculations (Ex: Gross 
sales equals previous 
gross sales + sale 
amount + sales tax) 



,TM 



,TM 



Compare AIDS-HI /CALCS-III with any other data management package under $100! 



,TM 



Others make claims, CALCS-III m delivers with user-specified: 
Fields in any order, with optional indentation • Columnar subtotals and totals 

Computations using field values and constants • Full AIDS-HI selection of records to be printed 

Use for accounting, inventory, financial and other numeric-based information packages. 



CALCS-III™ REQUIRES THE PURCHASE OF AIDS-I 



,TM 



TRS-80 is a trademark ol the 

Radio Shack Division ot Tandy 

Corporation. DATALIFE is a 

trademark of VERBATIM. PLAIN 

JANE. AIDS-I. AIDS-MI. CALCS-III. 

CALCS-IV. MERGEIII are 

trademarks of MTC. 

© 1981 by Meta Technologies 

Corporation 



¥ 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 

Products damaged in 
transit will be exchanged. 



PRICES IN EFFECT 

March 1,1982 THRU 

March 31, 1982 

Prices, Specifications, 
and Offerings subject to 
change without notice. 

8203 



¥ 



WE ACCEPT 

• VISA 

• MASTER CHARGE 

• CHECKS 

• MONEY ORDERS 

• COD. 



•Add $3.00 for shipping 

& handling 
•$3.00 EXTRA for C.O.D. 
•Ohio residents add 6'A % 
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SO INPUT 
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Circuit Help 



I do not understand part of the cir- 
cuit drawing accompanying Ian Sin- 
clair's article "Hard and Soft Print- 
ware" (80 Microcomputing, October 
1981). His use of the two 680 
microfarad, 25V capacitors confuses 
me. Does the 741 op amp increase 
voltage or do I need to include a 
transformer in this circuit? I am not an 
electronics technician, but I can follow 
directions. Why a 25V 1 Amp rectifier in 
a circuit power source of .86V? 

Roger W. Wincek 



Ian Sinclair Responds 

The smoothing capacitors can be 
any value around 680 pF, because the 
value is not critical. They should be 
rated at 25V, and connected the cor- 
rect way round, however. The reason 
for using a 25V rectifier Is that this cir- 
cuit obtains Its operating voltage from 
the TRS-80 power lines, which the rec- 
tifier rectifies. Mr. Wincek is confusing 
signal voltage Input with supply volt- 
age input. 

Incidentally, the software is de- 
signed for printers which can be 
switched to provide line-feed for a car- 
riage return signal. I believe that a few 
printers of older design do not have 
this feature. I cannot, unfortunately 
give a fix for that problem, since I no 
longer have a TRS-80. 

Ian Sinclair 

89 Alexandra Road 

Sible Hedingham 

Halstead, Essex 

England C09 3NP 



Sporting TRS-80 

I have been helping with a sporting 
event and my biggest problem has 
been one of entering the times and 
printing the results. 

I am looking for a program, like 
VisiCalc, into which I can pre-enterthe 



competitors' names, numbers and 
clubs. I could then enter the time 
against the name and step down to the 
next competitor with the cursor. 

The next step would be to sort the 
times into performance order, i.e. with 
the fastest on top. Competitors who 
registered but did not compete would 
have a zero time. Since there is not suf- 
ficient time to delete the entry a heavy 
character would be needed to drop the 
non-competitors to the bottom of the 
list. Alternately there should be a way 
for the operator to select a range for 
the printout. To print the results effi- 
ciently it would be ideal to load the 
results into a word processor and to 
format the files as in typesetting. 

Most commercial data bases re- 
quire a large number of keystrokes to 
alter one field in a record and this 
takes time. The ones that allow the 
files to be put into word processors are 
especially slow for single field entries. 

Microfiles are convenient but they 
do not handle range or selected 
records nor will they work with a word 
processor. Can any sports enthusiast 
help? 

Derek Trayler 

88 Grosvenor Drive 

Hornchurch 

Essex RM11 1PW 

England 



TRS-80 
Answering Machine 

I am looking for information regard- 
ing using my TRS-80 as a TTY terminal 
and answering machine. I am pro- 
foundly hard of hearing, and like other 
hearing-impaired and deaf people, use 
a TTY for telephone communications. 

In California, telephone companies 
must provide free TTY devices to all 
qualifying individuals, and I am able to 
take advantage of this law. However, 
answering machines for TTY are very 
expensive, and since I already have a 
TRS-80, I would like to use it to serve 
these functions. 

Pacific Telephone has been less 



'Answering machines 

for TTY are 

very expensive." 



than helpful when I have inquired 
about interfacing my computer to TTY. 
They told me that information such as 
baud rate, modem frequencies and the 
Baudot coding was proprietary infor- 
mation! And so far, I have not found 
the answer to my problem in the mi- 
crocomputer magazines. 

According to the U.S. Government, 
there are nearly 20 million people in 
this country with hearing disabilities, 
of which only two million are consid- 
ered "deaf." However, even people 
with moderate hearing losses have dif- 
ficulty with the telephone, and the 
market for a device or program which 
allows the use of a personal computer 
as a TTY device would appear to be a 
large one. 

By the way, my TRS-80 is 48K, with 
two disks and printer. I am a profes- 
sional computer systems consultant 
with over 22 years in the data process- 
ing business, so I could write the 
necessary programs, if I could get the 
basic information. But like many other 
programmers, I am not interested in re- 
inventing the wheel; if there are pro- 
ducts available that already do the job, 
I would rather buy what I need "ready- 
made." 

Dick Burkhalter 

Diverse Developments 

2203 West Olive Avenue 

Burbank, CA 91506 



Pure CHR$ 



I do not have a patch for Rolf 
Roethlisberger ("Model II Tabs", 80 
Aid, December 1981), and others who 
cannot send CHR$(9) to their printers 
through thejr Model lis, however the 
solution may have been given to me by 
David L Miller, Radio Shack Marketing 



Continued on page 16 
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META TECHNOLOGIES 

26111 Brush Avenue, Euclid Ohio 44132 
CALL TOLL FREE 1-800-321 -3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 



Let your TRS-80™ Teach You 

ASSEMBLY 
LANGUAGE 

REMSOFT's unique package. "INTRODUCTION 
TO TRS-80® ASSEMBLY PROGRAMMING" in- 
cludes ten 45-minute lessons on audio cassettes, a 
display program for each lesson providing illustra- 
tion & reinforcement, and a text book on TRS-80® 
Assembly Language Programming. Includes use- 
ful routines to access keyboard, video, printer and 
ROM. Requires 16K - Level II. Model I. 

REMASSEM-1 $69.95 

FOR DISK SYSTEMS $74.95 



Let Your TRS-80™ Teach You 

ASSEMBLY LANGUAGE 
DISK I/O TECHNIQUES 

REMSOFT does it again! REMDISK-1 is a concise, 
capsulated supplement to REMASSEM-1. Package 
consists of two 45-minute lessons on audio casset- 
tes, and display programs providing illustration 
and reinforcement. Provides specific track and 
sector I/O techniques, and sequential and random 
file access methods and routines. 

REMDISK-1 $29.95 



EPSON 
Printers 

DISK 
Drives 

DISKETTES 

BOOKS 
and more!! 



NEWDOS/80 Version 2.0 



$139 



SPECIAL 
q 5 INTRODUCTORY 
PRICE 



Apparat's long-awaited successor to NEWDOS + is here! This is not an enhanced ver- 
sion of NEWDOS, but a completely new product. Simplified DOS commands can be in- 
stantly executed from BASIC, even within a program, without disturbing the resident 
code. System options, such as password protection, number and type of disk drives, 
BREAK key enable/disable and lowercase modification recognition, can be quickly and 
easily changed. Five new random-access file types allow record lengths of up to 4096 
bytes, and no FIELDing! A powerful CHAIN facility allows keyboard INPUTs to be read 
from a disk file. An improved RENUMBER facility permits groups of statements to be 
relocated within program code. Diskettes may even be designated as RUN-ONLY! 
Features all NEWDOS + utilities (SUPERZAP 3.0, etc.) and much more! One MTC 
technical staff member said having NEWDOS/80 is "better than sex" (you'll have to 
judge for yourself!). 

MODEL III VERSION 

Has all the features of the Model I version plus enhancements. Allows any mix of 
single- or dual-sided 40- or 80-track disk drives. Most BASIC and many machine 
code programs written for the Model I will run without modification. Includes a 
utility for converting Model I single density to Model III double density. 



NEWDOS/80 # SPECIAL* 

CALL REGARDING OUR UPGRADE PRICING 



,5139.95 



Michael Shrayer's 

ELECTRIC PENCIL 
VERSION II 

for 
Model I and Model III 

An expanded version of the critically ac- 
claimed original word processing system! 
Includes all features of Version I plus many 
new extensions. Runs under most disk 
operating systems, has improved video 
text handling, loads any ASCII file for 
editing (including BASIC files), single sheet 
mode for printing on letterhead and more! 
Simple to use, features 2-key commands. 
An incredible package at an incredible 
price! 

SPECIFY MODEL I OR III 

Disk Version $79.95 

Tape Version $69.95 

CALL FOR AVAILABILITY 



Let your TRS-80™ Test Itself With 

THE FLOPPY DOCTOR & 
MEMORY DIAGNOSTIC 

by David Stambaugh 

A complete checkup for your MODEL I or 
MODEL III. THE FLOPPY DOCTORVersion 3 
completely checks every sector of single or 
double density 35-, 40-, 77-, or 80-track disk 
drives. Tests motor speed, head positioning, 
controller functions, status bits and provides 
complete error logging. THE MEMORY 
DIAGNOSTIC checks for proper write/read, 
refresh, executability and exclusivity of all ad- 
dress locations. Includes both diagnostics and 
complete instruction manual. 

SYSTEM DIAGNOSTICS .$24.95 
For MODEL III $29.95 



MORE 

PRODUCTS 



TRS-80 is a trademark ol the 

Radio Shack Division ol Tandy 

Corporation. DATALIFE is a 

trademark ol VERBATIM. PLAIN 

JANE. AIDS- 1. AIDS-MI. CALCSIII. 

CALCSIV. MERGEIII are 

trademarks ol MTC. 

© 1981 by Meta Technologies 

Corporation 






MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 

Products damaged in 
transit will be exchanged. 



PRICES IN EFFECT 

March 1,1982 THRU 

March 31, 1982 

Prices. Specifications, 
and Offerings subject to 
change without notice. 

8203 



WE ACCEPT 

• VISA 

• MASTER CHARGE 

• CHECKS 

• MONEY ORDERS 

• C.O.D. 



i 



•Add S3.00 for shipping 
& handling 
>$3.00 EXTRA for C.O.D. 

•Ohio residents add 6.5% 
sales tax. 



SO INPUT 



50AID 



Continued Irom page 14 

Representative, Paramus, NJ. 

Use CHR$(137) rather than CHR$(9). 
By adding 128 to 9, 10, 13, or any other 
CHR$ value Model II inhibits or 
translates, I am able to cause my 
Diablo 1640-RO to respond as though it 
had received the original value. This 
solution may not be effective for all 
printers, especially those which nor- 
mally use values greater than 128. 

Dale A. Swenson 

2264 East 4000 South 

Salt Lake City, UT 84117 

Card Reader Wanted 

I am looking for a card or optical 
reader that allows me to enter data in- 
to my TRS-80 Model III. Which com- 
panies make such a product? 

Fred E. Singer 

220 N. W. Eighth Street 

Evansville, IN 47734 

Bulletin Board 
for Model II 

I am using a Radio Shack Model II, 
and would like to run a bulletin board, 
however, I cannot find a bulletin board 
program written for the Model II. I 
would appreciate hearing from anyone 
who is running a bulletin board system 
with a Model II or who could give me a 
lead on getting a program. 

Roger Schechter, Esq. 

54 Park Avenue A 10 

Verona, NJ 07044 

Quebec Users Group 

I wish to contact all TRS-80 owners 
(any models) living in the Montreal area 
who would be interested in forming a 
users group. Please contact me at the 
following address. 

Alain Poisson 

4250 Des Roses, C. P. 1050 

Lachenaie, Quebec 

Canada J6W3T8 



Continued Irom page 12 

but vital and Centronics should be severe- 
ly chastised for them. 

The deeper cover means that the tear- 
bar is eight lines ahead of the 737 posi- 
tion. Before each page printing command, 
you must add a statement such as: 

FOR N = 1 to 8: LPRINTCHR$<27) CHR$(138);:NEXT 

This will back up the paper eight lines in 
the printer. 

Note that the manuals of both 737 and 
739 are in error as to the codes required 
from a TRS-80 for forward and backward 
spacing. 

There is a difference of one line in the 
line counting required. For a 66 line page, 
the TRS-80 Models I and III are correct for 
the 737. For the 739 it is necessary to 
POKE 16424,66 for accurate paging 
(67— the default value of the TRS-80— is 
correct for the 737). With this POKE in 
place, the 739 will page correctly on 
receipt of LPRINTCHR$(12) (no semicolon 
required), and will advance one line on 
LPRINTCHR$(11) (with or without semi- 
colon). The 737 with its default POKE of 67 
will page correctly on LPRINTCHR$(11); 
(with semicolon), or LPRINTCHR$(12) 
(with or without semicolon). However, the 
737 will be one line too many on LPRINT- 
CHR$(11) alone! If in doubt, change your 
programs to use only LPRINTCHR$(12) 
and use the right POKE. (Don't forget to 
change the POKE if double sized printing 
is used). 

PEEK (14312) returns a number de- 
pending on the printer status. Four 
numbers are returned for each printer, and 
each printer returns the same numbers. It 
is therefore not possible by software to 
determine which printer is connected, and 
to adjust the line and page counts ac- 
cordingly. The numbers returned are three 
higher in each case for a Model I TRS-80 
than for a Model III (see Table 1). Watch 
out for the different numbers returned 
from initial and subsequent Local/On Line 
switches! 

Considering that the 739 contains a 
selector switch for various accent sets, it 
is a pity that Centronics did not see fit to 
use one position to make the 739 look like 
a 737. 

Incidentally, the Centronics 739 is also 
now available with a two-color print head. 



Model I Model III 


AC power off 


239 


236 


Power on— 1st time— LOCAL 


159 


156 


ON LINE 


31 


28 


2nd time— LOCAL 


63 


60 


ON LINE 


31 


28 


Table 1. 







Ribbon life with one color is about equal 
to one box of fanfold paper; it will be less 
with the two-color head. 

M. Barlow 

Supervising Engineer 

Studio Systems Department, 

Engineering Headquarters 

Canadian Broadcasting Corp. 

Montreal, Quebec 

Profile Precautions 

My October issue of 80 Microcomput- 
ing arrived a few days ago. As usual, I 
dropped everything else I was doing to 
look through the magazine as quickly as 
the mailman had delivered it. As I glanced 
through it the heading "The greatest pro- 
gram Radio Shack has released" jumped 
out at me. When I saw that the program 
being reviewed which had received such a 
glowing description was "Profile" my first 
reaction was disbelief. I was astounded 
when I saw that seven pages had been 



"/ have only returned 

one program in utter 

disgust— Profile." 



devoted to a review of the program. I have 
purchased many programs since becom- 
ing involved with the TRS-80 Model I sever- 
al years ago. In all that time I have only 
returned one program in utter disgust. The 
program? Profile. 

Mr. O'Brien is to be commended on a 
very thorough description of the program 
in terms of what the program purports to 
accomplish. I am certain that no press 
agent for Radio Shack could have done a 
better job. It is not really what Mr. O'Brien 
said that I take issue with, it is what he did 
not say. In my opinion his review was 
grossly incomplete in that he did not refer- 
ence several items which would be of 
great interest and importance to anyone 
who contemplates purchasing Profile. 
These items include: 

• The sort program, although machine 
language, is painfully slow. It took me well 
over two hours to sort about 400 records. I 
am not a knowledgeable programmer, but 
the sort program appears to read records, 
compare them, and then write them right 
back to disk. One can only speculate as to 
the ultimate effect such heavy usage 
would have on a disk system. Radio Shack 
says in their Bulletin 1562-1 dated June 10, 
Continued on page 23 
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HANNON 
RGNCTICS 



To Order: 

Toll Free 1-800-525-9158 

1650 South Laredo Court • Aurora, Colorado 80017 

WE OFFER ATTRACTIVE DISCOUNTS TO DEALERS IN SMALL QUANTITIES 



MICRO COMPUTER DISKETTES 

Soft-Sectored 5V»" Double Density, Single Sided, Mini Disks, Shrink wrapped boxes of 10 with Jackets. Labels and Tabs. 

$26.95 each 2£ X S $39.96 

THESE DISKETTES ARE FULLY GUARANTEED FOR ONE YEAR AGAINST DEFECTS. RETURN ANY 
DISKETTE GOOD, BAD OR OTHERWISE AND WE WILL REPLACE IT FREE WITH NO QUESTIONS 

ASKED. YES - WE MEAN IT! 

PLASTIC LIBRARY CASE 5V4" for 10 diskettes. . . $2.95 

FLIPSORT DISKETTE FILE BOX 5%" for 50 diskettes. . $19.95 with 50 SHANNON MflGNdlCS disks. . .$109.95 

VERFIN DISK DRIVE HEAD CLEANERS 

These drive cleaning diskettes assure proper operation of all types of 5Vi" disk drives by removing dirt 
and debris which can cause read/write errors and lost data. Designed for use with double or single 
density dual or single headed drives of any track count. The kits contain two cleaning disks and 
instructions in a reusable hard plastic diskette box. You can use it in just seconds to insure the reliability 
of your system. 

COMPLETE KIT $24.95 



with two 
disks 



Two kits $39.96 



TANDON DISK DRIVES 
CALL FOR PRICE 

With or Without cabinet and power supply 



MASTERCARD 
AND VISA 
WELCOME 



We also accept 

• COD • CHECKS 

• MONEY ORDERS 



ORDERS IN U.S.A. SHIPPED U.P.S. FREE. 
Colorado residents add 6 1 /2% sales tax. 



Product Description 

2 drive disc drive cable 

3 drive disc drive cable 

4 drive disc drive cable 



Unit Price 

Quantity 10 

$19.29 
26.00 
28.% 



Unit Price 

Quantity 100 

$17.54 
23.50 
26.33 



Custom Cables Available minimum order 10 — Call for quote 
8" Extender Cable (Disk Drive) $9.98 $8.98 



6 ft. Printer Cable 
10 Ft. Printer Cable 



$15.40 
17.79 



$14.00 
16.17 

$42.00 
48.00 



1 Drive Cabinet w/power supply $51.20 

2 Drive Cabinet w/power supply 57.82 

— IBM type Horizontal Design — 
— Does not require extender cable — 

Tandon 40 track Double Density Bare drive $195.00 each 
Minimum Quantity 10 



iCfii 






diskettes $190.00 

for 10 boxes of 10 

5Va" Double Density, Soft Sectored, 
Single Sided 
WITH HUB RINGS, 

Individually 100% certified 






LNW Research 
Computers 

8" or 5Va" Drives 

Double or Single Density 

Totally TRS-80 Compatible 

High Speed Processor 

Dealer pricing available 

Now available 

125K CP/M - Team computer 

Compatible with TRS-80 Model I 

and CP/M 






U.P.S. Shipping - $5.00 per order shipping and handling/wholesale orders only, minimum 10 pieces 




601 Lipan St. Denver, CO 80204 
303-892-6986 



Manufacturers and Wholesale Distributors 
of Quality Computer Products 



SO INPUT 



SO DEBUg 



Sound Generator 

In my article "Polyphonic Sound 
Synthesis" (80 Microcomputing, June 
1981), there is an error on page 168, 
Table 2. The table is correct for older 
models of the TRS-80 but on newer 
models without the buffered cable, pin 
39 is not ground but +5 volts. 
Therefore, do not connect pin 39 to 
ground as shown. 

Richard L. Brocaw 

1850 Pearl Loop 

Bosque Farms, NM 87068 

Chess Tutor Fix 

Lines 1620-1710 were missing from 
the listing of my chess tutor program 
(80 Microcomputing, December 1981). 
There were also typographical errors in 
lines 660 and 670. The corrections 
listed in Program Listing 1 should 
resolve any problems you encounter 
with the program. 

Bob Dowd 

326 Porter Drive 

Lynn Haven, FL 32444 

Pay Up 

There are several typos in Program 
Listing 9, the "Loan Amortization 
Schedule", of Brian Honess' "Invest- 
ment du Jour" article (80 Microcom- 
puting, November 1981). The program 
in Program Listing 2 makes it run cor- 
rectly and cleans up the spacing for 
appearances. 

Don Picard 
321 Riverwoods Lane 
Bumsville, MN 55337 

Printer Spooler Bug 

My "Print Spooler" article in the 
December 1981 issue has a serious 
bug in it. Apparently, under some cir- 
cumstances the character print sec- 
tion is entered with an unexpected 



value in the IX register. When the print 
driver updates what it thinks is the 
lines printed storage location, it is 
changing something else. This causes 
the DOS to move the disk input buffer 



until disk input overwrites the Basic 

program. This only seems to happen 

when the Spooler prints long disk files. 

The solution is to force the correct IX 

Continued on page 22 



660 IFYMS a "O - 0"ORYMS = "O - O - O'THENCA = 1 :GOTO740 

670 IFLEN(YMS) = 5 AND MIS$<YMS.3,1) = " - "THEN710 

1620DATA9.2,1,3.3,0.3.7.8.6.6.0,10,3,1.7.5,0.3.2,8,4,7,0 

1630DATA7.5.2.5.3.0.4,6.8.5.7,0.9.7.1.6,3,0.0.0.0.0.0,55 

1640 DATA8. 1,1, 3. 1.0. 1.3,7.3.6 

1650 DATA99 

1660DATA7,4,2.4.4.0,3,7,8,6.6,0,7,3,2.3.4.0,1.5,7,5.6.0 

1670 OATA9.2, 1 .3,3.0.4,6.8.2,4.0, 1 1 ,4.1 .3,2,0.1 ,4,7,4.5.0 

1680DATA7,3,4.4,5.0.5.4.8.4.5,0.9.7,1,6.3,0,1.3.7,3.5.0 

1690 DATA10,3.1,4.2.0,4,2,4.3,3.0.10.4.2.3.3.0,1, 4,5.4,4,0 

1700DATA9,6,3,4.4 

1710DATA99 

Program Listing 1 



5 REM THIS A REVISION OF THE LOAN AMORTIZATION SCHEDULE 


6 REM PRINTED IN " 


30 MICROCOMPUTING" 


MAGAGZINE 


10 


ZLS: PRINT: PRINT 


TAB(20) "LOAN AMORTIZATION TABLE": PRINT 


20 


INPUT "LOAN PRINCIPAL =";P 




30 


INPUT "INTEREST 


RATE =";R 




40 


[NPUT "TOTAL PAYMENT =";M 




50 


INPUT "STARTING 


MONTH =";MO 




60 


INPUT "STARTING 


YEAR =";YR 




70 


PRINT 






80 


*$=" ## #*## ### ####.## #####.#! 


#####.##" 


90 


PRINT" MO YEAR 


N INT. PRIN. REMAIN." 


100 


PRINT 






110 


N=l 






120 


I=P*(R/12) 






130 


PR=M-I 






140 


P=P-PR 






150 


PRINT USING A$ 


MO, YR, N, I, PR, 


P 


160 


IF P+(P*(R/12 ))<=M THEN 250 




170 


N=N+1 






180 


MO=MO+l 






190 


IF MO=13 THEN 


210 




200 


GOTO 120 






210 


MO=l 






220 


YR=YR+1 






230 


PRINT 






240 


GOTO 120 






250 


N=N+1 






260 


MO=MO+l 






270 


IF MO<=12 THEN 


300 




280 


MO=l 






290 


YR=YR+1 






300 


I=P*(R/12) 






310 


PR=P+I 






320 


P=0 






330 


PRINT USING A$ 


MO,YR,N,I,PR,P 




340 


PRINT 






350 


END 


Program Listing 2 
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fi DATA RESOURCES S 

QUALITY SOFTWARE FOR YOUR TRS-80® DISK SYSTEM 
TO ORDER CALL TOLL FREE 800-525-7958 



1 



Data Resources is pleased to continue its commitment to professional quality TRS-80 
software by introducing The Silver Edition Software Series. This collection of programs 
represents the best contributions from the most talented and popular authors available. 



DATA RESOURCES NEW SUBSYSTEMS FOR AIDS 



AIDS DISK SORT 

Designed for files that are too large to sort "in 
memory" with AIDS or for when you don't 
want to wait while AIDS loads the records. 
Records are physically rearranged on disk. 
MODEL I $24.95 

AIDS FILE EDITOR 

Allows you to update and edit records in AIDS 
data files without loading the file into memory. 
Now you can change a single record in a 
mailing list quickly and easily with random 
access selection. 
MODEL I $24.95 



AIDS DATA ENTRY MODULE 

Designed for inputting data directly into AiDS 
files. Fields may be fixed to repeat the same 
data. The key-in routines are improved in 
speed — no more over keying. Data can be 
added to the end of an existing file or a new file 
can be created. Files are automatically opened 
and closed so even if the computer is turned 
off in the middle of work, no more than 255 
keystrokes can be lost. 

MODEL I S24.95 



CUSTOM MADE CABLES 

S7.00 per Connector 

$1.00 per Foot of Cable 

We will make Printer and Drive Cables for you to 

your specifications. 10% discount for 10 or more. 

RIBBON CABLES 

Model I or III Printer $18.95 

2 Drive Disk Cable S19.95 

4 Drive Disk Cable $29.95 



THE MICRO ACCOUNTING SYSTEM 

This is the finest accounting system available for your 
TRS-80. Ideal for small business, this Intergrated 
General Ledger. Accounts Receiveable. Payable 
System includes a Checkbook manager. 
We offer something no other general business package 
can give you-a money back guarantee. If you are not 
totally satisfied return the package within 60 days and 
receive a full refund. Write for sample reports and full 
descriptions. 

MAS/80 complete $489.00 



GENERIC 

SOFT SECTORED 5V," DISKETTES 

PLASTIC BOX OF 10 $22.95 

BULK PAC OF 100 $200.00 

50 DISKS WITH A 

FLIPSORT $119.95 

HEAD CLEANING 

KITS $24.95 



B.T. ENTERPRISES 
UNITERM/80 

By Pete Roberts 
This is the state of the art in communications 
software. It configures itself for either Model I or 
Model III and can be used with any standard 
modem, both RS-232 and Bus-Decoding. 
Especially designed to use the extended commands 
in NEWDOS/80, but fully compatible with all major 
DOS systems. 
For Model I and III $89.00 



THE FLOPPY DOCTOR 

By Dave Stambaugh 
FLOPPY DISK/MEMORY DIAGNOSTIC 
Computer "professionals" have long known the 
importance of regular use of diagnostic software in 
verifying the integrity of computer hardware. The 
TRS-80 is no exception; good diagnostics are a 
must. The MICRO CLINIC offers two programs 
designed to thoroughly check out the two most 
trouble prone sections of the TRS-80. the disk 
system (controller and drives) and the memory 
arrays. 

MODEL I $24.95 MODEL III $29.95 



VERBATIM 

SOFT SECTORED 5%" DISKETTES 
DOUBLE DENSITY 

DATALIFE $26.95 

1 BOX WITH A FLIPSORT $43.95 

FLIPSORT 
STORAGE CASE FOR 

50 DISKS $19.95 

10 TO A BOX 40 TRACK 



DYSAN 

SOFT SECTORED 5'/." DISKETTES 
WHEN YOU CAN'T AFFORD 
ANYTHING BUT THE VERY BEST. 

SINGLE DENSITY $36.95 

DOUBLE DENSITY $39.95 

10 TO A BOX — 40 TRACK 



AIDS SYSTEMS 

BY METS TECHNOLIGIES 

MTC AIDS III 

This easy to use system allows even a novice 
TRS-80 user to create data files custom 
configured for many applications, from lists 
for mailing and cataloging to financial 
reporting and time scheduling. It requires NO 
PROGRAMMING and is complete with 
features for adding, deleting, sorting 
updating and printing. 
MODEL I $69.95 

MTC CALCS III 

Performs numeric calculations of data 

contained in AIDS files. Ideal for financial 

applications. 

MODEL I $24.95 

MTC CALCS IV 

The same features as CALCS III with more 
powerful formulas and the ability to store 
report formats. 
MODEL I $39.95 

M TC MERGE- III 

Combines up to 14 AIDS data Mies into a single 
file. Duplicates may optionally be purged, and 
sorted order of records is maintained. 
MODEL I $19.95 

SPECIAL 

AIDS III SUPER SYSTEMS 

AIDS III & CALCS III & MERGE III 

MODEL I $99.95 

AIDS III & CALCS IV & MERGE III 
MODEL I $109.95 

NEWDOS/80 Version 2.0 
for MODEL I and III $149.00 

The hottest Disk Operating System is now 
available in its latest version. This is the ONE 
from Apparat. Inc.. the people whose systems 
have made the TRS-80 a reliable computer. 
This system includes: 

• Double Density support on the Model I 

• New Superzap with expanded capabilities 

• Diskette compatibility between Model I 
and III 

MODEL I DOUBLE DENSITY PACKAGE 

NEWDOS/80 Version 2.0 and the 

LNDOUBLER 

Everthing you need to convert your TRS-80 
Model I to run double density. Complete with 
software, hardware, and instructions. — 
installs in minutes with NO SOLDERING, 

WIRING OR CUTTING $229.95 

LNDOUBLER Alone $149.95 



Ar4 



MASTERCARD 
AND VISA _ 
WELCOME 
We also accept 
COD • CHECKS 
MONEY ORDERS 



Data Resources Corporation 

Business & Professional Center 8000 East Quincy Ave. 
Denver, Colorado 80237 (303) 773-6665 



ALL SOFTWARE SUPPLIED ON DISKETTE. 
ORDERS IN U.S.A. SHIPPED U.P.S. FREE. 
Colorado residents add 6tfe% sales tax. 

ATTN: DEALERS - We offer attractive pricing and terms to small 
computer retailers. Write for information on our dealer program and 
discounts in small quantities. 

*1981 DATA RESOURCES CORP. 
TRS-80' IS A TRADEMARK OF TANDY CORP. 

AIDS III,* CALCS III,* MERGE III,* ARE TRADEMARKS OF METATECHNOLOGIES 



If you have 




thoughts 
about mail order, 
call us first. 



If mail-order shopping hasn't 
been everything you hoped for. 
look into Alpha Byte. 

Our incredible low prices, our 
guarantee of satisfaction, our ex- 
pertise — all as near as your 
phone. 

All you have to do is call. A 
state-of-the-art microcomputer ex- 
pert is standing by to answer 
your questions, offer advice, or 
take your order. 

The rest is up to us. At Alpha 
Byte, orders are processed right 
now! Quickly and efficiently. In- 
stock merchandise is usually 
shipped within 24 hours. Sooner 
than you think, there'll be a sur- 
prise at your doorstep. 

We make mail order quite 
painless and pleasant. Even fun. 
Call (213) 706-0333 and let us put 
a little sunshine into your 
shopping. 



PRINTERS 



ANADEX DP 9500 
ANAOEX DP 9501 
C-IT0H 25 CPS PARALLEL 
C-IT0H 25 CPS SERIAL 
C-IT0H 45 CPS PARALLEL 
C-IT0H 40 CPS SERIAL 
EPSON MX-80 
EPSON MX-80 F/T 
EPSON MX- 100 GRAPHIC 
EPSON GRAFTRAX 
IDS-445G PAPER TIGER 
IDS-460G PAPER TIGER 
I0S-560G PAPER TIGER 
MALIBU 200 DUAL MODE 
NEC SPINWRITER 3510 S R0 
NEC SPINWRITER 3530 P R0 
NECSPINWRITER7710S.R0 
NEC SPINWRITER 7730 PRO. 
NEC SPINWRITER 3500 SELLUM 



1295 00 

1295 00 

1440 00 

1495 00 

1770 00 

1870 00 

SCALL 

SCALL 

SCALL 

90.00 

779.00 

945 00 

1195.00 

2695 00 

2095 00 

2095.00 

2595.00 

2595.00 

2295.00 



0KIDATA MlCROLINE 80 389 00 

0KIDATA MlCROLINE 82A 569 00 

0KIDATA MlCROLINE 83A . 7 gg o 

0KIDATA MlCROLINE 84 1199 00 

16K RAM SPECIAL 13.95 

Set ol 8 NEC 41 16 ns wild msiruclions Guaranteed one lull year 

MODEL I, III SOFTWARE 

LAZY WRITER MOD I 16 g 0Q 

LAZY WRITER MOO III i6g 00 

MICR0PR00F SPELLING CHECK 84 95 

PR0S0FT NEWSCRIPT MOD I. Ill gg 00 

PR0S0FT MAILING LABELS MOD I. Ill 2g 95 

PROSOFT NEWSCRIPT/LABELS MOO I III 115 00 

SPECIAL0ELIVEfiYM0DI.nl 119 00 

X-TRA SPECIAL 0ELIVERY MOD I III 179 00 

TRAKCESS MOD I 34 g 5 

0MNITERM SMART TERMINAL MOO I. Ill 89 95 

MAXI-MANAGER 89 95 

00S PLUS 3.3 MOD I 8 9 00 

DOS PLUS 3 3 MOO III 8 9 00 

DOS PLUS 3 38 MOD III . 129 00 

LD0S 5.1 ,4900 

CALCSTAR MOO I. Ill 129 00 

MICROSOFT EDITOR ASSEMBLER + MODI 24 95 

MICROSOFT FORTRAN MOD I 165 00 

DISKETTES 

ALPHA DISKS 21.95 

Single sided, certified Double Density 40 Tracks, wilh Hub-Ring 
Box ol 10 Guaranieed one lull year 

VERBATIM 

MO 52501. 10. 16 26 50 

MD 550-01. 10. 16 44 ' 50 

MD 55701. 10.16 54 « 

FD 32 or 34-9000 36 00 

FD 32 or 34-8000 «' fin 

DYSAN 

5V..SS/0D. BOX OF 10 4500 

DISKETTE STORAGE 

5V<" PLASTIC LIBRARY CASE 950 

8" PLASTIC LIBRARY CASE 350 

PLASTIC STORAGE BINDER WITH INSERTS 9 95 

PROTECTOR 5 <h" 2 3 95 

PROTECTOR 8" 2g g| 

TRS-80 MOD I HARDWARE 

PERC0M DATA SEPARATOR 97 o 

PERCOM DOUBLER II jeg'nn 

TAND0N 80 TRACK DISK DRIVE 43900 

TANDON 40 TRACK DISK DRIVE 339 00 

LNW DOUBLER WITH DOSPLUS 3.3D ,5900 

LNW DOUBLER 5/8 209 00 



ISOLATORS 

IS0-1 3-SOCKET 53 g5 

IS0-2 6S0CKET 5395 

MODEMS 

NOVATION CAT ACOUSTIC 145 00 

NOVATION D-CAT DIRECT CONNECT 165 00 

NOVATION AUTO-CAT AUTO ANSWER 319 00 

UDS 103 LP DIRECT CONNECT 1 7500 

UDS 1 03 JLP AUTO ANSWER ... 309 00 

C. HAYES STACK Smari Modem 34900 

LEXICON LX-11 10900 

CP/M* SOFTWARE FOR MOD II 

MICROSOFT 

MICROSOFT BASIC-80 3gg qo 

MICROSOFT BASIC COMPILER 319 00 

MICROSOFT FORTRAN-80 369 00 

COBOL 80 5 gg 00 

MICRO PRO 

WORDSTAR. 31000 

MAILMERGE (REQUIRES WOROSTAR) 1 10 00 

SPELLSTAR (REQUIRES WOROSTAR) igg 00 

SUPERSORT , 9500 

OATASTAR 345 qo 

CALCSTAR 239 00 

OTHER CP/M 8 SOFTWARE 

SPELLGUARD 23g 00 

SUPERCALC 33900 

COMMX TERMINAL SOFTWARE 7500 

"BASEII 599 00 

P&TCP/M* M00IITRS-80 17500 

c basic 2 115 ; 00 

PASCAL Z . 349 00 

PASCAL MT + 439 00 

PASCAL/M 305 00 

SYSTEMS PLUS - 

G/L. A/R. A/P. P/R 1799 00 

CONDOR I 5 7 g 00 

CONDOR II . 849.00 

SUPPLIES 

AVERY TABULABLES 

•1.000 3% x 15/16 8 49 

3.000 Vh x 15/16 ,495 

5.000 3% x 15/16 tggs 

FAN FOLD PAPER (Prices f.o.b. s.p.) 

9'h x 1 1 181b WHITE 3.000 CI 2g 00 

14 7/8x11 181b WHITE 3.000 cl 3g'oo 

TWO NEW 'OTHER MYSTERIES' 
BOOKS 

THE CUSTOM TRS-80 2 4 95 

MICROSOFT BASIC FASTER AND BETTER 24^95 

• 11 
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CORVUS 

TRS-80 MOD I. II, III 

Controller. Case/PS.. Operating Syslem. A&T 

5 MEGABYTES 

10 MEGABYTES 
20 MEGABYTES 
MIRROR BACK-UP 



3245.00 

4645.00 

5545.00 

725.00 



SPECIALS 

SPECIAL NO. 1 

TRS-80 DISK AND OTHER MYSTERIES. BOX OF VERBATIM 
DISKS. PLASTIC LIBRARY CASE 44.50 

SPECIAL NO. 3 

NEWOOS/80 2 0. BOX OF VERBATIM DISKS. PLASTIC LIBRARY 

CASE ">9 00 

SPECIAL NO. 4 

MICROSOFT BASIC COMPILER. BOX OF VERBATIM DISKS. 

PLASTIC LI8RARY CASE ' 79 00 

SPECIAL NO. 5 

MICROSOFT BASIC DECODED AND OTHER MYSTERIES. 80X OF 

VERBATIM OISKS. PLASTIC LIBRARY CASE 49 95 

DOUBLE DENSITY SPECIAL 

PERCOM DOUBLER II. NEWD0S/80. BOX OF VERBATIM DISKS. 

PLASTIC LIBRARY CASE 279.00 

COMMUNICATION SPECIAL MOD I & III 

NOVATION MODEM. OMNITERM TERMINAL SOFTWARE. 
ACOUSTIC SPECIAL (CAT) 219 00 
DIRECT CONNECT SPECIAL (D-CAT) 239 00 
SERIAL CABLE 25 00 

DISK LIBRARY SPECIAL 

RACET OISKCAT CATALOGING PROGRAM. FLIP SORT (50 DISK 

CAPACITY). 50 STICK-ON OISK LABELS 59 95 



TRS-80 GAMES 

TEMPLE OF APSHAI 

HELLFIRE WARRIOR 

STAR WARRIOR 

RESCUE AT RIGEL 

CRUSH. CRUMBLE & CHOMP 

INVAOERS FROM SPACE 

PINBALL 

STAR TREK 3.5 

MISSILE ATTACK 

STAR FIGHTER 

Z-CHESSIII 

ADVENTURE NO. 1.2. & 3 

ADVENTURE NO. 4.5. & 6 

ADVENTURE NO 7. 8. &9. 

DUEL-N-OROIDS 

STARFLEET ORION 

INVASION ORION 

OLYMPIC DECATHLON 

MONTY PLAYS MONOPOLY 
SARGON II 

BLACKJACK MASTER 

ROBOT ATTACK 

GALAXY INVASION 

SUPER NOVA 

TUESDAY MORNING OUARTERBACK 

LUNAR LANDER 

THE MEAN CHECKER MACHINE 

GAMMON CHALLENGER 

SPACE ROCKS 

PIGSKIN 

ZOSSEO IN SPACE 

ARCADE-80 .... 

COMBAT 

SPACE INTRUDERS 

SILVER FLASH 

MORTONS FORK 
PROJECT OMEGA 



34.95 
34 95 
34 95 
24 95 
24 95 
17.95 
1795 
17.95 
18.95 
24.95 
24 95 
34 95 
34.95 
34.95 
1795 
21 95 
21.95 
24.95 
.31.95 
31.95 
27.95 
17.95 
17.95 
1795 
26 95 
18.95 
21 95 
1895 
18.95 
17.95 
18.95 
21.95 
18 95 
17.95 
17.95 
2695 
21 95 



CP/M is a registered trademark ol Digital Research 

Send for 
our hot new catalog. 

This catalog is a "must". Its unique 
3-ring binder format lets you keep it 
up-to-the-minute current. We will 
provide you with changes or addi- 
tions, as necessary, on a regular 
basis. 



Alpha Byte is proud to feature the finest 
business software available for the TRS-80 
from Occupational Computing Co., Inc. 



OCC A/R WITH BILLING AND 
INVENTORY CONTROL 

One step posting prints an invoice, 
reduces inventory, posts to customer 
ledger.and accumulates sales analysis. 
Can be set up as Open Item or Balance 
Forward system. 

Model I. Ill 750.00 

Model II 1495.00 

OCC PAYROLL 

Includes: Multiple Pay Frequencies, 
Salary or Hourly. Automatic Deductions 
(Federal, State, FICA, Disability In- 
surance), Commissions, Bonuses, Tips, 
Complete Journal, Check Writer, Check 
Register. Quarterly 94IA and Yearly W-2 
Reports. 

Model I. Ill 350.00 

Model II 495.00 

OCC UNION REPORTING 

Features: Interfaces with OCC Payroll 
(Data entry is from employee time card), 
Flexible Local Set-up (Union Codes and 
Classifications), Computation and repor- 
ting of Various Funds (Vacations, Dues, 
Pensions, Health & Welfare, Industry, 
Training, Promotion, Contract Ad- 
ministration). 
Model II 495.00 

OCC ORDER ENTRY 

Features: Allows On-Line Entry and 
Maintenance of Customer Orders. Sup- 
ports Credit Memos, Standard & Non- 
standard Discounts and Total Back- 
Order Control. Automatically Interfaces 
to OCC A/R, Billing and Inventory Con- 
trol. 
Model II 995.00 




OCC MANUFACTURING 
INVENTORY CONTROL 

Features: Bill of Material 'Explosion* 
maintains inventories in up to 10 levels 
of sub-assemblies and/or components. 
Allocates and relieves raw materials 
based on input of production schedules 
and completions thru the bill of 
Materials Explosion Update and Prints 
Bill of Materials Cost Report. All or 
selected ranges of assemblies are 'Ex- 
ploded' into the lowest level com- 
ponents; quantities and unit prices are 
extended for each component to give a 
unit cost for the entire assembly. Prints 
Inventory Exception Report and Sug- 
gested Purchase Orders. Automatically 
interfaces to OCC A/R , Billing and In- 
ventory Control and OCC Order Entry 
Systems. 
Model II 995.00 



All OCC Software is supplied with user 
oriented manuals that include easy user 
installation instructions. OCC Software 
is written in Radio Shack Basic and runs 
under TRSDOS. OCC Software uses 
Keyed Sequential Access Method 
(KSAM) File structure, Binary searches 
and fast Machine Language Sorts to in- 
sure the fastest possible execution. 
OCC's Exceptional Screen Control For- 
mat makes data entry as easy as filling 
out a form. Related OCC Software 
packages interface to form complete 
MENU DRIVEN Accounting systems. 

If you have a serious business applica- 
tion then you should consider OCC Soft- 
ware. Call for a complete description of 
any of OCC's Business Packages. 



We guarantee everything for 30 days. If 
anything is wrong, return the item and we'll make 
it right. And. of course, we'll pay the shipping 
charges. 

We accept Visa and Master Card on all orders: 
COD orders, up to $300.00. 

Add $2.00 for standard UPS shipping and 
handling on orders under 50 lbs. delivered in con- 
tinental U.S. Call for shipping charges over 50 
lbs. Foreign, FP0 and AP0 orders, add 15% for 
shipping. Californiana add 6% sales tax. 

Prices quoted are for stock on hand and are 
subject to change without notice. 

31245 LA BAYA DR WESTLAKE 
VILLAGE, CALIFORNIA 91362 



To order, or lor information-call: 

(213)706-0333 

To use our 24-hour modem order line, call: (213) 883-8976. 



-See List ol Advertisers on page 402 
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SO INPUT 



ft) MBUg 



Continued trom page 18 

value before entering the print driver. 
The required code changes are: 

• Change line 420 to: 420 LD 
(PRINT +13),HL 

• Add the following lines: 



852 Dl 

854 PUSH IX 

856 LO IX.4025H 

862 POP IX 

864 El 



• Change the origins in 260 and 280 
to FB78H and FF78H respectively. 

I offer my sincere apology to those 
of you who spent time trying to make 
this work. 

Roger B. Gault 

9603 Mount Quail Road 

Austin, TX 78758 

Missing Messages 

My program, TXTWRT, does not 
assemble correctly when you type it in. 
The trouble is with the CALL to display 
program messages. My article, "More 
Write Stuff" (80 Microcomputing, De- 
cember 1981), was published without 
the accompanying message prompts. 
Program Listing 3 contains the miss- 
ing lines for the program. Insert these 
lines between lines 2940 and 3190 of 
the program. The slash marks are for 
spacing purposes only and should not 
be typed in. 

Lynard Barnes 

320 South Whipple Street 

Chicago, IL 60612 

Missing Programs 

Somewhere in your cutting room 
there is an eccentric with a pair of 
scissors. Once again, the programs in 
my series of articles "Alternate 
Course" have been tampered with. 
This time, the programs referred to as 
Fig. 1 and Fig. 2 in the October issue do 
not appear at all. 

Figure 3 contains an additional 

Continued on page 23 



M1 


DEFM 


TEXTWRITER// - //OPTIONS' 




DEFB 


ODH 




DEFB 


ODH 




DEFM 


•l-ADD/W/Z/^-LOAD" 




DEFB 


ODH 




DEFM 


'3-SAVE///////4-PRINT - 




DEFB 


ODH 




DEFM 


'5-BASO////6-KILLBUF' 




DEFB 


ODH 




DEFM 


7 -1ST 1020 BYTES' 




DEFB 


ODH 




DEFB 





M6 


DEFM 


'(ENTER) TO SAVE BUFFER. 




DEFB 





M7 


DEFM 


•(ENTER) TO LOAD BUFFER ' 




DEFB 





PRNT1 


DEFM 


'WILL SEND BUFFER TO LINE PRINTER ON KEY' 




DEFB 




Program Listing 3 



12 B=2:W(1)=1: W(2)= -1: W(3)=64: W(4) = -64: Y=16379 

2999 REM SUBROUTINE FOR USER CONTROLLED SAUCER 

3000 A$=INKEY$ 

3010 IF A$="" THEN GOTO 3040 

3020 B=ASC(A$)-64 

3030 IF B>4 OR B<=0 THEN B=l 

3040 POKE Y,32: POKE Y+1,32: POKE Y+2,32 

3050 Y=Y+W(B) 

3060 IF Y+2=16383 THEN Y=15361 

3070 IF Y=15360 THEN Y=16379 

3080 IF Y+2>16383 THEN Y=Y-1023 

3090 IF Y<15360 THEN Y=Y+1023 

3100 POKE Y,187: POKE Y+l f 157: POKE Y+2,140 

3110 RETURN 

Fig. 1 

12 B-2:W(1)-1,K(2)— 1:W(3)-64:W(4) — 64:Y-16379 

IBB COSUB 3BB0 

llfl GOTO IBB 

3BB8 IF Y>X+64 THEN B-4: GOTO 3848 

3818 IF Y>X THEN B-2:GOTO 3048 

3828 IP Y-128 < X THEN B-3: GOTO 3848 

3B30 B-l 

3B48 POKE Y,32i POKE Y+1,32: POKE Y+2,32 

3858 Y-Y+WIB) 

3B6B IP Y+3-16383 THEN Y-15361: GOTO 3188 

387B IP Y-l-15368 THEN Y-16378: GOTO 3188 

388B IF Y+3>16383 THEN Y-Y-1B23: GOTO 3188 

3898 IP Y-K15368 THEN Y-Y+1823 

31BB POKE Y,187: POKE Y+1,157: POKE Y+2,148 

3118 K-Y+3 

312B IP B-2 THEN K-Y-l 

3138 POR T-l TO 15 

3148 POKE K,42 

3158 IP K-X OR K-X+l OR K-X+2 OR K-X+3 OR K-X-l OR K«X-2 OR K*X-3 THEN GOTO 4881 

3168 POKE K,32 

3178 K-K+WIB) 

3188 IP K<15361 THEN GOTO 3228 

3198 IP K>16382 THEN GOTO 3228 

3288 NEXT T 

3228 RETURN 

4888 PRINTS 530,'YOU LOSEIII* 

491B INPUT *DO YOU WANT TO PLAY AGAIN", -AS 

4828 IP A$-'YES' THEN RUN 

4838 END 

4848 REM SUBROUTINE FOR COMPUTER CONTROLLED SHIP 

Fig. 2. 
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Continued Irom page 16 

1980, "Profile uses an 'on-disk' sorting 
method which requires a large number of 
disk read/write operations. We have dis- 
covered that disk life is a significant fac- 
tor in system failures, especially in long 
sorts of large or multiple drive systems. 
Users should use new backup copies reg- 



ularly." About half way through the fifth 
pass of a nine pass sort I got a disk read 
error. Unfortunately I had not yet obtained 
the Service Bulletins with their caution 
and, contrary to good practice, I had not 
made a copy of my file before sorting it. 

• The Basic program given in the 
manual for access to Profile files will not 



g0 DEBUg 



Continued Irom page 22 

listing which shows the code to get the 
ships to chase each other around a bit. 
I have only one question. As many of 
your readers know, the gremlins that 
cause errors to be created in programs 
are known as "bugs." The gremlins 



that cause errors in networks are 
known as "worms." What are the 
gremlins in cutting rooms called? 

Michael A. Duff in 
1507 East Avenue 
Berwyn, IL 60402 



2050 
2060 
2070 
2080 
2090 



5 CLS 

12 B«2:W(1)=1:W(2)=-1:W(3)=64:W(4)=-64:Y=1637 8 

13 D=2: V(l)»l: V(2)= -1: V(3)= 64: V(4)» -64: X=15365 
100 GOSUB 2000 

110 GOTO 100 

2000 A$=INKEY$ 

2010 IF A$="" THEN GOTO 2040 

2020 D=ASC(A$)-64 

2030 IF D>4 OR D<=0 THEN D=l 

2040 POKE X,32: POKE X+1,32: POKE X+2,32 

X=X+V(D) 

IF X+2=16383 THEN X=15361 

IF X=15360 THEN X=16379 

IF X+2> 16383 THEN X=X-1023 

IF X<15360 THEN X=X+1023 
2100 POKE X,187: POKE X+1,157: POKE X+2,140 
2105 GOSUB 3000 
2110 RETURN 

3000 IF Y>X+64 THEN B=4: GOTO 3040 
3010 IF Y>X THEN B=2:GOTO 3040 
3020 IF Y-128 < X THEN B=3: GOTO 3040 
3030 B=l 

3040 POKE Y,32: POKE Y+1,32: POKE Y+2,32: POKE Y+3,32 
3042 REMPRINT "Y= "Y 
3050 Y=Y+W(B) 

3060 IF Y+3=16383 THEN Y=15361: GOTO 3100 
3070 IF Y=15360 THEN Y=16378: GOTO 3100 
3080 IF Y+3>16383 THEN Y=Y-1023: GOTO 3100 
3090 IF Y-K15360 THEN Y=Y+1023 

3100 POKE Y,176:POKE Y+1,190: POKE Y+2,189: POKE Y+3,176 
3110 K=Y+4 

3120 IF B=2 THEN K=Y-1 
3130 FOR T=l TO 15 
3140 POKE K,42 

3150 IF K=X OR K=X+1 OR K=X+2 OR K=X+3 OR K=X-1 THEN GOTO 400( 
3160 POKE K,32 
3170 K=K+W(B) 

3180 IF K<15361 THEN GOTO 3220 
3190 IF K>16382 THEN GOTO 3220 
3200 NEXT T 
3220 RETURN 

4000 PRINTS 530, "YOU LOSE! 11" 
4010 INPUT "DO YOU WANT TO PLAY AGAIN" ;A$ 
4020 IF A$="YES" THEN RUN 
4030 END 
4040 REM SUBROUTINE FOR COMPUTER CONTROLLED SHIP 



Fig. 3. 



work as written. Bulletin 1562-4 gives the 
corrections for the program. Again, I did 
not have the advantage of seeing the Bul- 
letin in advance and spent many wasted 
hours trying to use the Basic program to 
salvage my file. 

• Bulletin 1562-5 gives corrections for 
another Basic program listed in the 
manual. 

• Bulletin 1562-6 gives further correc- 
tions. 

• Bulletin 1562-2 says that if Basic is 
used to access files built by Profile then 
"the LRL must be a number evenly divisi- 
ble into 256 minus one." 

I originally chose Profile since I needed 
the capability of maintaining a file of over 
1,000 records, each of which consisted of 
four fields. While the program may func- 
tion perfectly with a test file of several 
dozen records, I would encourage the seri- 
ous user with a large file to think twice 
before using Profile. As previously stated, 
I returned my copy to Radio Shack and ob- 
tained a refund. It is interesting to note 
that after I had my copy of Profile re- 
turned, the salesman ran me off a copy of 
all Customer Service Bulletins issued on 
Profile. If, ever again, I purchase any 
Radio Shack software I shall make it a 
point to ask for copies of any bulletins 
which pertain to the software. Other users 
might want to follow the same procedure. 

Charles K. Bridges 
Sacramento, CA 

Software Buyer's Tips 

It seems that of all the articles I have 
written for 80 the one on Profile drew the 
most active attention. 

The article, in context, was an attempt 
at a comparison between Profile and 
Microfile and a bit of an expansion on 
some of the features of Profile. To this day 
I stand by my statement that it was the 
best program released by the Shack up 
until that time. I do not understand the 
problem you were having with the two- 
drive sort, but again, as you point out, I 
had only entered about 120 or so pieces of 
data so the second drive was never real- 
ly utilized. I can only conjecture that in as 
much as a year or so ago a system with 
more than one drive was atypical, the pro- 
gram was never functionally paced 
through a multidrive exhaustive test. Soft- 
ware authors do have a tendency to ac- 
cept certain things for granted when 
others seem to work right. 

The Shack, and I know the ground will 
quiver when I write this, had not, up until 

Continued on page 24 
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Here is the 


long-awaited program listing of Convert which should have 






appeared with James F. Williams' article "Smart Answers" in the April 






1981 issue of 80 Microcomputing.— Eds. 










00100 


; CONVERT 1.1 (C) 198B BY JAMES P. WILLIAMS 










0B11B 


;720 WEST HAVEN BLVD 










00120 


; ROCKY MOUNT, NC 27 801 










00138 


; 










00140 


/RESERVE MEMORY AT ORG POINT. 










00150 


/HIT SBIPT C AFTER TYPING IN A NUMBER (USE H AFTER 










00160 


(A HEX NUMBER) POR A REPLACEMENT CONVERSION ON THE 










00170 


/SCREEN AND IN THE BUPPER. USE SHIFT B TO ACTIVATE A 










00180 


/BACKWARD SEARCH FOR FIRST DECIMAL STRING BEFORE CURSOR 






D 




00190 


/AND PRINT CONVERSION AT CURSOR AND IN BUPPER. CONVBRTE 








0B2BB 


/NUMBER MARKED WITH g. 










BB21B 


1 










00220 


/I. INITIALIZATION ROUTINE 






7FB8 




00230 


ORG 32520 /CHANGE IP NOT 16K 






7FB8 

T 

7PBB 


2A164B 


00240 


INTLZE LD HL,(4016H) /SAVE PREVIOUS INTERCeP 






22267F 


00250 


LD (DECODE+1) ,HL 






7P0E 


21177F 


00260 


LD HL.HODE /SET THIS INTERCEPT 






7P11 


221640 


00270 


LD (4016H),HL 






7P14 


C3CC06 


00280 
00290 
00300 


JP 6CCH /RETURN TO BASIC 
/II. EXECUTION STATUS CHECK 






7P17 


3E02 


00310 


HODE LD A, 2 /MODIFIED BY PROGRAM 






7P19 


ED73DE7P 


00320 
00330 


LD (STKPTR+1) ,SP /SAVED TO FIX STACK 

/ FROM JP'S FROM SUB'S 






7P1D 


B7 


00340 


OR A 






7F1E 


CAC27F 


00350 


JP Z,BKSPCE /AUTO TYPE BACKSPACE 






7F21 


3D 


00360 


DEC A 






7P22 


CADB7F 


00370 
00380 
00390 


JP Z,BUFPTR /AUTO TYPE CONVERSION 
;III. REGULAR HODE: CHECK FOR SHIFT C AND SHIFT B. 






7P25 


CD257F 


00400 
00410 


DECODE CALL S /SET AT INITIALIZATION 

; DECODE KEYBOARD 






7P28 


2A2B40 


00420 


LD HL, (40 201!) /LOAD CURSOR POSITION 






7P2B 


PE63 


00430 


CP , C'+20H /SHIFT C? 






7P2D 


28BE 


00440 


JR Z,HEXDEC /YES, HEX OR DEC? 






7P2P 


PE62 


0045B 


CP , B , +20H /SHIFT B? 






7P31 


CB 


BB46B 


RET NZ /NO, RETURN CHARACTER 






7P32 


CDEA7F 


BB470 


BKSRCH CALL SRCH ;YES, SEARCH POR 0-9 






7P35 


38FB 


00480 


JR C, BKSRCH /B-9? NO, KEEP LOOKING 






7P37 

T 

7F3A 


CD497F 


00490 


CALL DECH /YES, DEC TO HEX CONVER 






C3CB7F 


0050B 


JP CHRPLG j TO SET AUTO CHAR FLAG 






7P3D 


3E48 


B0510 


HEXDEC LD A,'H' 






7P3F 


2B 


00520 


DEC HL /BACK UP 1 LOC 






7P40 


BE 


00530 


CP (HL) /H? 






7P41 


283D 


00540 


JR Z,HEX /YES, HEX-DEC CONVERT 






7P43 


CD497F 


00550 


CALL DECM /DEC-HEX CONVERT 






7P46 


C3BE7F 


00560 
00570 
00580 


JP BKMODE /TO SET BACKSPACE FLAG 

; 

/IV. DECIMAL STRING TO VALUE TO HEX STRING CONVERSION 






7P49 


23 


00590 


DECH INC HL /END OF DEC STRING-t-1 






7P4A 


E5 


0B6BB 


PUSH HL /SAVE IT 






7P4B 


B6B0 


BB61B 


LD B,0 /INITIALIZE CBAR COUNT 






7P4D 


CDEA7F 


BB620 


DECSRH CALL SRCH /POR NON 0-9 






7F50 


30FB 


00630 


JR NC, DECSRH ;0-9? YES, KEEP LOOKING 






7F52 


05 


00640 


DEC B zlST CHAR? 






7P53 


CADA7F 


00650 


JP Z, RESET /YES, RESET AND RETURN 






7P56 


Dl 


00660 


POP DE /LAST CHAR LOC+1 TO DE 






7F57 


AP 


0B67B 


XOR A 






7F58 


12 


00688 
00690 


LD (DE) ,A /PUT BYTE AT END OP 
/ STRING ON SCREEN 






7F59 


B4 


007BB 


INC B /RESTORE COUNT 






7P5A 


78 


B0710 


LD A,B /SAVE IT 






7F5B 


32C37F 


0B72B 


LD (BKSPCE+1),A 






7P5E 


23 


8B73B 


INC HL /FIRST 0-9 CHAR 






7F5F 


CD4F1E 


00740 


CALL 1E4FH /CONVERT TO VALUE IN DE 






7F62 


21FA7F 


00750 


LD HL,BUF /BUFFER 






7P65 


EB 


0076B 


EX DE,HL 






7F66 


0EB4 


B0770 


LD C,4 /DIGIT COUNT 






7P68 


B6B4 


007 80 


DIGIT LD B,4 /BIT COUNT 






7F6A 


AF 


00790 


XOR A /CLEAR A 






7P6B 


29 


00800 


SHFT ADD HL,HL /SHIFT HL 






7F6C 


17 


0B81B 


RLA /INTO A 






7P6D 


1BPC 


BB82B 


DJNZ SHFT /4 BITS WORTH 






7F6F 


C630 


BB83B 


ADD A, 48 /ADJ TO ASCII 0-9 

Program continues 











Continued from page 23 

then, ever released a program that was er- 
ror free and good (what a generality!). 
Look at Scripsit. It had more than a few 
coding faults but it is still, in my opinion, 
the best word processor bar one (Wordpro 
4+ on the Commodore is equally as sim- 
ple and as effective), and that includes 
WordStar, Magic Wand and Memorite III. 

And the Shack's fixes are to be taken 
always with a grain of salt. In many cases 
they either work half-heartedly, not at all, 
or lead the way to more fixes. It is almost a 
law (God forbid you wanted to use a serial 
printer with Scripsit and it did not conform 
to Radio Shack's conception of what a 
serial printer should be — and look at all 
the corrections that the accounting pro- 
grams gave rise to!) 

Your main problem, you see, was the 
salesperson who sold you the program 
and not the program itself (you seem to 
hint at that, but never come out and say it). 
In theory, when you buy software or hard- 
ware, your salesperson should be like 
your high school guidance counselor. 
With all your needs tucked neatly away in 
the frontal lobes, a salesperson worth his 
salt should be able to hunt and choose 
among the sea of software and give you a 
selection that fits your needs. If there are 
updates or errors to be corrected, your 
salesperson should also keep you in- 
formed. (Let's be brutally honest, no piece 
of software is ever totally bug-free or 
perfect, all of them go through a continual 
growth process and we all, equally, suffer 
and benefit from that growth.) 

Unfortunately, many of the times I find 
myself in a Radio Shack store, I do not see 
people consulting with the salespeople. 
Its more a case of "Oh, I will take that." 
Yes, not every salesperson in every store 
knows the computer products, but do not 
make the assumption that none of them 
do. If you cannot get to the one or ones 
that do immediately, make an appoint- 
men t for a la ter da te. Tha t small bit of pro- 
crastination can sometimes save a lot of 
heartache later on. And if a salesperson 
does mislead you (those little buggers can 
sometimes get over eager) or fails to do 
the things they should, then complain. 

The image of the Shack, like any com- 
puter store, is derived from its employees, 
their knowledge and their ability to assist 
a customer— would it surprise you if I told 
you I am the manager of a computer store 
in New York and that I will and have sent 
customers elsewhere when I know I can- 
not supply a product that will meet their 
specs? My customers still come back to 
me first when they need something. 

That is what it is all about in both soft- 
continued on page 26 
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WHY 



THE LATEST BLAST 
FROM BIG FIVE... 

DEFENSE 
COMMAND 



ALL GAMES '■ 

16K Level 2. Mod 1 + Mod 3 Cassette: S15.95 
32k Level 2. Mod i + Mod 3 Diskette: $19.95 
10% discount lor 2 games. 15% lor 3 or more 
Games may De played with or without joystick. / 



IS THE ALPHA JOYSTICK 
SUCH A SUCCESS ? 



Because of games like these. 




DEFENSE 
COMMAND 






Big Five has done it again! Now the most popular 
arcade game of all time has a fascinating new twist. 
The Invaders are back! You are alone, valiantly 
defending the all important nuclear fuel cannister 
stockpile from a convoy of thieving aliens who 
repeatedly break off and attack in precision forma- 
tions. An alien passes your guard, swiftly snatching 
up a cannister and flying straight off. Quick! you 
have one last chance to blast him out of the sky. 
Great action and sound! 



BEST 

.SELLER^ 



BEST 
SELLER 



SCARFMAN 

THE LATEST ARCADE CRAZE now runs on your 

TRS-80. 

It's eat or be eaten. You control Scarfman around 

the maze, gobbing up everything in your path. You 

attempt to eat it all before the monsters devour you. 

Difficulty increases as game progresses. Excellent 

high speed machine language action game. From 

The Cornsoft Group. With sound 

CAUTION: Played with the Alpha Joystick, Scarfman 

may become addictive. 



* #/ A 



SUPER NOVA 



Asteroids float ominously around the 
screen You must destroy tne asteroids 
oeiore they destroy you' (Big asteroids 
Dreak into little ones ) Your ship will 
respond to tnrust. rotate, nyperspace 
and lire Watch out lor mat saucer witn 
tne laser' As reviewed in May t98t Byte 
Magazine 



LUNAR LANDER 

As a vast panorama moonscape scrolls 
oy select one ol many landing sights 
Tne more perilous tne spot, the more 
points scored — il you can land safely 
You control l EM mam engines and side 
mrusters Aosoiuieiy tne Best use ol 
TRS-80 graphics we nave ever seen' 
From Adventure International With 
sound 



ATTACK FORCE* 



As your snip appears on tne oottom ol 
tne maze, eight alien ships appear on me 
top. all traveling directly at you' You 
move toward ihem and lire missiles But 
tne more aliens you destroy, the laster 
tne remaining ones become II you gel 
too good you must endure tne "Flag- 
ship" With sound ellects' 




COSMIC FIGHTER 

Your snip comes out ol nyperspace 
under a convoy ol aliens You destroy 
every one But another set appears 
These seem more intelligent. You 
eliminate inem, too Your luel supply is 
diminishing You must destroy two more 
sets before you can dock The space 
station is now on your scanner... Willi 
sound! 



Q 

MM, 



METEOR MISSION II s 

As you look down on your view, 
astronauts cry out lor rescue You must 
maneuver through tne asteroids & 
meteors (Can you gel oack to tne space 
station') Fire lasers to destroy tne 
asteroids, but watcn out. mere couio oe 
an alien FLAGSHIP lurking includes 
sound ellects' 



THE ALPHA JOYSTICK: <*£_ 
REAL ARCADE ACTION *Sf? 




DFeatures the famous ATARI JOYSTICK 
DWorks with any Level II or disk system 
DPIugs directly into KB or E/l (next to printer port) 
DCompatible with any other TRS-80 accessories 
□Saves your keyboard 

DFun to experiment in BASIC. Simply use A = INP(0) 
to read the joystick 
□ Fully assembled, ready to plug in and use. 

Price includes Atari Joystick + Alpha Interface + 
instructions + demo program. The Alpha Joystick 
is backed by an unconditional money back 
guarantee. If you are not delighted with it. return it 
within 14 days for a prompt and courteous refund. 




MODEL III 
JOYSTICK 

ONLY 

$49.95 



i Mouei i 
veision 
shown i 



Mb ALPHA Products 



85-71 79th Street, Woodhaven. NY. 11421 



(212)296-5916 



Toll Free 

Order Line 

800-221-0916 

Hours: 9AM-5PM, E.S.T. 
For Info Call (212) 296-5916 

ADO $2 00 PtH OMH-K I OR SHIPPING AMD HANOI iNG 
Wf. ACCEPT VISA MASIhR CHARGE CHECKS Mil 
COO ADO $3 00 E X I R A 4Mfe 

QUANTITY BlSCOUNIS AVAILABLE Mtf«£^_ 
NY RESIDENTS ADO SAl FS TAX - ■ visa ' 

OVtRSfcAS ORDERS ADO 10% I — 



SO INPUT 



SO DEBUg 


















Program continued 












7F71 FE3A 


00840 


CP 


58 


;A-F RANGE? 






7F73 3802 


00850 


JR 


C, STORE 


;NO, STORE IT 






7F75 C6B7 


00860 


ADD 


A, 7 


;YES, ADJ ASCII A-F 






7F77 12 


0087B STORE 


LD 


(DE),A 


; PLACE HEX DIGIT IN BUF 






7P78 13 


00880 


INC 


DE 


;BUHP BUF POINTER 






7F79 0D 


00890 


DEC 


C 


,-DONE WITH 4 DIGITS? 






7F7A 2BEC 


00900 


JR 


NZ, DIGIT 


j NO, GET ANOTHER 






7F7C 3E48 


0B910 


LD 


A, 'H' 


;ADD H ON THE END 






7F7E 12 


BB92B 


LD 


(DE),A 


;TO BUFFER 






7F7F C9 


00930 
00940 ; 


RET 












00950 ;V. HEX 


STRING 


TO VALUE TO DECIHAL STRING CONVERSION 






7FB0 B6BB 


00960 HEX 


LD 


B,0 


;INTIALIZE CHAR COUNT 






7F82 CDEA7F 


0B970 HXSRCH 


CALL 


SRCH 


j SEARCH FOR 0-9 CHAR 






7FB5 3BFB 


00980 


JR 


NC, HXSRCH 








7F87 FE47 


0099B 


CP 


•G' 


; GREATER THAN F? 






7P89 3004 


B1BB0 


JR 


NC, NOHEX 


;YES, NOT HEX CHAR 






7F8B FE41 


01010 


CP 


'A' 


; GREATER THAN A? 






7F8D 3BP3 
CH 
7F8F B5 


01020 


JR 


NC, HXSRCH 


;YES, HEX: CONTINUE SEAR 






01030 NOHEX 


DEC 


B 


;1ST CHAR NON HEX? 






7F98 2848 


01040 


JR 


Z, RESET 


;YES, RESET AND RETURN 






7P92 04 


0105B 


INC 


B 


; RESTORE COUNT 






7P93 04 


01060 


INC 


B 


; ACCOUNT FOR H CHAR 






7F94 78 


01 07B 


LD 


A,B 


;SAVE IT 






7P95 32C37P 


01B8B 


LD 


(BKSPCE+1) ,A 








7F98 11000B 


81090 


LD 


DE,B 








7P9B EB 


01100 


EX 


DE,HL 


;HL=0:DE=SCKEEN LOC-1 






7F9C 13 


B111B NEXT 


INC 


DE 


/BUMP SCREEN POINTER 






7P9D 1A 


01120 


LD 


A,(DE) 


;GET CHAR IN A 






7F9E FE48 


01130 


CP 


'H' 


;H? 






7PA0 2810 


01140 


JR 


Z,DECML 


;VES, END OF STRING 






7PA2 29 


01150 


ADD 


HL,HL 


; SHIFT HL LEFT 4 BITS 






7PA3 29 


01160 


ADD 


HL,HL 








7FA4 29 


01170 


ADD 


HL,HL 








7PA5 29 


01180 


ADD 


HL,HL 








7PA6 FE3A 


01190 


CP 


■9'+i 


; GREATER THAN 9? 






7PA8 3002 


01200 


JR 


NC,LTR 


7 YES, A-P 






7PAA C607 


01210 


ADD 


A, 7 


;N0, 0-9 






7PAC D637 


01220 LTR 


SUB 


55 


7 ADJUST TO REAL VALUE 






7FAE B5 


01230 


OR 


L 


;HERGE A AND L INTO A 






7FAr 6F 


01240 


LD 


L,A 


; MERGED VALUE BACK TO L 






7FB0 18EA 


01250 


JR 


NEXT 


;LOOP FOR ANOTHER DIGIT 






7PB2 010000 


01260 DECHL 


LD 


BC,0 


; MAKES ROM WORK BETTER 






7PB5 222141 


01270 


LD 


(4121H) ,HL 


; INTEGER WORK AREA 






7FB8 21FA7P 


01280 


LD 


HL,BUF 


; START OP BUFPER 






7PBB CD2P13 
EC 

ER 


01290 


CALL 


132FH 


;ROM COVERTS VALUE TO D 






01300 






; STRING, STORE IN BUFF 






01310 ; 














01320 ;VI. AUTO BACKSPACE GENERATOR 








7FBE AF 


01330 BKMODE 


XOR 


A 


;SET FLAG TO BACKSPACE 






7PBF 32187F 


01340 


LD 


(HODE+1) ,A 








7FC2 3B00 


01350 BKSPCE 


LD 


A, 8 


;MODIFIED BY PROGKAH 






7PC4 3D 


01360 


DEC 


A 


;SET CONDITION FLAGS 






7PC5 32C37F 


01370 


LD 


(BKSPCE+1) ,A 


; RESET BACKSPACE COUNT 






7PC8 3E08 


01380 


LD 


A, 8 


BACKSPACE CHAR 






7FCA C0 
S 


01390 


RET 


NZ 


.•RETURN BACKSPACE UNLES 






01400 






; COUNT IS 






7FCB 3E01 


01410 CHRFLG 


LD 


A,l 


/SET FLAG TO PRINT 






7FCD 32187F 


01420 
01430 ; 


LD 


(HODE+1) ,A 


; CONVERTED CHAR'S 








01440 ;VII. AUTO CONVERTED CHARACTER 


GENERATOR 






7PD0 21FA7F 


814 5fl BUPPTR 


LD 


HL,BUF 


; MODIFIED BY PROGRAM 






7PD3 7E 


B1460 


LD 


A,(HL) 


;GET BUF CHAR IN A 






7PD4 B7 


01478 


OR 


A 


; CHECK FOR BYTE 






7FD5 23 


B14 8B 


INC 


HL 


; UPDATE BUF POINTER 






7FD6 22D17F 


01490 


LD 


(BUPPTR+1) ,HL 


;SAVE IT 






7PD9 CB 


01500 
01510 
01520 ; 


RET 


NZ 


,- RETURN BUF CHAR IF 
,- NOT AT END OF BUP 








8153B ;V1II. 


RESET TO REGULAR MODE ROUTINE 






7PDA 21FA7F 


B154B RESET 


LD 


HL,BUF 


; RESET BUF PTR 






7FDD 31DD7P 


B155B STKPTR 

B1560 

01570 


LD 


SP,$ 


/MODIFIED BY PROGRAH. 
; FIX STACK FROM 
; JP'S FROM SUB'S 






7PE0 22D17F 


01580 


LD 


(BUFPTR+1) ,HL 








7PE3 3E02 


01590 


LD 


A, 2 


; RESET MODE FLAG 






7FE5 32187P 


01600 


LD 


(HODE+1) ,A 








7PE8 AP 


01610 


XOR 


A 


/RETURN NULL CHAR 






7PE9 C9 


01620 
01630 ; 


RET 












01640 ;IX. BACKWARD 


ASCII 0-9 SEARCH 


SUBROUTINE 














Program continues 











Continued from page 24 

ware and hardware, potential, price, per- 
formance and support; Profile excels in all 
of these areas (witness the enhanced ver- 
sion for the Model II). Yes, the problems 
with it limit its performance under certain 
conditions, the solution is not to exceed 
its limits. Unfortunately, without the help 
of someone who knows what those limits 
are, that is almost impossible. 

I apologize if I gave the impression that 
Profile was the greatest thing to walk the 
earth since Chivas Regal. It was meant in 
the context it was stated in, i.e. in 
reference to the Shack and the programs 
it had brought out before that and in com- 
parison to Microfiles. But do not give up 
on Profile, give up on the person who told 
you to buy it for your application. 

And not backing up your data! Xerox 
made a fortune on copy machines be- 
cause everyone indulged in the paranoia 
of lost information! On so fragile a media 
as a disk I would assume that no technical 
bulletin was necessary. 

My comments on Profile were centered 
on its flexibility and the amazing ability it 
has shown to be used/ Something lacking 
in many of the previous Radio Shack pro- 
grams. So, I allow you your disdain, since 
it does fit your application. But I also 
allow my surprise and enthusiam at such 
an enlightened program finding its way 
out of the Shack. 

Bill O'Brien 
New York, NY 



The following is an open letter to Ed 
Juge of Radio Shack. 



TRSDOS Manual Useless 

I am sitting in front of one of your Model 
III machines with dual disk drives. I have 
your TRSDOS manual open on my lap. I 
have just saved a Basic program, follow- 
ing your manual's directions. Now, I have 
tried to load it, I have tried to run it . . . but 
all I get is "Direct Statement in File". 

Swell— but what does that mean? What 
can I do about it? How did it happen? How 
can I keep it from happening again? What 
is the status of my program? How can I 
get at my program to find out? As you pro- 
bably know, there is not one single word in 
your manual to answer any of these valid 
questions nor is there any information 
about any of the 40 other error messages 
(except a list). 

You constantly proclaim the sincere 



Continued on page 28 
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NOW MODEL I AND MODEL 111 ! 



Now Model III users can take advantage of the ALPHA I/O system too. Our new 
MOD III/I BUS CONVERTER allows most port based Model I accessories (such as 
our ANALOG-80, INTERFACER 2 and. INTERFACER-80) to connect to the Model III 
bus. MOD III/I BUS CONVERTER, complete with all connectors, only $39.95. 





2 Printers? 



PRINTSWITCH 

Have 2 printers on line al all limes and select printer 1 or 
2 by means ol a conveniently located switch. End the problem 
ot constantly plugging and unplugging printer cables PRINT- 
SWITCH is a compact module that plugs onto the parellel printer 
port ol your TRS-80 and provides an edge connector tor each 
of your two printers It works with any two types ol printers: 
dot matrix, daisy wheel, plotters. TRS-80 convened selectrics. 
etc. Assembled, tested, ready to use with connector and in- 
structions. For Model I or ill (please specify). ONLY . . S59.00 




@HD 34PH.42- ra ra 

©ED 34Pm.s4- ra \p ra ra 

OOD 34Pm.2fL C> 

©fZD 34Pfn.4R D= 

© S 40 Pin, 2 Of 4 n. D 3 



SUPERIOR QUALITY REPLACEMENT & EXTENSION CABLES 
Highest quality cable and high lorce. gold plated contacts 

ensure the utmost in connection reliability 

O KEYBOARD TO EXPANSION INTERFACE . . S21 

@ DISK DRIVE CABLE FOR 1 OR 2 DRIVES S32. 

© DISK DRIVE CABLE FOR 3 OR 4 DRIVES . S45 

© DISK DRIVE CABLE EXTENDER S22 

© PRINTER CABLE EXTENDER $24 

©40 PIN BUS EXTENDER -2 ft S22 411. ..$24. 
Custom cable configurations are also available. Call us 




YOU ASKED FOR IT. EXPANOABUS XI. X2. X3 AND X4 
CONNECT ALL YOUR TRS-80 DEVICES SIMULTANEOUSLY 
on the 40 pin TRS-80 bus Any device that normally plugs 
into the keyboard edge connector will also plug into the 
EXPANOABUS' . The X4" is snown with protective 
covers (included) Tne TRS-80 keyboard contains ihe bus 
drivers (74LS367) lor up to 20 devices more man you win 
ever need Using the E/i. it plugs either between KB and in 
or m the Screen Printer port Professional quality gold 
plated contacts Computer grade 40 conductor riooon cable 
X2 $29 X3...S44. X4 $59 X5 $74 

Custom conliourations are also available call us 




ANALOG-80 A WORLD OF NEW APPLICATIONS POSSIBLE 
8 DlGHAl MULTIMETERS PLUGGED INTO YOUR TRS-80" 1 
Measure Temperature Voltage Current Light. Pressure, etc 
Very easy 10 use lor example let s read input channel »4 10 
OU' -i Selects input M and also starts the conversion 20 
A iNPi'Ji Puis tne result m variable A Vona' 
Specifications input range 0-5V 10 500V Eacn cnannei 
can be set to a different scale 

Resolution 20mv<onSV rangei Accuracy 8 oust 5%) Port 
Address lumper selectable Plugs into keyboard bus or E/i 
1 screen printer port) Assembled and tested 90 day warranty 
.Complete with power supply connector manual S'39 



'SPECIAL THIS MONTH: 

MB 




DISK DRIVE EXTENDER CABLE. FREE YOUR MINI-DRIVES. 

End ihe daisy-chain mess once and lor ail Fits all mini- 
drives: Percom, Aerocomp. Shugart. Micropolis, MTI. Vista. 
Pertec, Siemens. BASF East to install, just remove the drive 
cover, plug in Ihe EXTENOER CABLE and replace the cover. 

Now you can change and move your drives without dis- 
assembly Keep the cover on and the dust out High reliability 
gold plated contacts, computer grade 34 conductor cable. 
Tested and guaranteed 

Get one for each drive ONLY $8 95 




TIMEDATE 80 REAL-TIME CLOCK/CALENDAR MODULE 

Keeps quart; accurate time loi 3 years on 2 replaceable 
AAA batiencs mot included) Gives MO'DATE/YR DAY ot 
WEEK. MR MIN SEC and AM/PM Features INTELLIGENI 
CALENDAR and even provides lor leap Yea> This compact 
module Simply plugs into iear of Keyboard or side ol 
Expansion interlace (may be slipped inside E'ti includes 
cassette software lor setting clock and patching to any DOS 
(including NEWDOS 80 2 0) Optional Y connector allows 
for further expansion For Model 1 Fully assembled and 
tested Complete witn instructions and cassette ONI v 
Y 



j power 



t 



relays undei 

your 






■ 



c 
o 

? 

o 



INTERFACER-80: tne most powerlui Sense/Control module 
• 8 industrial grade relays single pole double throw isolated 
contacts 2 Amp t& 1 25 Volts TIL latched outputs are also 
accessible 10 drive external solid slate relays 
•8 convenient LEOs constantly display ihe relay stales 
Simple OUT' commands (in basic) control me 8 relays 
.8 optically-isolated inputs lor easy ducci interfacing 10 
external switches photocells, keypads, sensors etc 
Simple INP" commands read the status ol tne 8 inputs 
Selectable port address Clean, compact enclosed design 
Assembled, tested 90 days warranty Price includes oower 
supply cable connector superb user s manual S159 



GREEN SCREEN 

WARNING 

IBM and all the ' biggies aie using green screen monitors 

its advantages are now widely advertised we teei mat every 

TRS-80 user should enioy the benelits it provides But 

WARNING: at 1 Green Screens are not created equal Here is 

what we found 

•Several are |ust a flat piece of standard colored lucne The 

green tint was not made lor this purpose and is iudged by 

many to be too dark Increasing the brightness control will 

result in a fuzzy display 

♦Some are simply a piece of thin plastic him taped onto a 

cardboard Irame The color is satisfactory but Ihe wobbly film 

gives it a poor appearance 

•One ' optical liiter' ' is in laci plain acrylic sneeimg 

•False claim A tew pretend to reduce glare in lact then 

flat and shiny surfaces (both lilm and Lucne type) AOD their 

own reflections to ihe screen 

•A lew laughs One ad claims to "reduce screen contrast 

Sorry gentleman but it's |ust me opposite One ot the Green 

Screen's major benefits is to increase the contrast between 

the text and the background 

•Drawbacks Most are using adnesivc strips to fasten their 

screen to the monitor This method makes it awkward to 

remove lor necessary periodical cleaning All (except ours) 

are flat Light pens will noi work reliably because ol the big 

gap between the screen and the lube 

Many companies have been manufacturing video tillers lor 

years . We are not the hrst (some think they are 1 . out we nave 

done our homework and we think we manulacture the best 

Green Screen Here is why 

•11 fits right onto the picture tube like a skm because it is the 

only CURVEO screen MOLDED exactly to Ihe picture tube 

curvature it is Cut precisely to cover the exposed area of the 

picture tube The fil is sucn mat the sialic electricity is 

sufficient to keep it in place' We also include some invisible 

reusable tape lor a more secure fastening 

•The filter material that we use is |ust right, not 100 dark nor 

too light The result is a really eye pleasing display 

We are so sure that you will never lake your Green screen off 

that we offer an unconditional money-back guaraniy try our 

Green Screen lor 14 days II lot any reason you are not 

delighted with it return it lor a prompt retund 

A last word We think mat companies like ours who are 

selling mainly by mail should 'adst Iheir sireel address»have a 

phone number (for questions and ordershaccepi CODs. not 

every one likes to send checks 10 a PO box»olfer tne 

convenience ol charging their purchase to maior credit cards 

How come we are the only green screen people doing it' 

Order your ALPHA GREEN SCREEN today SI 2 50 



,^m ALPHA Products 



AOO S? Si) PER ORDER FOR SHIPPING AND HANDLING 

ALL ORDERS SHIPPED FIRST CLASS MAIL 

WE ACCEPT VISA MASTER CHARGE CHECKS MO 

COD AOO S? 00 EXTRA 

OUANTITY DISCOUNTS AVAILABLE *■ 

N Y RES10ENTS AOO SALES TAX Hi 



85-71 79 St.WOODHAVEN N.Y. 11421 



® Info and order: (212)296»5916 



SO INPUT 



SO DEBUg 



Program continued 










7PEA 


04 


B165B 


SRCH 


INC 


B 


;BUHP CHAR COUNT 


7PEB 


2B 


B1668 




DEC 


BL 


;DEC SCREEN POINTER 


7PBc 


X1PP3B 


B167B 




LD 


DE.3BPFH 


;1ST SCREEN LOC-1 


7PEP 


DP 


B168B 




RST 


18U 


; COMPARE HL-DE 


7PF0 

1 
7PP2 


38E8 


01690 




JR 


C, RESET 


;EXIT IP BEYOND SCREEN- 


7E 


B17B0 




LD 


A,(HL) 


SCREEN CHAR INTO A 


7FF3 


FE3A 


B171B 




CP 


'9'+l 


/GREATER THAN 97 


7PP5 


3P 


B172B 




CCP 






7FF6 


D8 


B173B 




RET 


C 


;YES, RET W/ CARRY 


7PP7 


FE3B 


01740 




CP 


■0' 


;LESS THAN 0? 


7FP9 


C9 


01750 
01760 


; 


RET 




;0-97 NO, RET W/ CARRY 






01770 


|X. 


BUFFER POR 


HEX AND DEC 


STRINGS 


0005 




01780 


BUP 


DEPS 


5 


; SPACE FOR 5 DIGITS 


7PPP 


BB 


01790 




DEPB 





; TERMINATE WITH BYTE 


7PB8 




01800 




END 


INTLZE 




0B0BB TOTAL 


ERRORS 











The program listing that accompanied the article, "Micro Puzzle 
Box," was incorrect as printed in our January issue. Here is the 
correct listing.— Eds. 

5 ' 'RUN 50000' TO SKIP INSTRUCTIONS AND HEADER 

10 CLS:GOTO 25000 

10000 ' DISPLAY A(3,3)<15-PUZZLE> 

10010 ' 0=BLANK SPC 

10020 CLS 

10030 FOR 1=0 TO 3 

10040 FOR J=0 TO 3 

10045 IF A(I,J)=0 THEN 10100 

10090 PRINT9I*6+J*3*64,DRS;A(I,J)j 

10100 NEXT J,I 

10110 RETURN 

15000 ' CHECK FOR VICTORY ! I 1 

15010 FOR 1=0 TO 3: FOR J=0 TO 3 

15020 IF A(I,J)OB(I,J) THEN RETURN 

15030 NEXT J, I 

15040 PRINT@32+64,"YOU GOT IT 1 I !"; 

15050 PRINT932+128,"WITH ";MO;" MOVES."; 

15060 PRINT932+192, "PRESS ANY KEY TO RESTART:"; 

15070 IF INKEYS="" THEN 15070 ELSE 5000B 

20000 ' INIT A(3,3) B(3,3) 

20005 DIM A{3,3) ,B(3,3) 

20010 FOR 1=0 TO 3:FOR J=0 TO 3 :B( I , J) -J"4+I+l : A( I , J) =B( I , J) : NEXT J,I 

20020 B(3,3)=0:A(3,3)-0 

20025 XM=3:YM=3 

20027 GOSUB 10000 

20030 ' MAKE 100 MOVES, INCREASE LOOP SIZE TO IMPROVE SCRAMBLING 

20040 FOR 1=1 TO 100 

20050 XD=0:YD=O 

20060 IF RND(2)=1 THEN XD=RND( 2) *2-3 ELSE YD=RND(2) *2-3 

20070 IF XD+XM<0 OR XD+XM>3 OR YD+YM<0 OR YD+YM>3 THEN 20050 

20080 A(XM,YH)=A(XD+XM,YD+YK) :A(XD+XM, YD+YM) =0 

20082 PRINT@XM*6+YM*64*3,DRS;A(XM,YM) ; 

20083 XM»XD+XM:YM=YD+YM 

20084 PRINT9XM*6+YM*64*3,CLS; 

20085 PRINT832.I; 
20090 NEXT I 
20100 RETURN 

25000 CLEAR 10O0:DEFINT A-Z:CLS: PRINT" 15 PUZZLE" : PRINT" 

BY DAVID MOEWS" 
25010 INPUT* DO YOU WANT INSTRUCTIONS (Y/N)";YNS 

25015 YNS=LEFTS(YNS,1) 
25020 IF YNS="N" THEN RUN 50000 
25025 IF YN$<>"Y" THEN 25010 
25030 PRINT'THE 15 PUZZLE IS MADE UP OF 15 BLOCKS (NUMBERED 1 THROUGH 15) " 

25035 PRINT'AND 1 EMPTY SPACE" 

25040 PRINT" IN A 4 X 4 FRAME. THE PUZZLE STARTS OUT IN A REGULAR" 

25050 PRINT'CONFIGURATION, THEN IT IS SCRAMBLED UP BY THE " 

25060 PRINT'COMPUTER. YOUR OBJECT IS TO UNSCRAMBLE THE" 

25070 PRINT'PATTERN TO ITS ORIGINAL CONFIGURATION." 

25080 PRINT'PRESS ANY KEY TO CONTINUE:" 

25090 AS=INKEYS:IF A$="" THEN 25090 

25100 CLS:GOSUB 60000 

25110 FOR 1=0 TO 3:FOR J=0 TO 3: A( I , J) =I+1+J*4:NEXT J, I 

25115 A(3,3)=0 

25120 GOSUB 10000 

Program continues 



Continued from page 26 

desire of Tandy to communicate with your 
customers. The most necessary form of 
communication for me is to know how to 
use the equipment you sell. For my money 
(which you now have), you have failed 
miserably with your TRSDOS manual. 
Your lack of any information about the 41 
errors is far overshadowed by the presen- 
tation of the main text. 

The hopeful (but quickly frustrated) 
user is told in detail about the syntax of all 
the commands available without the 
slightest hint on how these commands 
are used. For example, ATTRIB allows us 
to make files "invisible" while DIR lets us 
display them. Would I be prying into Tan- 
dy Corporations secrets if I ask what is the 
purpose of an "invisible" file? Is it really 
"invisible" if DIR can call it up? How do I 
use this feature in my programs? 

To a neophyte disk-owner, your manual 
is as useful as would be a spelling dic- 
tionary to a neophyte novelist— lots of 
words without any hint of meaning. After 
all the TRSDOS versions, why isn't there 
something like a "Getting Started With 
TRSDOS" so that I could use all my hard- 
ware? 

Nate Salsbury 
New Bern, NC 

Radio Shack Replies 

We do want to communicate with our 
customers. We try very hard to do just 
that, but we are human and make mis- 
takes. The fact that we did not include ex- 
planations of error codes listed for Model 
III TRSDOS and Disk Basic is unthinkable. 
We did miss it and we are now working to 
correct it. Thank you for bringing it to our 
attention. (In case you have not yet re- 
ceived an answer to the "Direct Statement 
in File" error, that means a command is 
contained in the file without program line 
numbers preceding it. It should not hap- 
pen if you are writing a program in Basic 
and saving it to disk. Where it most fre- 
quently occurs is using Scripsit to write 
your Basic program and forgetting to 
number a line or adding a direct command 
at the end of the file.) 

I cannot fully agree with your other ob- 
jections. We do include examples and 
sample uses. The specific example you 
mention was not covered because we 
thought it fairly obvious that an 
"invisible" file is one that is not normally 
"visible". How do you view file names? 
You list them using DIR— if you want to 
see the invisible files too, use DIR(INV). 

Continued on page 29 
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Continued from page 28 

The overall purpose was to enable you to 
unclutter the directory screen, yet let you 
see all files when you need or want to. 

We will look into your suggestion for a 
simple, comprehensive book covering 
TRSDOS. In the meantime, when you have 



questions like these, give your local Radio 
Shack store a call. They have an expanded 
computer department and should be able 
to answer almost any question you have. 
Also, remember that Computer Customer 
Services (1-800-433-1679) is available to 
you from 8 am to 5 pm central time to 



SO MBUg 



Program continued 

2513B PRINT§37,"THE PUZ2LE STARTS OFF" ; :PRINT864+32, "LIKE THIS. THE COMPUTE 

R"; 

25140 PRINT6128+32, "SCRAMBLES IT AROUND"; 

25159 PRINTei92+32,-LIKE THIS:"; 

25168 PRINT8256+32,"<PRESS ANY KEY TO CONTINUE)"; 

25165 IF INKEYS-" THEN 25165 

25170 XM=3:YM«3: GOSUB 2B040 

25180 PRINT«2,"THEN YOU MOVE BLOCKS";CHRS(30) ; 

25190 PRINT364+32, "AROUND IN THE PUZZLE BY PRESSING" ;: PRINT9128+32 , "THE ARR 

OW KEYS.";CHRS(30); 

25200 PRINTpl92+32,-FOR EXAMPLE, IF YOU PRESSED THE"; 

25210 XD-0:YD— l:STS-"DOWN":SlS-CHRS(92) :S2S-"ABOVE" 

25220 IF YM-0 THEN XD-0: YD-1 :ST$-"UP" :S1$«CHR$(91) : S2$«"BELOW" 

25230 PRINTe256+32,STS;" ARROW KEY";CHR$(38) ; ■ (";S1S;")'; 

25260 PRINTe64«5+32,"THE BLOCK ";S2S;" THE"; 

25265 PRINTe64»6+32,STRING$(10,32);STRING$(LEN(S2$) ,131); 

25270 PRINT§64*7+32, "EMPTY SPACE WOULD HOVE ";STS; 

25280 PRINTg64»8+32,"LIKE THIS:"; 

25290 PRINT@64*9+32,"<PRESS ANY KEY TO CONTINUE)"; 

25300 IF INKEYS-"" THEN FOR 1=1 TO 30:NEXT:PRINT§256+32+12+LEN(ST$) , " ";:FO 

R 1-1 TO 30:NEXT:PRINTe256+32+12+LEN(STS) ,S1S;:G0T0 25300 

25310 A»XD+XM:B-YD+YM:M»XM:N=YM: GOSUB 30000 

25320 PRINT@64*9+32,CHRS(30) ; : PRINT@256+32+12+LEN(ST$) ,S1$; 

25330 PRINT|64*9+32,"THE OTHER ARROW KEYS FUNCTION"; 

25340 PRINT§64U0+32,"IN A SIMILIAR WAY."; 

25350 PRINT§64"11+32,STRING$(13,32);CHR$(91);* UP"; 

25360 PRINT@64«12+32,"LEFT " ;CHRS(93) ;STRINGS(15 ,32) ;CHRS( 94 ) ; " RIGHT"; 

25370 PRINTe64*13+32,STRINGS(13,32);CHRS(92);" DOWN"; 

25380 PRINT864*15+32,"<PRESS ANY KEY FOR THE GAME>"; 

25390 IF INKEYS="" THEN 25390 ELSE RUN 50000 

30000 ' MOVE <A,B> INTO <M,N> - EHPTY 

30010 ' DO NOTHING IF IMPOSSIBLE 

30015 L-0 

30020 IF A<0 OR A>3 OR B<0 OR B>3 THEN RETURN 

30030 IF ABS(A-M)>1 OR ABS(B-N)>1 THEN RETURN 

30040 IF ABS(A-M)»1 AND ABS(B-N)-1 THEN RETURN 

30050 IF A-H AND B-N THEN RETURN 

30060 A(M,N)-A(A,B) :A(A,B)=0 

30070 L=-l 

30150 PRINT@A*6+B*3"64,CL$; 

30160 PRINT@M»6+N"3"64,DR$;A(M,N) ; 

30163 MO-MO+1 

30165 GOSUB 15000 

30170 RETURN 

40000 • KEEP TRACK 

40010 TI!-TI1+1:PRINT@32,"TIME: " ;TI 1 ; "MOVES: ";MO; 

40020 A$«INKEY$:IF AS-"* GOTO 40010 

40030 XD»0:YD-0 

40040 IF AS«CHRS(91) THEN YD-1 

40050 IF AS=CHRS(10) THEN YD— 1 

40060 IF A$»CHR$(8) THEN XD=1 

40070 IF AS-CHRS(9) THEN XD— 1 

40080 A=XM+XD:B=YM+YD 

40090 M=XM:N=YM 

40100 GOSUB 30000 

40190 IF L THEN XM=A:YM-B 

40200 GOTO 40000 

50000 ' DO IT1 

50002 CLS 

50003 CLEAR 1000:DEFINT A-Z 
50005 GOSUB 60000 

50010 GOSUB 20000 

50020 MO=0:TIi=0 

50060 GOTO 40000 

60000 ' INIT STRINGS 

60020 LNS-STRINGS(6,24)+CHRS(26) 

60030 L1S»CHRS(151)+STRINGS(4,131)+CHRS(171) 

60040 L2S-CHRS(149)+STRINGS(4,32)+CHR$(170) 

60050 L3$=CHR$(181)+STRING$(4,176)+CHRS(186) 

60060 DRS-L1S+LNS+L2S+LNS+L3S+STRINGS(5,24)+CHRS(27) 

60070 CSS=STRINGS(6,32)+LNS 

60080 CLS«CS$+CSS+CSS 

60090 L1S-"":L2$="":L3$-"":LN$-'":CS$-"" 

60100 RETURN 



answer computer related questions. 

I hope that this information helps, but if 
not, don't hesitate to let me know. 

BUI Walters, 

Consumer Information Manager 

Tandy/Radio Shack 

Fort Worth, TX 

NEC Spinwriter 5530 

Wayne Mueller's article "A Driven 
Printer" (80 Microcomputing, November 
1981) presents a software solution to a 
common printer interface problem — the 
generation of automatic line feeds after 
carriage returns. However, for the specific 
printer he is working with, the NEC spin- 
writer 5530, a special driver is not nec- 
essary. 

I have successfully used a Spinwriter 
for almost a year without special soft- 
ware. This is possible because much of 
the Spinwriter's behavior is determined by 
32 internal switches. For example, line 
feeds are automatically generated after 
carriage returns when switch 3 (number 
two on the PC board marked G9BNB) is 
turned off. Other switches determine de- 
fault character spacing, buffer size, and 
response to special characters. While 
these switches are not easily accessible, 
you need set them only once. 

New purchasers should ask their Spin- 
writer dealer to set the switches. Make 
sure you receive a copy of the NEC "Spin- 
writer Model 5530 Product Description," 
which describes the functions of the inter- 
nal switches. 

Mr. Mueller's program also solves some 
special problems arising with particular 
programs. However for those people who 
only need automatic line feeds, these 
switches provide an easy solution. 

Steven J. Zeil 

University of Massachusetts 

Amherst, MA 

Quit 

In regard to the article "In Command" 
(80 Microcomputing, November 1981), 
there is a much easier way to keep your 
variables from being cleared than using 
On Error GOTO. 

If you exit the Edit mode using the Q 
command no variables are cleared; of 
course, no changes are made in the line. 
This works whether you enter Edit or the 
computer automatically enters Edit after 
a syntax error. 

David E. Martin 
Kokomo, IN 



80 Microcomputing, March 1982 • 29 



eHHHHi 



C 
O 

I 

O 

CD 
CO 

cd 

JZ 
o 

c 



to >>,*; 
s3b 



>N 03 



■o "i= 
2 S 



03- 



• T3 03 t= 



0} CO 

§ A 

2 -a 



6* 



ilf 



;= _ ;= 7=k o 



• c a s? 



-° 2 



£ I 



2 fb. 

t» 03 



™ J! O c • E 



er x O T3 



CD 

o 

Q. 

o 

c 
o 

o 

> 



X 

CD 

3 
CL 

E 

o 

o 

z 



E 

0? to©® 



E| 



«* SI 

u n ^ 
a. c 

Q> Q] (Q 
O) to <= 



~S 

S2 

s.~ 

2 "° 
S 

a. <2 

ii 

c_> <= 

8 9- 

•o E 

3 O 



5 25 



"2 ■» a 
s **» ^ 

ro 2-2 
■aw 

<=rc a. 



o to 2 )=* 



III 



— o 

2^ 



0} CD 

> SZ 

v C » 
1?1 

J,o| 

05 S = 
C Q- 

ro0 _ 

8 2 S.^ 

o a> © * 

2"! »S3 
£€.52- 

ro 

x 

S 2 • k 

e£ Ea 

o * co ^ 
x; ca £ 2 
— o 
a> a. 



CD 



c „ -. 

r n tt 

5=§2 

CO c/ * 

a 



. . o_ fe ro 

csj E g H- 
.0*0, 

i «_ e 

« t- 2 . 

03 O O 
"O 8 S £ 

ro »_ ^ <=> 

£ J22< 

2 c — > 

x ° — «* 



= 3 ° 2 

fzi o 



T 
O 



3^ 

_ __ X 5 
2 — to *- 

C — 111 (7 



to -* 

■= c en 

i-sl 

g-g2 
|-£ 2 



2 x ;=• 8 8 .E 



03 




cS 6^ 
















5. 












03 






i & i 


"O X3 


= ai 




cc <S ! 








c ^ 








sN : 




■j»« i— 


O O i 


Q O \ 




2 :> 1 


5 o. 












E ,« 


2 i2 








.<2 oj 


"^ = 


a? 




H- O 




2 d 






•A & 1 








T3 4- 


« < 




"° 1 










O 33 













CO 



* 



< 



I 



±2 O. 
^ 2- 



S 2 

Iff 



CD Q 
.i= CO 

I s . 

«- CO 

E V 

OJ t— 

SI 

fS 

■o "O 

^ ro 



*co* to ^" 

cr ■- v- 
« "O ^ 

i?* O 

"v .52 Q> 
to "O O 

B ■».*' 

~7~ ^* e? 

in 

<s| 

oS'5 

Q '— cr 



ro 



© 5 



^1 



si 

«*5 t; 



03 ° 
« -D 

«ar 2 

- • JD 
t^ E 

5 i 

Z TO 



^ — S2 fi 

5og| 



X 3 O 

03 O O 

Q.?32 

O OJ c 
O = O 

« ?' s 

o2,2 

8?> s 



II 



5 2 .22 

■» J3 "O 

s ig 



s 

v» 

o = 
>- o 

2: = S 



.2 S 



tr> 



ra 



s.£i S 



> > 03 ~ 



c 
o 
O 



Q. 

Q. 
O 



X 

CD 



Q. 

O 

O 



tO A3 

s si 
5 it 



>.^i O >. 



|8| 

■£ -3<: => 

-o .!2 i= 

■a w 

«?..£ 

=5 &■ 
»- o 
o ^ 

03 X 



c 2 
S 2 

3 CO 



o >. 



m 03 

o ^: 

°- -D 

al 2 

It 
^§ 

CO 

g2 

2 T3 



co C5> 

to 0> 
O C\j 

& 69 



Sow 
- °- to 

£ o 



to c 2 

lis 

Q E o 

- 8 S. 



= °> = = 



O) Qq 

*- g p.2 T3 

o>o StJ 
.E . « 2 < 



.2 03 03 

£2-5 

E 03 03 

cn E l - 
00 .E ro 



— ro 

o 2 fe 



ig-d ^ ™ 



— 03 



S-7 t *— ' 



o l 5 
ro 



5 E s 



2 _■ 



co? £ 



J5 

&9- 



— re 

E 



"8 



a> t^ 

S 2 

< ^ 

< § 





















ro 
b 


o 

ID 


t3 

c= 
ro 

to 

J= 

o. 
ro 


II 

-5-5 

IE & 
3 


03 = 8 uo 

o 3 J£ C3) 
te coc=0> 
di E • w 


oe§ I 


CO 

** 

c 

o 

1 

■o 


03 

to 

03 

5 

cc 

LU 

—1 
—1 

a 
cc 
»- 
z 
o 

CD 

UJ 


2 
g 

o 
o 

03 

Q 
03 


OJ 

to" 

rr 

2 

S8 

o 

— j 

< 


11 

03 o 

8 • 

O 03 

0.5 
co ca 
■o .■= 

< 5 

«- CO 

-o 
o. z 


nstallation, assembly, testin 
on theory • probably the best 
er disk drives available today, 
able on purchase of M3WHA - 


iO.001 With your purchase 
will receive a 20% dlscou 
or 10 Mbyte Tandon Seri 

from Computex. 


< 


CC 


03 




Z 


8-o 


'ZZ to "O 
t- CO 03 C 


fio'Oo 


"o 


CD 
Q 

5 


s 
5 




2 

S 

$ 


2- re 

to ^ 

•^ 2 

CO Q3 

03 Q. 
-£= O 


ormation o 
ooting, oper 
ndon Winch 
ce fully refu 


VE UP TO 
aptor Kit, 
chase of a 
nchester dri 


♦^ 


s 


^ 




S 


to O. 


E-8P cl 


S 5 S ?• 


c 
















o 
















o 


03 

ro 


03 S 


E 
o 


as 

sz 

03 

J£ 
ro 

E 

O 

03 

> 


S?2 • in 

3 » CD "-O 


E8 t5"Sio 
==3 -a * 


CD 

CO 

CD 

o 


> 

03 

ro 
o 
to 

tD 


E 
a 
o 

ro 


03 
1 

ro 

T3 


2 

-O 

2 
'ro 

2- 


M3WHA-1 WINCHESTER HOST ADAPTOR KIT. Inc 
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by Michael Tannenbaum C.P.A. 



"The growing business computer market is 
drawing software vendors like honey draws bees." 



If the past few months are any indica- 
tion, the new year will provide wonderful 
opportunities for the business microcom- 
puter user. The growing business com- 
puter market is drawing software vendors 
like honey draws bees. All this talent is 
having a salutary effect: Almost without 
exception, microcomputer software is 
more professional. 

The MBS 

A good example of the new breed of 
software is the Microcomputer Business 
General Ledger (MBS) system distributed 
by Instant Software, Peterborough, NH 
03458. The MBS system represents a new 
standard in documentation and pre- 
sentation. 

Developed by the Microcomputer 
Business International Ltd of Surrey, 
England, MBS is supplied in an attractive 
plastic binder. Inside the binder is a 
separate case containing the system disk, 
file disk and a notebook of meticulously 
detailed instructions. As an example of 
proper documentation, the notebook is 
extraordinary. It contains five sections: 

• Technical Specifications 

• Guidelines for Use 

• Using the System 

• Specific Program Operating 
Instructions 

• Appendices 

The first section (Technical Specifica- 
tions) presents program details, describes 
each file, defines record layouts and 
specifies system capacities. To aid in 
understanding processing flow, this sec- 
tion presents a simplified flowchart for 
each program in the system. Each flow- 
chart contains an input description, a file 
specification section, an output descrip- 
tion and a summary of processing pro- 
cedures. With this presentation even a 
data processing novice can understand 
the processing techniques used. 

This ledger system is of the "balance 
forward" type. This means all details of 
current transactions are removed from 
the files when a month is closed. Typical 
of most microcomputer ledger systems, 
research into prior period's balances 



must be accomplished with hardcopy. 
Although this is cumbersome, there 
should be no problem— this system 
generates many printouts. For example, 
when initializing a chart of accounts, the 
system prints a logging entry after each 
account is entered. 

Unlike most other ledger systems I have 
reviewed, MBS has almost no pre-defined 
reports. Missing are the pre-defined 
Balance Sheet, Income Statement and 
other normal financial reports. The user 
must define reports; up to 99 different 
ones are possible on a two-drive system. 
Because report formats take up file 
space, there is a trade-off between the 



"Good code should 

be protected, 

and this is a 

well-protected system." 



number of reports, accounts and transac- 
tions that can be processed. You should 
carefully examine the list of report, trans- 
action and count capacities included 
in the technical specifications before run- 
ning the system. 

The designers of this system are ob- 
viously familiar with the limitations of the 
floppy disk. Technical specifications in- 
clude an interesting section on disk ac- 
cessing speeds, file handling, sort and 
merge speeds and transaction file posting 
times. This is the first time I have seen in- 
formation of this type in a financial soft- 
ware package. If the posting and sorting 
time estimates are accurate, this system 
should be a fast performer. For the limited 
test data that I posted, performance was 
quite good. 

This same section refers to the 
modified operating system. The results of 



the modification became apparent when I 
tried to PEEK at the system code. 
Although the system is written in Basic, 
my attempt to list a program resulted in 
garbage. To further protect the system, 
you must enter the warranty code during 
initialization. This code is then a perma- 
nent part of the disk. I am in favor of prac- 
tices such as this. Good code should be 
protected, and this is a well-protected 
system. 

Initialization 

Initialization procedures are unique. 
Booting the system results in a message 
from the designers rather than the 
familiar Tandy logo. After you comply with 
initial requests, the system displays an in- 
teresting menu. You can purchase this 
system as a complete accounting system, 
including a financial planning module. 
(Because I had only the ledger portion, my 
attempts to reference other modules 
brought a message that that portion of the 
system was not present and it could be 
purchased from a dealer.) 

Referencing the General Ledger mod- 
ule brought me into the G/L menu. Unfor- 
tunately I was unable to do any process- 
ing. Returning to the manual (it often pays 
to read the instructions), I found that I had 
to initialize the files before I could enter 
data. You select file initialization pro- 
grams from a utility menu. File initial- 
jzation procedures allow you to place files 
on different drives, select disk names, 
define the system password and create 
files. Apparently the file initialization pro- 
gram sets up a data base reference 
system — it is quite time consuming. 

Documentation 

After learning my lesson during initiali- 
zation, I decided to read the manual 
before assigning accounts. The chapter 
entitled Guidelines for Use contains a de- 
tailed discussion of how to design a chart 
of accounts. Since the account coding 
structure is not predefined, the system 
can accommodate any current account 
coding structure. The designers recom- 
mend that you choose a sequence which 
separates assets, liabilities and P & L ac- 
counts. Standard reports such as the Trial 
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Balance list accounts in low to high order 
and without a proper sequence, so the 
resulting reports could be confusing. 

This system accommodates both nu- 
meric and alphanumeric account codes. 
To illustrate the coding structure's flex- 
ibility a three page account listing is pro- 
vided. This ledger system could probably 
accommodate a complicated chart of ac- 
counts if account capacity is not a prob- 
lem. (As a CPA, I appreciate the sugges- 
tion in the manual that the chart of 
accounts selected be reviewed by the 
firm's accountant.) 

The second portion of Guidelines for 
Use includes an interesting discussion 
about clerical control. This should be re- 
quired reading for anyone concerned with 
installing a computerized system. Almost 
always ignored by software vendors, this 
area considers all required control pro- 
cedures (such as use of input control logs 
and report retention requirements). In ad- 
dition this section provides well drawn 
flowcharts illustrating input and output 
control concepts. To make the whole 
thing easier to install, key control forms 
such as the Security Backup Log, Journal 
Voucher, Accounts Master Control Log, 
Input Batch Control Form (among others) 
are all provided. 

This section also discusses backup 
procedures. Diagrams indicate daily, 
weekly and monthly file rotation pro- 
cedures. Because floppy disks are subject 
to wear, this chapter mentions the need 
for periodic disk replacement. Concern for 
disk integrity is also apparent when run- 
ning the system. The system tests the 
files to ensure that records are usable. If a 
bad record is detected, the system in- 
dicates a problem and attempts to repair 
it. If repair is not possible you will have to 
use a backup. With this technique, a bad 
or worn disk should be detected quickly 
so you can replace it before data is lost. 

The Report Writer 

The balance of the Guidelines section 
is a tutorial on how to use the report 
writer. The system has a few pre-defined 
internal reports (such as a trial balance 
worksheet and various input control 
listings). The report writer must define 
reports designed for external users of ac- 
counting data. Because this system con- 
tains an enormous amount of accounting 
information (such as prior period bal- 
ances and budgets), you can develop very 
informative reports. 

For example, consider a retail firm with 
many stores located in various cities and 
states. Each store must produce profit 
and loss reports for overall control pur- 
poses. However, often the same data is 



also required summarized by a taxing 
authority for tax planning purposes and 
again by a district supervisor for bonus 
calculation purposes. The MBS report 
writer can extract this data and generate 
comparative reports to the prior year or 
budget. Because the report writer allows 
grouping accounts and definition of total 
levels, you can prepare either detail 
reports by account or summary reports. 
You select the level of detail when you run 
the report printing program. 

A report file maintenance program cre- 
ates a report format. Reports are defined 
with six data types. These data types 
range from the heading of the report (Type 
One) to the number of blank lines required 
(Type Six) between totals. Unfortunately 
no control is available over form layout. 



"The system developers 

have contrived 

to keep you informed 

of what the computer 

is doing at all times." 



The only formats accommodated are Ac- 
tual versus Budget versus Last Year, Ac- 
tual versus Budget with variance amount 
and percent and Actual versus History 
with variance amount and percent. The 
lack of format control and the insertion of 
footnote data will be a problem to a CPA 
who wishes to generate client reports. 
Retyping will be required to add textual 
material before you can issue the reports. 
In comparison to other programs in the 
system, the report file maintenance pro- 
gram is not easy to use. Data types are 
entered by designating a line number and 
entering each type line by line. After you 
make the entry, it is erased from the 
screen. As a result you must keep a man- 
ual record of the last line number used 
and its purpose to avoid confusion. 
Because reports are executed on a line- 
by-line basis, you should select line 
numbers that will permit future insertions. 
Failure to observe this rule makes later in- 
sertions of captions and accounts impos- 
sible. If you make an error when entering a 



data type, you must retype the entire line. 
It is advisable when preparing a brand 
new report to lay the whole report out 
manually in draft form before using the 
report file maintenance program. 

Using the System 

Setting the system in operation is 
covered in two chapters in the manual. 
The first chapter, quite short, covers start- 
up procedures and input edit conventions. 
Even though start-up is conventional, it is 
advisable to read this short chapter thor- 
oughly. This system, like many of the 
original Radio Shack systems, uses the 
F1 and F2 keys to abort incorrect program 
selections. Unfortunately this option is 
not listed on any program menu. 

This deficiency aside, MBS screen lay- 
outs are clean, attractive and informative. 
The system developers have contrived to 
keep you informed of what the computer 
is doing at all times. Most screens have a 
neat box on the top which contains the 
program name being executed, a descrip- 
tion of the program activity and the cur- 
rent date. Below the box are displayed ac- 
tions requested. If an entry is not made 
within 15 seconds, a box appears on the 
lower few lines of the screen with a re- 
quest "Waiting for Input". 

The system designers use formatted 
screens well. For example, when you cre- 
ate a new account, all fields in which you 
can store data are displayed at once. 
Selecting an appropriate field number 
moves the cursor to the field's location; 
the maximum field length is displayed. 
This procedure makes data entry rather 
like filling out a preprinted form. This is 
quite advantageous because account cre- 
ation requires you to enter an enormous 
amount of data. You may enter up to 13 
periods of history and 13 budget figures, 
in addition to the current periods and year- 
to-date activity amounts. 

Because initializing a chart of accounts 
is prone to error, all data entered is logged 
on the printer as you complete each ac- 
count entry. In addition, the computer 
halts data entry after the 50th item to sort 
the input information and update the files. 
Use hardcopy log and the pause to control 
the initialization procedure. You should 
compare input totals to the account totals 
batch by batch to prevent incorrect histor- 
ical and budget detail which may contam- 
inate future reports. 

To guide new operators through each 
program in the system the manual has 
detailed instructions and screen 
photographs. With these instructions 
there should be no difficulty in entering 
transactions and using each program. In 
addition, each output routine has error- 
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Northeast. 

If you're looking for the best prices in 
the U.S.A., check the others, but call 
Computer Discount of America. 
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trapping procedures to help prevent major 
errors. However, the greatest aid to in- 
stallation is the hardcopy log printed after 
every entry that can affect a file. With this 
log you can track down and correct even 
the most subtle error. 

If you purchase this system as a stand- 
alone ledger, you will enter all data 
through the posting program. The posting 
program allows you to enter transactions 
for the current period or the next account- 
ing period. This procedure allows you to 
enter activity for the next period without 
being forced into an early closing for the 
current one, a nice touch. 

The transaction entry routine also facil- 
itates accrual entries. If you enter a trans- 
action as an accrual, it is marked for auto- 
matic reversal in the next period. During 
data entry, account validity is verified; 
however, an automatic balancing require- 
ment is not enforced. The designers of the 
ledger state that MBS "has its own batch 
balancing controls which will tell you 
when a batch of input data is out of bal- 
ance and by how much." They have elect- 
ed to give the user the option of posting 
out-of-balance batches. While I prefer that 
the system accept only balanced entries, 
there might be an occasion where a one- 
sided entry is required. Since the system 
requires printing of a record of all data in- 
put transactions, tracing an out-of-balance 
condition should be reasonably easy. 

This system has all the characteristics 
that I expect from a well-written and prop- 
erly documented general ledger system. A 
limited test cannot exercise all of the sys- 
tem's features; however, I see no reason 
why I could not install it for a client's use. 
Although the report format is too limited 



for professional use, it should be quite 
adequate for internal management. If, as 
indicated by the menu, you can install a 
fully integrated system, you could auto- 
mate all elements of accounting/record- 
keeping. This would be quite interesting 
and I look forward to obtaining additional 
modules in the future. 



Integrated Systems 

With respect to integrated systems, I 
have recently received the order entry, 
sales analysis and accounts payable 
modules for the three-disk COBOL series 
of Tandy systems. With the exception of 
the payroll portion, this represents a total- 
ly automated system of accounting/rec- 
ordkeeping for the Model II. Tandy advises 
that this system can be transferred to the 
new hard disk subsystem. When my hard 
disk system is delivered, I will retest all 
previously reviewed modules as an inte- 
grated system. I expect that this test will 
prove quite interesting. 

The COBOL system represents a sub- 
stantial achievement— a fully integrated, 
professionally designed software pack- 
age. With software such as this there 
should be no reason for a modest-size 
business to postpone automating record- 
keeping. 

The MBS system is in the same league 
and this increase in the choice of systems 
will benefit all. The MBS system with its 
different features and processing speed 
may prove more suitable for some clients 
than the more complicated Tandy system. 
Either way, we professionals will have a 
greater range of alternatives to help our 
clients into the computer age.B 
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Tired of typing in all 
your programs? 

Save time 
and money! 



ALL THE 

MAJOR PROGRAM 
LISTINGS FROM 
80 MICROCOMPUTING 
EACH MONTH 

$9.97 

Plus $1.50 ea. Postage & Handling 

LOAD 80 disks are TRSDOS 2.3 formatted, single density and floppy-sided. They will not contain an 
operating system. Single drive users need a copy utility; Model HI users need the TRS-DOS 1 .2/1 .3 
Convert utility. Source code files may not be useable on the Model III. 

SAVE HOURS OF 
TYPING & AGGRAVATION 

Sign up for a subscription to LOAD 80. Save up to 30% off the monthly price. 
Begin your subscription with the March 1 982 cassette or disk. 



"Frankly, after hundreds of hours of frustration, I 
seldom ever try to keyboard a published program. 
Inevitably, I mess it up when I keyboard it. Who needs the 
aggravation? 
"This is why I started a new series of cassettes called 
LOAD-80. Each cassette will have program dumps of the 
listings in an issue of 80 Microcomputing. These listings 
are direct from the authors and tested by the 80 
Microcomputing staff. All but the very short program 
listings will be on the LOAD 80 cassettes. Thus, you will be 
able to save hours of inputting programs and even more of 
debugging your keyboard errors." /i 

Wayne Green /f n 

PuWIth*. B0 Microcomputing V U 



The LOAD 80 cassette is simply the program listings 
that appear in the articles in 80 Microcomputing. It was 
created to save you the time involved in typing the listings 
yourself. Successful loading of the programs depends on 
reading the documentation in the articles. If you have your 
current magazine at hand when you load the cassette, you 
should have no difficulty. If you still have problems, please 
return the tape for replacement. 

LOAD 80 began with the April 1981 issue. To order back 
issues, look for the back issue advertisement in this 
magazine or ask your local dealer. 

To order LOAD 80, fill in the attached card and we will 
send you your LOAD 80 cassette for the major programs in 
this issue. If the card is missing, fill in the coupon below (a 
photocopy is acceptable) and mail to: LOAD 80, 80 Pine 
Street, Peterborough, NH 03458. 



Yes, I want March LOAD 80. 



D YES, I want a cassette ol the March 1982 LOAD 80 lor 

S9.97 each (plus SI. 50 per tape for postage and 

handling). 
□ YES, I'll save 30%. Sign me up (or a year o( LOAD 80 

beginning with the March 1982 cassette. . .$99.97 lor 

12 issues 



Name:. 



Visa 1_ Am. Ex D MasterCard 
U Check/Money order 



□ YES. I want the March 1982 LOAD 80 on disk for 
S19.97 each (plus S1.50 per disk for postage and 
handling). 

□ YES, I want to save money. I'll subscribe to LOAD 80 
on disk beginning with the March 1982 issue. . . 
S!99.97ayear. 



Address:. 
City: 



State: 



Signature: 



_Card# 



-Zip: 



.Exp. Date: 



LOAD 80 is manufactured by Instant Software, a subsidiary of WAYNE GREEN INC., 80 Pine St., Peterborough, NH 03458. There is no warranty ex- 
pressed or implied that LOAD 80 will do anything other than save you typing. Foreign air mail, please inquire. 3/82 



SOFT BITS 

a basic/assembly column 

Kw Ds-v^sm- Ciller 



by Roger Fuller 



One of my goals in this column is to 
provide simple machine code pro- 
grams which interface with Basic. To this 
end I will try to keep programs compatible 
with Models I and III, whether disk or not. 
While this month's program is consider- 
ably longer than 80 bytes, it still meets 
these criteria. 

Scripy is Born 

I wrote Scripy because I saw a need for 
a simple, easy to understand and operate, 
yet functional word processor. I want to 
thank Lynard Barnes for his article "More 
Write Stuff" (80 Microcomputing, Decem- 
ber 1981) which introduced me to this 
concept. 

Since most letters are only one page 
long and written on standard 8Vz by 1 1 pa- 
per, Scripy holds 66 lines of 64 characters. 
The screen thus functions as a window on 
the letter; the program needs only vertical 
scrolling for you to view the entire page. 

Scripy is actually a screen-oriented text 
editor rather than a word processor. I de- 
signed it to do the word processing in Ba- 
sic. Since it needs only 4,224 bytes of 
string space, there is ample room for addi- 
tional coding even in a 16K system. 

Dear John 

Scripy uses the four arrow keys for non- 
destructive cursor movement. You may 
change letters by over-typing. To insert an 
additional character in a line press the 
Break key to add a space at the current 
cursor location; then type the correct 
character. Press the Clear key to delete 
the character under the cursor. Pressing 
Enter moves the cursor to the beginning 
of the next line. Press all arrow keys simul- 
taneously to exit the input mode when you 
have finished entering text. 

When you add a character the remain- 
ing text on that line moves over one posi- 
tion. (The last character is discarded.) 
When you delete a character the remain- 
ing text on that line moves in one position 
and the program places a space at the end 
of the line. Text will not automatically 
wrap around when the end of a line is en- 
countered. You may type a character in 
the very bottom of the screen without the 
screen scrolling up because Scripy does 



not use the video driver to print on the 
screen. 

Scripy uses only one ROM routine, 
Radio Shack's documented address 
002BH. This key scan works just like Ba- 
sic's INKEY$. On the Model III the key 
scan provides auto repeat and lowercase. 
Model I users may use drivers to accom- 
plish the same functions if desired. Such 
drivers do not interfere with the program's 
operation. 

To load and save text strings with a 
tape-based system, you must write a spe- 
cial conversion scanner to change quota- 
tion marks to some other code (such as 
CHR$(127)). If you have a disk system you 
can use Line Input or random access to 
avoid the same problem. 



"Scripy is actually 

a screen-oriented 

text editor 

rather than a 

word processor. " 



The simple initialization routine shown 
in Program Listing 1 fills the strings with 
spaces and ensures that they are contigu- 
ous in memory. The strings must be in 
order from lowest to highest for the pro- 
gram to work properly. You can relocate 
the object code to any place in memory 
with an assembler. You can assemble the 
source code in a 16K system. 

When modifying the strings in Basic be 
sure to restore them to correct sequence 
and position before reentering Scripy. If 
you have Disk Basic, use the MID$ re- 
placement function to avoid disturbing 
the strings' lengths or positions. Tape or 
disk system users can employ the method 
shown in Program Listing 2 to restore the 



strings to the correct situation. 

The Programs 

I wrote Scripy in a top down manner. 
That is, I first developed the overall con- 
cept. Then I broke the main idea into ac- 
tual functions. Using these functions as 
subroutines to a main control loop made 
writing structured code easy. While I did 
not vigorously structure the assembly 
code for Scripy it does have many aspects 
of structured programming: 

• The program's core is on the first 
page. 

• Program control centers in a main 
loop. 

• Subroutines (with one exception) are 
entered at the top and exited at the 
bottom. 

• I assigned meaningful labels. 

• Visual separations follow program 
divisions. 

• I used many comments. 

• Program parameters are at the start 
of the code. 

You can enter Scripy via a USR call. 
Other methods are possible, but initializa- 
tion requires the address of the first char- 
acter in the text block. Normally, VARPTR 
generates the address and passes it to 
Scripy via the USR operand. 

Initialization also moves the first 
screen of text to the display and resets the 
counter, TOPCNT. (TOPCNT determines 
which line of text is currently displayed at 
the top of the screen.) 

After initialization control drops to the 
main loop entry section. Here the cursor 
pointer is updated by loading the contents 
of register pair DE into the storage loca- 
tion assigned for this pointer. DE passes 
the current cursor location to subroutines 
and back. The cursor flash switch is test- 
ed; if it is on the cursor is displayed to 
the screen. 

At last the key scan loop is entered and 
the screen pointer and the string pointer 
HL are saved. HL points to the location in 
memory corresponding to the character at 
the current cursor location. HL also 
passes the current text character pointer 
to subroutines and back. 

Next, the flash counter and counter lim- 
it value are loaded. A SBC instruction 
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INTELLIGENT 
PRINTER INTERFACE 

Free Your Computer from the Mundane Task of Printing 



Imagine being able to use your 
computer seconds after beginning an 
extensive printout. 

Visualize your printout with page 
breaks, page numbering and titles, 
margins of your choice, indented 
carryover lines, on any size paper! 

Appreciate the time and money you 
will save by not waiting on your 
printer. 

SooperS pooler, a buffered printer 
interface, maintains control over your 
printer while you go on using your 
computer for more productive 
activities. Eliminate waiting while 
your printer pecks through a long 
document. SooperSpooler accepts 
information from your computer at up 
to 2500 characters per second and 
feeds it to your printer as fast as it can 
handle it — without using any of your 
computers memory or time! As soon 
as SooperSpooler has stored your 
document in its buffer, control of your 
computer is returned to you. 



SooperSpooler features include: 

16K Memory — Will handle most of 

your printing jobs (expandable, see 

options) 

Buffer Status Readout — Lets you 

know just how much data is stored 

Space Compression — Makes the 

best use of memory on columnar 

documents 

Pagination — Eliminates printout on 

page perforations 

Page Stops — For single sheet 

printouts 

Headers and Page Numbering — 

Give your listing a professional look 

Indentation on Carryover Lines — 

Easy to find the beginning of a line 

Self Test Routine — You instantly 

know that all is well 

All Features Software Controllable 

— Your program can take over 

Plugs into Most Computer 

Systems — Standard cables available 

$349.00!— 16K parallel I/O unit 



Options: 

• Serial Board— $95.00— Gives you 
the option of any combination of 
serial or parallel input or output. Can 
also be used for modem transmission. 

• Memory Expansion — $159.00 — 
Additional 46K for a total of 62K 

• Cables — Available per your 
application. 

TM 

SooperSpooler by Compulink 
— The missing link that gives 
your microcomputer 
mainframe printing. 

COMPULINK 

CORPORATION 

1840 Industrial Circle, Dept. A 

Longmont, CO 80501 

(303)651-2014 

Order line: 800-525-6705 

Dealer inquiries welcome 



POWEi 




BUFFER STATUS 



SooperSpooler 

INTELLIGENT PRINTER INTERFACE 



RESET 



« 



SPACE 
COMPRESSION 



% 



PACE 

m 




We accept 

• VISA 

• MasterCard 



• Checks 

• Money Orders 

• COD 



Add $3.00 per order for postage and handling 

COD add $3.00 

Colorado residents add sales tax 



Prices and Specifications Subject to Change 
Without Notice 




If you have 

anything to do 

with the TRS-80* 

System you 

should be 

reading the 

EIGHTY 

SYSTEM 

NEWSLETTER 

every week! 



Don't miss a single issue ol the new Eighty 
System Newsletter . . . published weekly and 
mailed every Friday by First Class Mail. This 
is the only publication designed for personnel 
in the TRS-80" industry, including manufac- 
turers, distributors, dealers and computer 
users. The Eighty System Newsletter is 
compiled and edited by Ken Gordon, producer 
of the National TRS-80* Show, the Eighty/ 
Apple Show, the NJ Microcomputer Show, 
and publisher of the Amateur Radio Equip- 
ment Directory. Here is valuable information 
in professionally prepared format about TRS- 
80' hardware, software, peripherals, trends in 
the industry, and latest news. In addition, 
each weekly issue contains brief digests of 
articles related to the TRS-80' system 
appearing in over 100 computer related and 
general interest publications. This bibliography 
will save you both time and money in keeping 
up with articles in print on the TRS-80" 
computer system. The Eighty System News- 
letter is a must for all active TRS-80' users, 
plus anyone involved in any way with the 
manufacturing, distributing or retailing of 
TRS-80' products. 

Subscribe today: Mail the coupon with 
your check for $39 for the next 52 weekly 
issues (sent First Class Mail that's only 
75c per week.) If for any reason you are 
not satisfied with the Eighty System 
Newsletter — we will refund the undelivered 
portion of your subscription. 



KENGORE CORPORATION 

3001 Route 27 
Franklin Park, NJ 08823 
(201) 297-2526 

□ Enclosed is my check for 
$39 for the next 52 issues 
of The Eighty System 
Newsletter (sent First Class 
Mail). 

Name 

Company 

Address 
City _ 



State 



Zip 



SOFT BITS 



•TRS-80 is a Registered Trademark of Tandy 
Corporation/Radio Shack Division. 



compares the two values and branches 
program execution. The value of the 
counter DE is not destroyed by a SBC 



HL,DE operation. 

After the program makes this test for a 
status change it will either change the cur- 



1000 
1001 
1100 
1101 
1102 
1150 
1200 
1300 
1400 
1500 
1600 
1601 
1602 
1700 
2000 
2001 
2100 
2101 



i *************** LISTING 1 

1 ASSUMES AT LEAST 4224 BYTES OF STRING CLEARED 
1 AND S$() HAS ALREADY BEEN DIMINSIONED 

IF FRE("") ■ CLOSES UP STRING SPACE 

FOR L%=65 TO STEP -1 : S$ (L%) =STRING$(64 ,32) : NEXT 

HERE PLACE YOUR LOAD ROUTINE IF ANY 

HERE DEriNE THE USR CALL ADDRESS AND MAKE THE CALL 
USE EITHER L%=USR( VARPTR( S$(0; ) ) 

OR L%=USR1( VARPTR( S$(0) ) ) IF DISK 

************** LISTING 2 

IF FRE("") * CLOSES UP STRING SPACES 

FOR L%=65 TO STEP -1 : S$(L%) = S$(L%) + "" : NEXT 

Program Listing 1. 











Program Listing 2. 








00100 


.A******************************************************** 






00110 


; 












00120 


S C 


R I P Y 


BY ROGER 


FULLER PUBLIC DOmAIN 






00130 


; 












00140 


p ********************************************************* 






00150 


* 












00160 


; 








002B 




00170 
00180 
00190 


KEYIN 


EQU 


002BH 


; BASIC'S KEX SvAN 


F000 




00200 
00210 
00220 


» 


ORG 


0F000H 




0002 




00230 


CURL0C 


DEFS 


2 


; CURSOR ADDRESS STORAGE 


F002 


8F 


00240 


CURSOR 


DEFB 


143 


; GRAPHIC OF 4 PIXEbS 


P003 


00 


00250 


ONOFF 


DEFB 





;0=OFF FF=ON 


F004 


0000 


00260 


COUNT 


DEFW 





; COUNTER FOR FLASHING 


F006 


00 


00270 


TOPCNT 


DEFB 





; STRING LInE AT SCkEEN TOP 


0032 




00280 
00290 


HAXCNT 


EQU 


66-16 


.•LIMITS SCROLLING 






00300 


. ************** 


INITIALIZATION 


SECTION AND USR ENTRY POINT 


F007 


CD7F0A 


00310 


USRADR 


CALL 


0A7FH 


;GET STRING ARRAY ADDRESS 


F00A 


23 


00320 




INC 


HL 




F00B 


5E 


00330 




LD 


E,(HL) 




F00C 


23 


00340 




INC 


HL 




F00D 


56 


00350 




LD 


D,(HL) 




F00E 


EB 


00360 




EX 


DE,HL 


;HL => STRING LINES 


F00F 


E5 


00370 




PUSH 


HL 


;SAVE STRING POINTER 


F010 


11003C 


00380 




LD 


DE,3C00H 


;H0ME CURSOR LOCATION 


F013 


D5 


00390 




PUSH 


DE 


;SAVE IT 


F014 


010004 


00400 




LD 


BC,1024 


;ONE SCREEN OF STRINGS 


F017 


EDB0 


00410 




LDIR 




; DISPLAY IT 


F019 


AF 


00420 




XOR 


A 




F01A 


3206F0 


00430 




LD 


(TOPCNT) ,A 


;ZERO TOPCNT 


F01D 


Dl 


00440 




POP 


DE 


; RESTORE SCREEN POINTER 


F01E 


El 


00450 
00460 




POP 


HL 


; RESTORE STRING POINTER 






00470 


. •***•**•*•***• 


MAIN LOOP ******************************** 


F01F 


ED5300FB 


00480 


SCRIPY 


LD 


(CURLOC) ,DE 


; UPDATE CURSOR LOCATION 


F023 


3A03F0 


00490 




LD 


A, (ONOFF) 


;GET CURSOR FLASH SWITCH 


F026 


B7 


00500 




OR 


A 


;TEST IT 


F027 


2804 


00510 




JR 


Z, KYLOOP 


;IF CURSOR IS OFF 


F029 


3A02F0 


00520 




LD 


A, (CURSOR) 


; ELSE GET CURSOR 


F02C 


12 


00530 




LD 


(DE),A 


; AND PUT IT ON SCKEEN 


F02D 


D5 


00540 


KYLOOP 


PUSH 


DE 


;SAVE SCkEEN POINTER 


F02E 


E5 


00550 




PUSH 


HL 


;SAVE STRING POINTER 


F02F 


ED5B04F0 


00560 




LD 


DE, (COUNT) 


;GET COUNT 


F033 


13 


00570 




INC 


DE 


;BUMP COUNT 


F034 


219001 


00580 




LD 


HL,400 


;GET LIMIT VALUE 


F037 


ED52 


00590 




SBC 


HL,DE 


;TEST COUNT 


F039 


3019 


00600 




JR 


NC.BLINKX 


;IF COUNT NOT OVER LIMIT 


F03B 


3A03F0 


00610 




LD 


A, (ONOFF) 


;GET CURSOR FLASH STATUS 


F03E 


B7 


00620 




OR 


A 


,-TEST IT 


F03F 


2F 


00630 




CPL 




.•CHANGE STATE 

Program Listing 2 Continues 
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Our drives feature excellent engineering, and 
all of the advanced performance features you've 
come to expect from the nations leading disk 
drive manufacturers. All systems are completely 
burned-in and tested. And. you'll see at least 
five quality assurance stamps on each and every 
drive, which is how we make sure our drives 
will run and will continue to run past our 
optional two year extended warranty. 

Our drive packages start at $250.00 and in- 
clude a comprehensive operations manual and 
an attractive static free, dust free cover. 



Systems available for Altos. 'Apple™. Atari. 
Heath™. North Star™. S-1 00 . 2 TRS-80™ (Model 
I. II. III. Color). Zenith™. 

If one of our drives fails to meet your highest 
expectations of how trouble free and reliable a 
disk drive can be. then return it to us for a 
complete refund.* 

So. before you buy another drive, take a test 
drive with one of ours. We're sure that you'll 
findTRAXXtobethe 
finest. 

IT'S GUARANTEED! 



warn, 



COMPUTER CORPORATION 



Call our toll-free TRAXX LINE: 1-800-621-3102. In Illinois, call: (312) 987-1024. 10AM-6PM CST. 
Monday thru Friday. 'For full refund drives must be returned within 10 days of purchase. 



mart* of Apple 



SOFT BITS 



Program Listing 2 Continued 








F040 3203F0 


00640 


LD 


(ONOFF),A ;UPDATE SWITCH 


F043 2805 


00650 


JR 


Z , PUTCUR J 


IF CURSOR IS OFF 


F045 El 


00660 


POP 


HL 


RESTORE STRING POINTER 


F046 E5 


00670 


PUSH 


HL 


AND SAVE IT AGAIN 


F047 7E 


00680 


LD 


A,(HL) ; 


GET CHAR 


F048 1803 


00690 


JR 


S+5 




F04A 3A02F0 


00700 PUTCUR 


LD 


A, (CURSOR) 7 


SET CURSOR CHAR 


F04D 2A00F0 


00710 


LD 


HL,(CURLOC) ; 


POINT TO SCKEEN 


F050 77 


00720 


LD 


(HL) ,A 


DISPLAY CURSOR/CHAR 


F051 110000 


00730 


LD 


DE,0000H ; 


RESET COUNTER 


F054 EDS3 04F0 


007 40 BLINKX 


LD 


(COUNT) ,DE J 


UPDATE COUNT 


F058 CD2B00 


00750 


CALL 


KBYIN 




F05B El 


007 60 


POP 


HL ; 


RESTORE STRING POINTER 


F05C Dl 


00770 


POP 


DE ; 


RESTORE SCKEEN POINTER 


F05D B7 


007 80 


OR 


A 




F05E 2008 


007 90 


JR 


NZ, KEYCK ; 


IF A NEW KEY TxPED 


F060 3A4038 


00800 


LD 


A,(3840H) ; 


ARROW KEYS ROW ADDRESS 


FB63 FE78 


00810 


CP 


120 ; 


ALL ARROWS PRESSED 


F065 20C6 


00820 


JR 


NZ,KYLOOP t 


IF NOT EXIT CONDITIONS 


F067 C9 


00830 
00840 ; 


RET 


















00860 ; 








F068 F5 


00870 KEYCK 


PUSH 


AF ; 


SAVE CHAR 


F069 7E 


00880 


LD 


A,(HL) ; 


GET CHAR UNDER CURSOR 


F06A 12 


00890 


LD 


(DE) ,A ; 


PUT ON SCKEEN 


F06B 3EPF 


00900 


LD 


A,0FFH ) 


CURSOR ON STATUS VALUE 


F06D 3203F0 


00910 


LD 


(ONOFF) ,A ; 


UPDATE SWITCH 


F070 E5 


00920 


PUSH 


HL 




F071 210000 


00930 


LD 


HL,0000H 




F074 2204F0 


00940 


LD 


( COUNT), HL j 


RESET FLASH COUNTER 


F077 El 


00950 


POP 


HL 




F078 Fl 


00960 


POP 


AP ; 


RESTORE CHAR 


F079 FE5B 


00970 


CP 


5BH j 


T 


F07B CAC2F0 


00980 


JP 


Z,UP j 


E 


F07E FE1B 


00990 


CP 


1BH 


S 


F080 CAC2F0 


01000 


JP 


Z,UP 


T 


F08J FE0A 


01010 


CP 


0AH 




F085 CAE1F0 


01020 


JP 


Z,DOWN 


A 


F088 FE1A 


01030 


CP 


1AH 


R 


F08A CAE1F0 


01040 


JP 


Z,DOWN 


R 


F08D FE08 


01050 


CP 


08H 





F08F CA01F1 


01060 


JP 


Z,BACK 


W 


F092 FE18 


01070 


CP 


18H 




F094 CA01F1 


01080 


JP 


Z,BACK 


K 


F097 FE09 


01090 


CP 


09H 


E 


F099 CA0BF1 


01100 


JP 


Z f OVER 


Y 


F09C FE19 


01110 


CP 


19H 


S 


F09E CA0BF1 


01120 


JP 


Z,OVER 




F0A1 FE1F 


01130 


CP 


1FH 




F0A3 CA3CF1 


01140 


JP 


Z, DELETE 


; CLEAR KEx 


F0A6 FE0D 


01150 


CP 


0DH 




F0A8 CA17F1 


01160 


JP 


Z, ENTER 


; ENTER KEY 


F0AB FE01 


01170 


CP 


01H 




F0AD CA65F1 


01180 


JP 


Z, INSERT 


; BREAK KEY 


F0B0 FE20 


01190 


CP 


20H 




F0B2 38uB 


01200 


JR 


C, KEYCKX 


IF NOT PRINTABLE ASCII 


F0B4 12 


01210 


LD 


(DE),A 


ELSE PUT ON SCREEN 


F0B5 77 


01220 


LD 


(HL),A 


AND IN STRING 


F0B6 7B 


01230 


LD 


A,E 


LSB OF CURSOR LOCATION 


F0B7 E63F 


01240 


AND 


63 


ADJUST TO TAB POSITION 


F0B9 FE3F 


01250 


CP 


63 




F0BB 2802 


01260 


JR 


Z, KEYCKX 


IF AT END OF LINE 


F0BD 23 


01270 


INC 


HL 


ELSE BUMP STRING 


F0BE 13 


01280 


INC 


DE 


• AND SCREEN POINTERS 


F0BF C31FP0 


01290 KEYCKX 
01300 ; 


JP 


SCRIPY 




F0C2 7B 


01320 UP 


LD 


A,E 




F0C3 FE40 


01330 


CP 


64 




F0C5 3010 


01340 


JR 


NC,UP2 


•NOT TOP ROW 


F0C7 7A 


01350 


LD 


A,D 




P0C8 FE3C 


01360 


CP 


3CH 




FBCA 200B 


01370 


JR 


NZ,UP2 


•NOT TOP ROW 


F0CC 3A06F0 


01380 


LD 


A,(TOPCNT) 




F0CF B7 


01390 


OR 


A 




F0D0 280C 


01400 


JR 


Z,UPX 


•IF CAN'T SCKOLL DOWN 


F0D2 CD89F1 


01410 


CALL 


SCRNDN 


•SCREEN DOWN 


F0D5 1807 


01420 


JR 


UPX 




F0D7 01C0FF 


01430 UP2 


LD 


BC-64 




F0DA EB 


01440 


EX 


DE,HL 




F0DB 09 


01450 


ADD 


HL,BC 


;MOVE UP ON SCKEEN 


F0DC EB 


01460 


EX 


DE,HL 




F0DD 09 


01470 


ADD 


HL,BC 


;HOVE UP IN STRINGS 


F0DE C31FF0 


014 80 UPX 
01490 ; 


JP 


SCRIPY 




F0E1 7B 


01510 DOWN 


LD 


A,E 




F0E2 FE»-0 


01520 


CP 


0C0H 




F0E4 38ll 


01530 


JR 


C,D0WN2 


;NOT BOTTOM ROW 


F0E6 7A 


01540 


LD 


A,D 




F0E7 FE3F 


01550 


CP 


3FH 


Program Listing 2 Continues 



Percom Disk Storage 

Quality Percom products arc available from 
the following authorized Percom retailers. 
If a retailer is not listed for your area, call 
Percom toll free at 1-800-527-1222 for the 
address of a nearby retailer, or to order directly 
from Percom. 

ARKANSAS 

MICROCOMPUTER SYSTEMS. INC Hoi Springs 

ARIZONA 
SIMUTF.K Tucson 

CAUFORNIA 
ALPHA BYTE STORES Calabasas 

BERKELEY MICRO COMPUTERS Berkeley 
COMPUTER INFORMATION EXCHANGE 

San Luis Rey 
COMPUTER SERVICE CENTER Hollywood 

DESMAR ELECTRONICS Santa Clara 

HOBBYWORI.I) Northndgc 

DISTRICT OF COLUMBIA 
Tl IE PROGRAM STORE Washington 

FLORIDA 
F.N TRON INC Largo 

MICROSYSTEMS SOFTWARE. INC 

Hollywood 



GEORGIA 

COMMERCIAL DATA PRODUCTS AUanla 

HAWAII 
COMPUTER CENTER 1 lonolulu 

IDAHO 
OFFICE MAGIC COMPUTERS Boise 

ILLINOIS 
GARCIA & ASSOCIATES Chicago 

KANSAS 
BESCO ELECTRONICS Shawnee 

GARDENS. INC Hutchinson 

KENTUCKY 
COMPUTER MAGIC Louisville 

MASSACHUSETTS 

Tewksbury 
MARYLAND 

Damascus 



OMNITEK 
DAMASCUS CB 
ALTERNATE SOURCE 
THE CODE ROOM 
LEMBERGERCO 



COLUMBUS TV 
CURTRONICS 



HARDSIDE 



MICHIGAN 

Lansing 
MINNESOTA 

Eden Frame 
MISSOURI 

Vienna 
NEBRASKA 

Columbus 
Lincoln 
NEW HAMPSHIRE 
Millord 
NEW JERSEY 
CHANNEL I RADIO SHACK Medlord 

NEW MEXICO 
AUTEL ELECTRONICS Albuquerque 

NEVADA 
PCS COMPUTER Las Vegas 

NEW YORK 
H & E COMPUTRONICS Spnng Valley 

MICRO 80 SYSTEMS Brooklyn 

PROGRAMS UNLIMITED Jericho 

STONY CLOVE New York City 

DATASCANCOMPUTERSYSrEMS.WC ^ (f)l616986285 

NORTH CAROLINA 

HOLLIDAY MFG. Greensboro (919) 274-6346 

OHIO 
FELDMAN ENTERPRISES Akron 

MPS Wadswonh 

PENNSYLVANIA 
ADVANCED MECHANIZATION Ivyland 

COMPUTER ANALYSTS New Bnghlon 

SUNRISE ELECTRONICS Chambersburg 1717)264-8214 

TENNESSEE 
COMPUTER WORLD. INC Nashville 



1501)623 520') 

1602)323-9391 

1213)883-8594 
14151 8487122 

1714)757 4849 
(213)851 3434 
(408)988 2208 
(213)886 9200 

(202) 337 46') I 
(813)586 5012 
(305)983-3390 

1404)325-7800 
(808)488-2171 

(208)376 4613 

(3I2)782')750 

(913)268 7633 
(316)66*) 8261 

(502)893-9334 

(617)851 4580 

(301)2532101 

1517)487 3358 

(612) 934 1826 

(314)422 3353 

(402)564 5531 
(4021 423 7771 

(800)258 1790 

(609)654 7454 

(505)255 6451 

(702)870 4138 

(914)425 1535 

1212) 748-3236 

(800) 645-6038 
(212)391 8337 



(216)724 5583 
(2161336 2771 



(215)672 9000 
(4121846 9323 



(615)244 6094 
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TEXAS 

PERCOM COMPUTER CENTER Richardson (214)6900207 
COMPUTER TO GO Austin (512)472-8926 

BREEZE QSD. INC Dallas (214)484 2976 

TEXAS COMPUTER SYSTEMS Arlington (817)274-5625 

UTAH 
MICRO MNEMONICS Sunset (801)825-9317 

WASHINGTON 
COMPUTER SERVICES Kenneunck 1509) 582 9759 

NORTHWEST COMPUTER SERVICE 

Bellvue (206)454 4979 

WEST VIRGINIA 
BURCO DISTRIBUTORS Hunlmgion 1304)453 6387 

WISCONSIN 

BYTE SHOP MILWAUKEE C.rcenheld (414)2817004 

FINAMORES Mershlield (715)3849610 

FOREIGN DEALERS 

AUSTRALIA 

DICK SMITH ELECTRONICS P.O. Box 321 North Rydc NSW2113 

CANADA 
VALF.RIOTE AND ASSOC Guelph Ontario (416)624-4899 

DVR ELECTRONICS Surrey BC (604) 576 1045 

COTS MICROSYSTEMS. LTD Ottawa (613)7417937 

MICRO COMP ENTERPRISES INC Pwkenng (416)839 4561 

MICRO MART Montreal (514)7319486 

MEXICO 
CIBERMATIC. S A Mexico (905) 592 3433 

COMPUTADORAS Y ASESORAMIENTO 

RioPanvcol4 MexicoSDF 
DOMINICAN REPUBLIC 
RADIO SHACK Santo Domingo (809) 565 9 1 2 1 



TRS-80* COMPUTING EDITION 



©1981 Percom Data Co., Inc. 



^Zufje percom $ertpi)eral 



35 cents 



Percom' s DOUBLER II tolerates wide variations in media, drives 



GARLAND, TEXAS — May 22, 1981 — 
Harold Mauch, president of Percom Data 
Company, announced here today that an im- 
proved version of the Company's innovative 
DOUBLER adapter, a double-density plug-in 
module for TRS-80* Model I computers, is 
now available. 

Reflecting design refinements based on both 
theoretical analyses and field testing, the 
DOUBLER II®, so named, permits even great- 
er tolerance in variations among media and 
drives than the previous design. 

Like the original DOUBLER, the DOU- 
BLER II plugs into the drive controller IC 
socket of a TRS-80 Model I Expansion Inter- 
face and permits a user to run ei.ther single- or 
double-density diskettes on a Model I. 

With a DOUBLER II installed, over four 
times more formatted data — as much as 364 
Kbytes — can be stored on one side of a five- 
inch diskette than can be stored using a stan- 
dard Tandy Model I drive system. 

Moreover, a DOUBLER II equips a Model I 
with the hardware required to run Model III 
diskettes. 

(Ed. Note: See "OS-80": Bridging the TRS- 
80* software compatibility gap" elsewhere on 
this page.) 

The critical clock-data separation circuitry 
of the DOUBLER II is a proprietary design 
Called a ROM-programmed digital phase-lock 
loop data separator. 

According to Mauch, this design is more 
tolerant of differences from diskette to diskette 
and drive to drive, and also provides immunity 
to performance degradation caused by circuit 
component aging. 




Percom DOUBLER II 



Mauch said "A DOUBLER II will operate 
just as reliably two years after it is installed as it 
will two days after installation." 

The digital phase-lock loop also eliminates 
the need for trimmer adjustments typical of 
analog phase-lock loop circuits. 

"You plug in a Percom DOUBLER II and 
then forget it," he said. 

The DOUBLER II also features a refined 
Write Precompensation circuit that more 
effectively minimizes the phenomena of bit- 
and peak-shifting, a reliability-impairing char- 
acteristic of magnetic data recording. 

The DOUBLER II, which is fully software 
compatible with the previous DOUBLER, is 
supplied with DBLDOS'\ a TRSDOS*- 
compatible disk operating system. 

The DOUBLER II sells for $TtSG5, includ- 
ing the DBLDOS diskette.. ,J*lVl.W 



^♦ill- 



Circuit misapplication causes diskette read, format problems. 

High resolution key to reliable data separation 



GARLAND, TEXAS — The Percom 
SEPARATOR" does very well for the Radio 
Shack TRS-80* Model I computer what the 
Tandy disk controller does poorly at best: reli- 
ably separates clock and data signals during 
disk-read operations. 

Unreliable data-clock separation causes for- 
mat verification failures and repeated read 
retries. 

CRC ERROR-TRACK LOCKED OUT 

The problem is most severe on high-number 
(high-density) inner file tracks. 

As reported earlier, the clock-data sepata- 
tion problem was traced by Percom to misap- 
plication of the internal separator of the 1771 
drive controller IC used in the Model I. 

The Percom Separator substitutes a high- 
resolution digital data separator circuit, one 
which operates at 16 megahertz, for the low- 
resolution one-megahertz circuit of the Tandy 
design. 

Separator circuits that operate at lower 
frequencies — for example, two- or four- 



megahertz — were found by Percom to provide 
only marginally improved performance over 
the original Tandy circuit. 

The Percom solution is a simple adapter that 
plugs into the drive controller of the Expansion 
Interface (EI). 

Not a kit — some vendors supply an un- 
tested separator kit of resistors, ICs and other 
paraphernalia that may be installed by mod- 
ifying the computer — the Percom 
SEPARATOR is a fully assembled, fully tested 
plug-in module. 

Installation involves merely plugging the 
SEPARATOR into the Model I EI disk con- 
troller chip socket, and plugging the controller 
chip into a socket on the SEPARATOR. 

The SEPARATOR, which sells for only 
$29.95, may be purchased from authorized Per- 
com retailers or ordered directly from the fac- 
tory. The factory toll-free order number is 
1-800-527-1222. 

Ed. note: Opening the TRS-80 Expansion In- 
terface may void the Tandy limited 90-day 
warranty. ^ 2 



The Percom DOUBLER II is available from 
authorized Percom retailers, or may be ordered 
direct from the factory. The factory toll-free 
order number is 1 -800-527 - 1 222 . 

Ed. note: Opening the TRS-80 Expansion In- 
terface may void the Tandy limited 90-day 
warranty. , 

All that glitters is not gold 

OS-80®* Bridging the TRS-80* 
software compatibility gap 

Compatibility between TRS-80* Model I diskettes 
and the new Model III is about as genuine as a gold- 
plated lead Krugcrrand. 

True, Model I TRSDOS* diskettes can be read on 
a Model III. But first they must be converted and re- 
recorded for Model III operation. 

And you cannot write to a Model I TRSDOS* dis- 
kette. Not with a Model III. You cannot add a file. 
Delete a file. Or in any way modify a Model I 
TRSDOS diskette with a Model III computer. 

Furthermore, your converted TRSDOS diskettes 
cannot be converted back for Model I operation. 

TRSDOS is a one-way street. And there's no re- 
treating. A point to consider before switching the 
company's payroll to your new Model III. 

Real software compatibility should allow the di- 
rect, immediate interchangeability of Model I and 
Model III diskettes. No read-only limitations, no 
conversion/rc-rccording steps and no chance to be 
left high and dry with Model III diskettes that can't 
be run on a Model I. 

What's the answer? The answer is Percom 's OS- 
80 ft: family of TRS-80 disk operating systems. 

OS-80 programs allow direct, immediate inter- 
changeability of Model I and Model III diskettes. 

You can run Model I single-density diskettes on a 
Model III; install Percom 's plug-in DOUBLER 1 "* 
adapter in your Model I, and you can run double- 
density Model III diskettes on a Model I. 

There's no conversion, no re-recording. 

Slip an OS-80 diskette out of your Model I and in- 
sert it directly in a Model III. 

And vice- versa. 

Just have the correct OS-80 disk operating sys- 
tem — OS-80. OS-80D or OS-80/III — in each com- 
puter. 

Moreover, with OS-80 systems, you can add, de- 
lete, and update files. You can read and write disket- 
tes regardless of the system of origin. 

OS-80 is the original Percom TRS-80 DOS for 
BASIC programmers. 

Even OS-80 utilities are written in BASIC. 

OS-80 is the Percom system about which a user 
wrote, in Creative Computing magazine. ". . . the best 
$30.00 you will ever spend. "t 

Requiring only seven Kbytes of memory, OS-80 
disk operating systems reside completely in RAM. 
There's no need to dedicate a drive exclusively for a 
system diskette. 

And. unlike TRSDOS, you can work at the track 
sector level, defining and controlling data formats — 
in BASIC — to create simple or complex data struc- 
tures that execute more quickly than TRSDOS files. 

The Percom OS-80 DOS supports single-density 
operation of the Model I computer — price is 
$29.95; the OS-80D supports double-density opera- 
tion of Model I computers equipped with a DOUB- 
LER or DOUBLER II: and. OS-80/III — for the 
Model III of course — supports both single- and 
double-density operation. OS-80D and OS-80/III 
each sell for $49.95. 



PRICES AND SPECIFICATIONS SUBJECTTOCHANGE WITHOUT NOTICE. PRICES DO NOT INCLUDE HANDLING ANDSH1PPING. 

PERCOM DATA COMPANY, INC. 11220 Pagemill Road Dallas, Texas 75243 (214) 3407081 

^Trademark of Percom Data Company. Inc. "TRS-80and TRSDOS are trademarks of Tar.dy Corporation which has no relationship 10 Percom Data Company. iCreative Computing Magazine, June. 1980. page 26. 



.'See List of Advertisers on page 402 
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SOFT BITS 



Program Listing 2 Continued 








F0E9 200C 


01560 


JR 


NZ,D0WN2 ; 


NOT BOTTOM ROW 


F0EB 3A06P0 


01570 


LD 


A, (TOPCNT) 




F0EE FE32 


01580 


CP 


MAXCNT 




F0F0 280C 


01590 


JR 


Z, DOWNX ; 


IF CAN'T SCROLL UP 


F0F2 CDB2F1 


01600 


CALL 


SCRNUP 




F0F5 1807 


01610 


JR 


DOWNX 




F0F7 014000 


01620 D0WN2 


LD 


BC,64 




F0FA EB 


01630 


EX 


DE r HL 




F0FB 09 


01640 


ADD 


HL,BC ; 


MOVE DOWN ON SCREEN 


F0FC EB 


01650 


EX 


DE,HL 




F0FD 09 


01660 


ADD 


HL,BC ; 


MOVE DOWN IN STRINGS 


F0FE C31FF0 


01670 DOWNX 
01680 ; 


JP 


SCRIP* 




F101 7B 


01700 BACK 


LD 


A,E 




F102 E63F 


01710 


AND 


63 




F104 2802 


01720 


JR 


Z, BACKX j 


IF AT START OF LINE 


F106 IB 


01730 


DEC 


DE ; 


ELSE BACKUP ON SCREEN 


F107 2B 


01740 


DEC 


HL ; 


AND IN STRINGS 


F108 C31FF0 


01750 BACKX 
0176B ; 


JP 


SCRI PY 




F10B 7B 


017 80 OVER 


LD 


A,E 




F10C E63F 


01790 


AND 


63 




F10E FE3F 


01800 


CP 


63 




F110 2802 


01810 


JR 


Z, OVERX j 


IF AT END OF LINE 


F112 23 


01820 


INC 


HL J 


ELSE MOVE OVER ON SCREEN 


F113 13 


01830 


INC 


DE J 


AND IN STRINGS 


F114 C31FF0 


01840 OVERX 
01850 ; 


JP 


SCRIPY 




F117 7B 


01870 ENTER 


LD 


A,E 




F118 FEU0 


01880 


CP 


0C0H 




F11A 3«lA 


01890 


JR 


C,ENTER2 1 


IF NOT ON BOTTOM ROW 


F11C 7A 


01900 


LD 


A,D 




F11D FE3F 


01910 


CP 


3FH 




F11F 2015 


01920 


JR 


NZ,ENTER2 


IF NOT ON BOTTOM ROW 


F121 3A06F0 


01930 


LD 


A, (TOPCNT) 




F124 FE32 


01940 


CP 


MAXCNT 




F126 2811 


01950 


JR 


Z , ENTERX 


IF CAN'T SCROLL UP 


F128 CDB2F1 


01960 


CALL 


SCRNUP 




F12B 01C0FF 


01970 


LD 


BC,-64 




F12E 09 


01980 


ADD 


HL,BC 


MOVE UP IN STRINGS 


F12F EB 


01990 


EX 


DE,HL 




F130 09 


02000 


ADD 


BLrBC 


MOVE UP ON SCREEN 


F131 EB 


02010 


EX 


DE,HL 




F132 EO5300F0 02020 


LD 


(CURLOC) ,DE 


UPDATE CURSOR'S POSITION 


F136 CDD6F1 


02030 ENTER2 


CALL 


NXLINE 




F139 C31FF0 


02040 ENTERX 
02050 ; 


JP 


SCRIPY 




F13C 7B 


02070 DELETE 


LD 


A,E 




F13D 2F 


02080 


CPL 






F13E E63F 


02090 


AND 


63 


•A = REMAINING LINE LENGTH 


F140 4F 


02100 


LD 


C,A 




F141 0600 


02110 


LD 


B, 


;NOW BC = REMAINING LtNGTH 


F143 2812 


02120 


JR 


Z, ENDSPS 


;IF AT END OF LINE 


F145 D5 


02130 


PUSH 


DE 




F146 E5 


02140 


PUSH 


HL 




F147 62 


02150 


LD 


H,D 




F148 6B 


02160 


LD 


L,E 




F149 23 


02170 


INC 


HL 


;HL => NEXT SCREEN CHAR 


F14A EDB0 


02180 


LDIR 




;MOVE UP LINE ON SCKEEri 


F14C 4F 


02190 


LD 


C,A 


.•RESTORE MOVE COUNT 


rl4D El 


G2200 


POP 


HL 


; RESTORE STRING POINTER 


F14E E5 


02210 


PUSH 


HL 


;THEN SAVE IT AGAIN 


F14F 54 


02220 


LD 


D,H 




F150 5D 


02230 


LD 


E,L 




F151 23 


02240 


INC 


HL 


;HL ■=> NEXT STRING CHAR 


F152 EDB0 


02250 


LDIR 




;MOVE UP LINE IN STRINGS 


F154 El 


02260 


POP 


HL 




F155 Dl 


02270 


POP 


DE 




F156 4F 


02280 


LD 


C,A 


; RESTORE LENGTH CuUNT 


F157 E5 


02300 ENDSPS 


PUSH 


HL 




F158 09 


02310 


ADD 


HL,BC 


;HL => END OF STRING LINE 


F159 3620 


02320 


LD 


(HL),' ■ 


;PUT A SPACE THERE 


F15B D5 


02330 


PUSH 


DE 




F15C EB 


02340 


EX 


DE,HL 




F15D 09 


02350 


ADD 


BL r BC 




F15E 3620 


02360 


LD 


(HL),' ' 


;AND AT END OF SCREEN LINE 


F160 Dl 


02370 


POP 


DE 




F161 El 


02380 


POP 


HL 




F162 C31FF0 


02390 

02400 ; 


JP 


SCRIPY 




F165 7B 


02420 INSERT 


LD 


A,E 




F166 2F 


02430 


CPL 






F167 E63F 


02440 


AND 


63 


;A = REMAINING LINE LENGTH 
Program Listing 2 Continues 



sor/character and the status switch (ON- 
OFF) or not. If the cursor/character re- 
quires changing, a CPL instruction flips 
the switch, updates it and displays the ap- 
propriate cursor/character. Line 650 
chooses the cursor or character since a 
CPL does not disturb the results of the OR 
A test at line 620. If the cursor is not to be 
displayed, the string pointer is restored 
and JP $ + 5 skips the get cursor 
instruction. 

This jump counts from the address of 
the current instruction to the address of 
the instruction at line 710, or five bytes. 
This saves creating another label for just 
this short jump. (I do not use this tech- 
nique very often, and only for jumps under 
10 bytes.) The program flow merges again 
and either updates or resets the flash 
counter, depending on the value of DE. 

Now the program scans and tests the 
keyboard for a character. If there was no 



"Put any text processing 
routines. . .just before 
the Return instruction." 



new key, the program examines the ad- 
dress of the arrow keys for the exit condi- 
tion. If all four keys are not pressed, con- 
trol (which is just another name for the 
program counter of the Z80) passes back 
to the main loop scanner. 

(Put any text processing routines like 
the conversion scanner mentioned earlier 
just before the Return instruction. If you 
do use such a scanner you will need to 
add a PUSH HL with its corresponding 
POP HL to save and restore the string 
pointer.) 

If you press a key, control is sent to an 
input key processor. This routine turns off 
the cursor and resets the flash counter so 
that the cursor moves without leaving the 
cursor at the old address. Resetting the 
counter makes the cursor visible instantly 
when moved. If I did not reset the counter I 
would be unsure of the cursor's position 
until it blinked on again. If you type a key 
that is not a control key or a printable 
character, control is sent back to the reen- 
try point of the main loop. 

If you type a printable key the program 
displays it at the current cursor location 
and puts it into the current text character 
location. The program then tests for the 
end of the screen line. If the end of the line 
has not been reached it updates the cur- 
sor location pointer and the current text 
character pointers and sends control 
back to the reentry point of the main loop. 
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mission: to defend 
aimd survive! 




by Jeff Zinn 



Now Available: the Futuristic 



W] 



w&^ 







& 



Model 1 AND Model 3 owners may now purchase 
the new, exciting, and versatile "TRISSTICK "'. The 
TRISSSTICK" is compatible with all of our games and 
comes packaged with complete instructions for use 
with your own programs. It features the famous 
Atari joystick with a molded plastic interface 
module that simply "plugs in" to your computer: no 
modification or wiring is required. 



CD 




MiaiiTO&Mil 



P.O. Box 9078-185 Van Nuys.CA 91409- (213)782-6861 



Prices per game: TRS-80 16K Lev2 Modi Mod3 Cassette - 
TRS-80 32K Lev2 Modi /Mod3 Diskette - 
Joystick (specify Modi or Mod3) — 

10% discount for 2 items ordered, 1 5% for 3 or more. 

Please add S1 .75 per order for shipping, foreign orders add $6.00. 

California residents please add 6% sales tax. 



$15.95 All products* -'1982 by Big Five Software. 

$19.95 Programs are all 100% machine language for high quality graphics. Disk 

$39.95 version saves high scores to disk & is compatible with TR.SDOS. Sound 

effects are playable through the cassette AUX plug. Please call or write for 
information on all of our products. TRS-80 & TRSD0S are trademarks of 
Tandy Corp. 
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F169 4F 


02450 


LD 


C,A 




P16A 0600 


02460 


LD 


B,0 


;BC = REMAINING LINE LENGTH 


F16C 28E9 


02470 


JR 


Z,ENDSPS 


jIP END OF LINE 


F16E D5 


02480 


PUSH 


DE 




F16F E5 


02490 


PUSH 


HL 




F170 EB 


02500 


EX 


DE,HL 




F171 09 


02510 


ADD 


HL f BC 




F172 54 


02520 


LD 


D,H 




F173 5D 


02530 


LD 


E,L 


;DE => END OF SCkEEN LINE 


F174 2B 


02540 


DEC 


HL 


;HL => NEXT TO LAST CHAR 


F175 EDB8 


02550 


LDDR 




;OPEN UP LINE ON SCREEN 


F177 4P 


02560 


LD 


C,A 


; RESTORE MOVE COUNT 


F17 8 El 


02570 


POP 


HL 




F179 E5 


02580 


PUSH 


HL 




F17A 09 


02590 


ADD 


HL,BC 




P17B 54 


02600 


LD 


D,H 




F17C 5D 


02610 


LD 


E,L 


;DE => END OF STRING LINE 


F17D 2B 


02620 


DEC 


HL 


;HL => NEXT TO LAST CHAR 


F17E EDB8 


02630 


LDDR 




;OPEN UP STRING LINE 


F180 El 


02640 


POP 


HL 




F181 Dl 


02650 


POP 


DE 




F182 3E20 


02660 


LD 


A,' ■ 




F184 12 


02670 


LD 


(DE),A 


;PUT A SPACE ON SCREEN 


F185 77 


026 80 


LD 


(HL) ,A 


;PUT A SPACE IN STRING 


F186 C31FF0 


026 90 
02700 ; 


JP 


SCRIPY 




F189 D5 


02720 SCRNDN 


PUSH 


DE 




F18A E5 


02730 


PUSH 


HL 




F18B 01C003 


02740 


LD 


BC960 


;15 ROWS TO MOVE 


F18E 11FF3F 


027 50 


LD 


DE,3FFFH 


;DE => END OF SCREEN 


F191 21BF3F 


02760 


LD 


HL,3FBFH 


;HL => END 2nd LAST ROW 


F194 EDB8 


02770 


LDDR 




{■MOVE THE ROWS DOWN 


F196 El 


027 80 


POP 


HL 




F197 E5 


027 90 


PUSH 


HL 


; RESTORE STRING POINTER 


F198 CDD6F1 


02800 


CALL 


NXLINE 




F19B 01C0JFF 


02810 


LD 


BC,-64 




F19E C5 


02820 


PUSH 


BC 


;SAVE FOR LATER USE 


F19F 09 


02830 


ADD 


HL,BC 


;MOVE UP IN STRINGS UNTIL 


F1A0 09 


02840 


ADD 


HL,BC 


;HL => STRING TO BE MOVED 


F1A1 11003C 


02850 


LD 


DE,3C00H 


;DE => TOP LINE OF SCREEN 


F1A4 014000 


02860 


LD 


BC,64 


;BC ■= ONE LINE LENGTH 


F1A7 EDB0 


02870 


LDIR 




;MOVE STRING TO SCREEN 


F1A9 2106F0 


028 80 


LD 


HL,TOPCNT 




F1AC 35 


02890 


DEC 


(HL) 


; ADJUST TOP LINE COUNTER 


F1AD CI 


02900 


POP 


BC 




F1AE El 


02910 


POP 


HL 




F1AF 09 


02920 


ADD 


HL,BC 


;HL -> NEW STRING 


F1B0 Dl 


02930 


POP 


DE 


; AT SAME SCREEN POSITION 


F1B1 C9 


02940 
02950 ; 


RET 






F1B2 D5 


02970 SCRNUP 


PUSH 


DE 




F1B3 E5 


02980 


PUSH 


HL 




F1B4 01C003 


02990 


LD 


BC,960 


;15 ROWS TO SCROLL 


F1B7 11003C 


03000 


LD 


DE,3C00H 


;DE => TOP SCREEN LINE 


F1BA 21403C 


03010 


LD 


HL,3C40H 


;HL => NEXT LINE DOWN 


F1BD EDB0 


03020 


LDIR 




;MOVE THEM UP 


F1BF El 


03030 


POP 


HL 




F1C0 E5 


03040 


PUSH 


HL 




F1C1 CDD6F1 


03050 


CALL 


NXLINE 


;HL => START NEXT STRING 


F1C4 014000 


03060 


LD 


BC,64 




F1C7 C5 


03070 


PUSH 


BC 


;SAVE FOR LATER 


F1C8 11C03F 


03080 


LD 


DE,3FC0H 


;DE => LAST SCREEN LINE 


F1CB EDB0 


03090 


LDIR 




;MOVE ONTO SCREEN 


F1CD 2106F0 


03100 


LD 


HL,TOPCNT 




F1D0 34 


03110 


INC 


(HL) 


;BUMP TOP ROW COUNTER 


F1D1 CI 


03120 


POP 


BC 




F1D2 El 


03130 


POP 


HL 




F1D3 09 


03140 


ADD 


HL,BC 


; ADJUST STRING POINTER 


F1D4 Dl 


03150 


POP 


DE 




F1D5 C9 


03160 
03170 ; 


RET 






F1D6 ED5B00F0 03190 NXLINE 


LD 


DE,(CURLOC) 


;GET CURSOR ADDRESS 


F1DA 7B 


03200 


LD 


A,E 




F1DB 2F 


03210 


CPL 






F1DC E63F 


03220 


AMD 


63 


;A ■ REMAINING LINE LENGTH 


FIDE 3C 


03230 


INC 


A 




F1DF 4F 


03240 


LD 


C,A 




F1E0 0600 


03250 


LD 


B,0 


;BC = DISTANCE TO NEXT LINE 


F1E2 09 


03260 
03270 


ADD 


BIi/BC 


;MOVE STRING POINTER TO 
; START OF NEXT STRING 


F1E3 EB 


03280 


EX 


DE,HL 




F1E4 09 


03290 


ADD 


HL,BC 




F1E5 EB 


03300 


EX 


DE,HL 


;DE => NEXT SCREEN LINE 


F1E6 C9 


03310 
03320 ; 


RET 






0000 


03330 


END 






00000 TOTAL 


ERRORS 









If you press a control key, control is 
sent to the appropriate subroutine for ac- 
tion. At the end of each control key sub- 
routine, control returns to the reentry 
point of the main loop. 

Subroutines 

The main loop calls only three subrou- 
tines: SCRNUP, SCRNDN, and NXLINE. 
They return with DE, HL, CURLOC, and 
TOPCNT appropriately updated to reflect 
modified conditions. 

SCRNUP moves the bottom 15 lines up 
one line and replaces the last screen line 
with the appropriate line of text. SCRNDN 
moves the top 15 lines down one line and 
replaces the top screen line with the ap- 
propriate line of text. 

NXLINE moves both the cursor posi- 
tion and the text position to the start of 
the next appropriate line. NXLINE com- 
putes the distance on the screen, since 
the addresses of the end of a line on the 
screen have the last five bits set. Thus the 
distance can be added to each pointer. 
These three subroutines have no error 
checking, depending on the calling rou- 
tine for error detection. 

The left and right arrows update the 
pointers, provided that movement is 
allowed. The program tests for allowabil- 
ity on the cursor address since line ad- 
dresses for start and end of each screen 
line have the last five bits either zeros or 
ones respectively. The AND 63 operation 
strips off the high three bits and tests for 
zeros, or allows a CP 63 to test for ones. 

The up and down arrows move the 
pointers unless a screen scroll is required. 
If a scroll is required the main loop tests 
for allowability before calling the correct 
subroutine. Allowability testing is based 
on fixed screen addresses. 

The Enter key moves to the start of the 
next line and scrolls if required and al- 
lowed. When a SCRNUP is required the 
pointers are backed up one line after 
scrolling. This allows NXLINE to position 
the pointers as required. 

Delete moves the remaining text in un- 
less there is none. If so, it skips the move 
section and jumps to the end space sec- 
tion. Remember that everything done on 
the screen must also be done in the text. 
Insert moves the remaining text out one 
position unless there is none. If so it 
branches to ENDSPS. Delete and Insert 
are the only routines that do not exit at the 
bottom. 

Feel welcome to use, modify and ex- 
pand Scripy. Please send me your com- 
ments and suggestions on this column. I 
would appreciate your input in developing 
this column. My address is 630 East 
Springdale, Grand Prairie, TX 75051. ■ 
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MTI® can upgrade your 
TRS-80 Model III 



to have giant data storage 
like the Big Boys. 

with prices like the little guys. 

WINCHESTER/e 




MTI DOES IT AGAIN. Ou< WINCHESTER e 

storage and 
turn your TRS-80 ss system 

LIKE THE BIG BOYS. That means you can 
access 5 or 7 5 megabytes of on-line storage 
used by the big companies, such as Xerox. IBM. 
Alpha Micro, and DEC All of this and the 
expansion capabilities to 30 megabytes Typi- 
cally access is 12 times laster than floppy while 
maintaining file compatibility with TRS DOS 
and DOS plus (6 or 9 megabytes unformatted ) 

SIMPLE INSTALLATION. The disk system, s 
easy to install Simply p le connector 

into the rear expansion porl of the Model III 

INCREASED APPLICATIONS. With 
WINCHESTER e you can run hundreds of busi- 
ness applications previously not possible with 
existing lloppy based systems 



OURS IS REALLY USEABLE: Giving you 
Winchester capability with a really useble DOS 
ke other systems the M 1 1 operating 
system does not divide the file size to look like 54 
lloppy disks ol storage It gives the ability lo 
define your file size, any size, up to 5 or 7 5 
megabytes For example This would allow you 
to have ONE FILE with 58.000 customer names 



BACK-UP CAPABILITY. The MTI WIN 

CHESTER e allows fully back-up on any TRS- 
80 Model III floppy or Winchester File may be 
backed up by file, platter, or entire drive Other 
models on the market have severe limitations in 
this area This will give you professional data 
storage ability for virtually hundreds of real 
business needs 



JUST LIKE THE BIG BOYS. 



SIX MODELS AVAILABLE 

Wineries! 5 Megabytes 

Winchester 7 5'e 7 5 Megabytes 

Doubled (10 Megabytes) 
Winchester 2 - Double 7 5 (15 Megabytes) 

Winchester 5/e80 with 80 Irk dual head lloppy 
ster 7.5/e80 with 80 irk dual hd lloppy bk-up 

Prices trom S2.695. 

CP/M-80b MTI can turn your TRS-80 Model III 
into two computer systems. TRS-DOS. and 
CP-M. By adding a CP/M card and an 80 x 24 
column video card, you will convert your compu- 
ter to a CP/M machine 

'149. 
J 695. 
'379. 

WANT MORE? For more information call any 
of our 64 authorized sales and service centers 
listed below II you prefer, you can call or write 
us and we'll send you the information and a 
catalog. 

TRS-80 i ii nark ol Radio V 

MTI is a Regisi<" 



Speed-Up Enhancement 
Internal Disk Drive 
External Disk Drive 



MTI AUTHORIZED SALES AND SERVICE CENTERS 



Anchorage. AK 
Rodgers. AR 
Mesa, AZ 
Phoenix. AZ 
Sierra Vista. AZ 
Tucson. AZ 
Anaheim, CA 
Covins. CA 
Golcla. CA 

Huntington Beach. CA 
Inglewood. CA 
Lancaster, CA 
Montclan. CA 
Northndge, CA 
Orange. CA 
Pacheco. CA 
Placervllle, CA 
Port Huememe. CA 



SA 



(907) 333-8322 
(501) 636-9168 
(602) 833-8949 
(602) 244-9739 
(602) 458-2479 
(602) 323-9391 
(714) 773-0240 
(213) 332-4088 
(805) 967-7628 
(714) 842-1348 
(213) 673-3295 
(805) 942-5747 
(714) 626-4813 
(213) 886-9200 
(714) 771-0880 
(415) 689-2260 
(916)622-4640 
(805) 985-2329 



Redondo Beach, CA 
Riverside. CA 
San Diego. CA 
San Jose. CA 
Santa Ana. CA 
Santa Monica. CA 
Vallejo. CA 
Walnut, CA . 
Westlake Village. CA 
Colorado Spring. CO 
Grand Junction, CO 
Groton. CT 
Wilmington. DE 
Hollywood, FL 
Lynn Haven. FL 
Mary Esther. FL 
Tampa, FL 
Norcross. GA 



(213) 
(714) 
(714) 
(408) 
(714) 
(213) 
(707) 
(714) 
(213) 
(303) 
(303) 
(203) 
(302) 
(305) 
(904) 
(904) 
(813) 
(404) 



370-5556 
781-6361 
275-4243 
946-1265 
850-1228 
393-5785 
554-4933 
594-9760 
706-0333 
630-3334 
434-3616 
445-5166 
762-0227 
981-1011 
265-6452 
243-5793 
247-6023 
449-6982 



Buckingham. IA 
Belleville. IL 
Collinsville. IL 
Oak Park. IL 
Shawnee. KS 
Ashland, KY 
Shreveport, LA 
Anoka. MN 
Cameron, MO 
Great Falls. MT 
Missoula. MT 
Raleigh. NC 
Grand Forks. ND 
West Millord. NJ 
Las Vegas, NV 
Jericho. NY 
New Rochelle. NY 
Syracuse. NY 



(319) 478-2826 
(618) 277-2354 
(618) 345-5068 
(312) 386-3323 

(913) 631-2029 
(606) 325-2210 
(318) 865-7189 
(612)427-5783 
(816) 632-6528 
(406)737-0901 
(406) 549-9715 
(919)755-1175 
(701) 772-7848 
(201) 728-8080 
(702)870-4138 
(516) 333-2266 

(914) 235-4444 
(315) 487-5000 



Troy, NY 
White Plains. NY 
Tonkawa. OK 
Tulsa. OK 
Portland. OR 
Dallas. TX 
Mlssour City. TX 
San Angelo, TX 
Cheyenne, WY 
Buenos Aires. ARG . . 
Pans. FRANCE 
Holm, GERMANY 
Florence. ITALY 
Singapore. JAPAN 
Cape Town. S.AFRICA 
Tahiti, F.P. 
Taichung, TAIWAN 
Bang Kok. THAILAND 



(518) 273-8411 

(914) 761-9283 
(405) 628-2693 
(918) 836-9503 
(503) 281-7640 
(214) 247-6679 
(713) 499-5241 

(915) 658-3781 
(307) 632-9132 

32-1858 

306-4606 

4103-4315 

55-45-4319 

220-7182 

2145-1047 

2-54-47 

4228-5523 

314-1161 



MICROCOMPUTER TECHNOLOGY INC. 

3304 W. MACARTHUR. SANTA ANA, CA 92704 
(714) 979-9923 • TWX 910-595-1902 MTISNA 



»^247 



Call or write lor tree brochure: 

U.S. PRICES. FOB. SANTA ANA 

CALIFORNIA AND MAY VARY BY AREA. 

CP-M is a registered trademark ol Digital 

Research Inc 



."See List ol Advertisers on page 402 
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TRS-80* Computer Owners... 

GREATER VALUES 



for 





New Low Prices 
Model III Disk Drives! 

Complete First-Drive Systems 

Internally mounted drives that feature double- or 
single-density storage, comprehensive pre- 
delivery testing, 48-hour burn-in and, best of all, 
Percom's widely acclaimed disk controller. A 
First-Drive System includes the four-drive disk 
controller, one or two drives, power supplies, 
cables and a fully illustrated owners manual. Use 
Model III TRSDOS*. Percom OS-80+ and all 
other Model III compatible DOSs. 



Note: If you prefer not to make the First-Drive 
System installation, we'll do it for only $29.95 
plus shipping. This includes a 48-hour operat- 
ing burn-in of your Model III computer, instal- 
lation of the drive system and final checkout 
of the expanded system. 



Our Own Fully Tested Drives 

from only $275 

Every Access Floppy Disk drive is electrically tested, mechanically tested and 
bumed-in 48 hours under operating conditions. Look for the signed test list in 
the shipping carton. 

AFD drives are capable of either single- or double-density operation. Store up 
to 364 Kbytes (formatted) in double density. Store twice the data on a single 
diskette using AFD "flippy" drives." 

15-day free trial offer... comprehensive 90-day limited warranty... unbeatable 
prices... AFD-1 00 (a $275.00, -100F (ft $329.00, -200 (ft $429.95, -200F (a 
$449.95. 



How to order - Order by calling Access Unlimited toll-lree on 1-800-527-3475. Or order by mail 
Orders may be charged lo a VISA or Master Card account, or paid by cashier's check, certilied 
check or money order COD orders require 25°o deposit Sorry, we cannot accept personal 
checks We pay shipping and insurance charges on orders over Si. 000. 00 Add approximate in- 
surance and shipping charges lor orders under St. 000. 00 II in doubt about these charges, ask 
when you call in your order Texas residents include 5% sales tax. Minimum mail order $20 00. 
Allow 2 lo 4 weeks lor delivery 
Technical & Texas (214) 340-5366 

Save! VISA and Master Card charges are not deposited 
until the day your order is shipped. 



PRICES AND SPECIFICATIONS SUBJECT TO CHANGE WITHOUT NOTICE. 



Everybody's Favorites - for Less! 



Percom Data Separator 

Green Screen I, II, or III 

Head Cleaning Kit 

Drive Numbering Tabs (pkg 0-3) 

5VV Flip-N-File 

8" Flip-N-File 



$23.95 
$18.95 
$24.95 
$3.00 
$24.95 
$39.95 




LOWER 




^i-i-ti-fcff"^— ' ■■? ***** i 
fl 




Percom's Proven DOUBLER II f 

Upgrade Your Model I to Double Density for 

only $159.95 

And not with some unproven hacker's kit, either. But with an assembled and fully 
tested Percom DOUBLER-in. The DOUBLER-llt simply plugs into the disk drive 
controller socket of your Expansion Interface. Then it lets you store over four 
times more on one side of a diskette, depending on the drive, than you can store on 
standard Tandy Model I drives. Other features: • Reads, writes and formats either 
single- or double-density • Includes DBLDOS rM , a TRSDOS* compatible disk- 
operating system • Runs TRSDOS*, NEWDOStt, Percom OS-80t and other 
single-density software immediately. Change to double-density operation when con- 
venient • Lets Model III software be read on your Model I • Includes on-card high- 
performance data separation and write precompensation circuitry. 



Incredibly Low Prices for Epson and Okidata Printers! 

The two most popular printers on the 
market today. They provide the features 
you want, the reliability you need, a price 
you can afford. 

MX-80 - Call for latest low price. 

Microline 80 only $399.95 

Other models available. 









\tmr^ | 


> 

■"'^2 


mi 





Low Cost 
System Furniture 

Modular design permits cus- 
tom arrangements • Furniture 
styling and quality • TRS-80* 
colors • OK for UPS shipping 
• Reassemble without tools 

System desks from $115 
Printer stands from $144 



Arrick Products Quick-Switch^ 

Jusl flick a switch to connect your TRS-80" printer port from device #1 to 
device #2. Or, "Quick-Switch" a peripheral between computers. Versions 
for RS-232 or Centronics interfacing. Includes 5-foot 34-pin cable with 
card-edge socket, box-mounted 34-pin card-edge plugs. From $79.95. 

* trademark of Arrick Products Company. 



Save! Make ACCESS your one-call shopping center for TRS-80* 
hardware and software. Call our toll-free order number for free 
product literature and latest prices. 



Toll-Free 
Order No. 



1-800-527-3475 



o 



(orders & literature only) 




ACCESS UNLIMITED 



"Trademark ol Access Unlimited 

1 Trademark ol Percom Dala Company. Inc 



401 N. Central Expressway #600 

Richardson, Texas 75080 

(214) 340-5366 ^26 

•Trademark ol Tandy Radio Shack Corporaiion 
ttTrademark ol Apparal Corporaiion 



• See List ol Advertisers on page 402 
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SO REVIEWS 

edited by Michael E. Nadeau 



"You better have 

a good resolution tv 

to play these games." 



Games Trilogy: 
Color Space Invaders 
Meteoroids 
Space War 
Spectral Associates 
Tacoma, WA 
$59.95 cassette 

by David G. Bartlett 

They've always said that the Color Com- 
puter was capable of high resolution 
graphics. These games prove it. (You better 
have a good resolution tv to play these 
games.) All are in machine language and 
require 16K, but not Extended Basic. Mete- 
oroids and Space War require joysticks. 

Color Space Invaders 

Color Space Invaders is the same old 



game that you never get tired of playing, 
but this time you get the invaders waving 
their arms (or is it feet?) and blinking at 
you as they drop their bombs. This game 
can be played with the joysticks but it 
seems easier using the arrow keys and 
space bar. 

You do not have to play at all if you 
want, you can watch the computer play 
itself, but the computer plays such a lousy 
game that you soon get frustrated and de- 
cide to show it how it is done. You also 
have a movable defense shield that pro- 
tects you from falling bombs when posi- 
tioned over your cannon. The shield is very 
hard to position and I find it easier to 
dodge the bombs than to try to use the 
shield. 

A nice feature of the display is the lack 
of a perceptible border around the edge of 




the field and the entire screen flashing 
when you take a hit. The game has 16 skill 
levels. 



"The black hole's 

gravitation is 

what makes 

this game fun." 



Meteoroids 

Meteoroids is an Asteroid-type game 
with very good action and speed. It in- 
cludes most of the features of the popular 
arcade game including alien spaceships 
that fire back. Your ship is supposed to be 
controlled by the joysticks, but in this and 
the Space War game, the ship is very sen- 
sitive and difficult to control and the high 
resolution makes it hard to tell which way 
you are aimed. However, all this adds to 
the skill required and therefore the enjoy- 
ment. Another problem I have is holding 
both joysticks while I try to control the 
craft's aim and position. 

Space War is similar to Meteoroids, but 
the main object is to destroy a death star 
which has only one weak spot. When you 
destroy it you are in for a treat but do not 
be too close when it goes or you will too. 
Some of the obstacles are enemy fighters, 
roving asteroids, space mines and a black 
hole with strong gravitational effect on 
you and your missiles. 

The black hole's gravitation is what 
makes this game fun. You can simulate 
the effect on the Voyager spacecraft as it 
was catapulted past Jupiter and even get 
into an unstable orbit for short periods. Of 
course that is not the real object of the 
game. 

These games have sound. I think they 
are a better bargain than most software 
for this computer and they provide a 
good example of its excellent graphics 
capabilities-^ 
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Master Control 

Soft Sector Marketing Inc. 

Garden City, Ml 

$24.95 

by Scott L Norman 



Master Control is a tape cassette pro- 
gram for redefining TRS-80 Color 
Computer key functions. After reading the 
advertisement I found two features espe- 
cially hard to resist: single-keystroke entry 



32K: 



CLEAR 25, 30200 
CLOADM "MASTER", 16000 




of common Basic commands and auto- 
matic line numbering during program 
entry. 

The cassette is accompanied by an in- 
struction leaflet, which is brief (2-Vi 
pages) but sufficient. The keyboard over- 
lay differs from the one shown in the ad- 
vertisements. Production versions of Mas- 
ter Control use a peel-and-stick foil with 
black lettering on a dull silver background. 
The purchaser removes five die-cut slots 
from the foil (to clear the four rows of keys 
and the spacebar), and then attaches the 
overlay to the computer's keyboard sur- 
face. I did not want to misalign or per- 
manently wrinkle the large, unwieldy 
sticker so I mounted it on a thin sheet of 
clear plastic and cut out the slots using a 
hobby knife. The result was a fairly 
rugged, removable overlay to which I have 
since added a second layer of plastic to 
protect the foil surface. 

Operation 

Master Control is written in machine 
language and is relocatable, a feature 
which I have used to great advantage. The 
instruction leaflet gives these command 
sequences for loading it into the topmost 
1,100 bytes or so of a 16K or 32K computer: 



Although Color Computer documenta- 
tion does not dwell on the point, the num- 
ber following the comma in the Clear in- 
struction specifies the highest (decimal) 
memory address which Basic can use — 
like the Memory Size command of the 
Model I. The 16000 in the 32K loading com- 
mand is a decimal offset, telling the 
machine to load the program 16K higher 
than the loading address specified in the 
program itself. 

I resent anything that steals memory 
from my Basic programs, so I use the fol- 
lowing method to relocate Master Control. 

My system consists of a 16K machine 
with a Cornputerware Power Pack (2K 
ROM plus 6K RAM) plugged into the car- 
tridge port. The RAM is not contiguous 
with the memory normally addressed by 
the Basic interpreter; it starts at decimal 
53248 (hex D000). Since the first loading 
sequence above tells us that Master Con- 
trol's unadulterated load address is 15104, 
I can load it into my outboard RAM by giv- 
ing an offset of 53248 - 15104, or 38144. In 
other words, the single statement, 
CLOADM "MASTER", 38144 does the job. 
This leaves all of the computer's internal 
memory free for Basic programs. The 
same procedure will work for the other 
plug-in RAMs appearing on the market; 
just check their starting addresses. 

No matter how you load it, you invoke 
Master Control with the EXEC command. 
The copyright notice comes up on the 
screen, and the usual flashing block cur- 
sor is replaced by a flashing # sign. To use 
the keyboard normally just type; to use 
any of the new key definitions, press the 
down arrow, which serves as the special 
shift key. The next key you press then per- 
forms its Master Control function. Control 
is not toggled; you must press the down 
arrow before each use of a redefined key. 

Some of the functions of the redefined 
keys require Extended Color Basic. You 
can combine them with individual letters 
to cut down the number of keystrokes for 



other commands; for example, the right 
arrow is redefined as Reset, so the se- 
quence P-down arrow-right arrow yields 
Extended Color Basic's Preset command. 

Space constraints make some of the 
notations on the keyboard overlay rather 
cryptic. As an example, the LEFT$( and 
RIGHT$( functions are abbreviated as L$ 
and R$, respectively. This ceases to be a 
problem after a very short time. 

The control key itself has another 
meaning; pressing the down arrow twice 
in succession generates the STRING$( 
command. A few keys do multiple jobs, 
making use of the regular shift key. For ex- 
ample, down arrow-8 produces the List 
command, while down arrow-shift-8, or 
down arrow-( turns the automatic line 
numbering feature on or off. 

This feature deserves more attention. 
When it is on each time you press Enter a 
new number is printed to prepare for 
the next Basic statement. The default 
value for both starting line number and 
increment is 10. To change, you press 
down arrow- %. The Master Control cursor 
changes to a non-flashing reverse-video #, 
and you key in the new starting line num- 
ber, press Enter, and then key in the incre- 
ment. If you want to change only the start- 
ing line, key in the new starting line num- 
ber and press Break. This is especially 
handy if you want to skip a large block of 
line numbers when keying in program 
statements. 

Setting up the line numbering feature 
does not bring it into play; you still have to 
use the down arrow-( sequence. Turning 
off the automatic numbering in the midst 
of program entry (for editing a previous 
line, for instance) does no harm, and num- 
bering resumes at the next line in se- 
quence when it is resumed. In fact, this 
memory feature extends to the case 
where Master Control itself is turned off 
and later restarted. 

Why turn it off? Well, Soft Sector claims 
that Master Control does embarrassing 
things if left on while running a Basic pro- 
gram which calls for keyboard input. I have 
left it on while running several programs 



"Soft Sector claims 

that Master Control 

does embarrassing things 

if left on while running 

a Basic program." 



16K: 



CLEAR 25, 15104 
CLOADM "MASTER" 
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and have never seen anything untoward, 
but I am not anxious to push matters. 

Master Control operation is not as cum- 
bersome as it sounds. It takes a little while 
to get used to the new command posi- 
tions, just as it takes time to learn the 
command syntax of a new editor. In re- 
turn, though, you save considerable time 
and effort in program entry. 

On the subject of saving effort, another 
feature deserving special mention is the 
"custom" key, or down arrow-K. You can 
redefine this key at will to generate a com- 
mand or group of commands of particular 
use to you. As received, the custom key 
prints these statements: 



FORI- 1 T03:CSAVEM"MASTER", 15KM.16380.151W: 
FOR Y = 1 TO 1000: NEXT Y: NEXT I: SOUND 128.10 



This series is followed by a programmed 
Enter command. In other words, Master 
Control comes prepared to make three 
copies of itself. To redefine the custom 
key press down arrow-& and enter the de- 
sired commands. Remember, you can 
string commands together with colons 
and can include Enter in your definitions. I 
have used this feature to set up single-key 
.entry of such things as the setup com- 
mands for high-resolution graphics and 
the PEEKs and POKEs used in merging 
Basic programs. 

I have used Master Control as standard 
procedure ever since I bought it. The first 
program I wrote with it was a foreign lan- 
guage drill which made extensive use of 
data statements for bilingual word lists, 
and PRINTOs and CHRSs for screen 



prompts and graphics. I avoided an awful 
lot of repetitive typing. I would make 
minor changes, though. Master Control in- 
consistently include opening parenthe- 
ses with some commands; I would like to 
see the "(" included with CHRS. Line, Cir- 
cle, and PEEK. Similarly, it does not seem 
especially worthwhile to have included 
Print in Master Control's repertoire when 
the Color Basics already have a two- 
stroke abbreviation (Shift-?) for it. 

The best compliment I can pay Master 
Control is this: On those occasions when I 
try to do some quick and dirty program- 
ming without it, I find myself pressing 
something like down arrow-5 and wonder- 
ing why the machine does not switch to 
Edit mode as it obviously should! ■ 
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C.C. Writer 

L.W.C. Dyle 

Transformation Technologies 

Bloomlngdale, IL 

$30 cassette 

by Paul Grupp 

A word processing program for 
the TRS-80 Color Computer? Many 
wonder if the TRS-80 Color Computer 
could ever make a good word processing 
machine, regardless of the quality of the 
software. The flaws that immediately 
come to mind are the toy-like keyboard, 
the minuscule screen display, and the ri- 
diculous reverse video system Tandy 
chose to indicate lowercase. 

These can all be overcome. The key- 
board works a lot better than it looks and 
machines like the Apple get by with the 
small display. The lowercase problem is 
another matter, but by the time you read 
this, a modification kit should be available 
that gives the Color Computer true lower- 
case capabilities— descenders and ail. 
The Color Computer may never be a con- 
tender in the serious word processing 
market, but it could easily fill the needs of 
thousands of casual writers for an ade- 
quate system at a reasonable price, pro- 
vided good software is available. 

C.C. Writer is one of the first word pro- 
cessing programs to be announced for the 
Color Computer. It is written in Basic with 
23 pages of well-written documentation. It 
will run on a 16K machine, but since this 
allows you to write only about two pages 
of text before saving to cassette, 32K is 
recommended. With 32K of RAM. you will 
be able to handle 8-12 pages before sav- 
ing to tape. If you find this limiting, note 



that the program supports file chaining. 
You can string several files together to 
produce one continuous printed document. 

Because the program is written in 
Basic, it cannot compete with more so- 
phisticated word processing systems. 
C.C. Writer lacks almost all the features 
that I have come to depend on in the 
Model I Electric Pencil and Model II 
Scripsit. 

You load the program into the machine 
and set up the print format parameters. 
This is an easy task, and this part of the 
program is very well written. Things get a 
little rougher when you start typing in your 
text. C.C. Writer is sentence oriented; you 
have to hit Enter at the end of each 
sentence. This program displays a lot of 
information on the screen at the end of 
each sentence (number of paragraphs you 
have used, number of characters left, and 
so on). This conspires with the small 
screen size of the TRS-80C to let you see 
precious little of your polished prose at 
one time. It is rather frustrating if you 
want to scan what you have just written 
before going on. 

Word processing is popular because 
you can make corrections painlessly 
while typing. When the document is com- 
plete, you can correct mistakes that 
slipped by the first time without retyping 
the whole thing. C.C. Writer does reason- 
ably well on the last sort of editing, but 
comes up short on the first. 

Once you have entered a sentence, the 
only way to correct it is to go back to the 
menu, select one of the edit modes, find 
the sentence you want to change, and cor- 
rect the mistake. This is a major hassle. 

The author defends his program by sug- 
gesting that the best way to write is to sit 



down and enter your thoughts. Later, 
when the creative binge is over, you can 
go back and correct any mistakes you 
may have made. Great theory, but imprac- 
tical. If I look up and see a glaring mistake, 
I can not think about anything else until I 
have fixed it. 

Entering text into C.C. Writer may be 
frustrating, but printing it once it is in the 
machine is considerably more satisfying. 
The author has thoughtfully provided all 
the important functions. You have com- 
plete control over margins, line spacing, 
paragraph indentation and page length. If 
you want your finished product to look 
flashy, you can add headers and page 
numbers and even justify the text. Most 
documents produced on C.C Writer will be 
completely indistinguishable from docu- 
ments produced on, say, a TRS-80 Model II 
with Scripsit. I plugged a CPRINT module 
from Micro Labs into the ROM pak slot on 
the right side of the computer to provide a 
parallel printer port. I plugged a NEC Spin- 
writer with a standard TRS-80 printer 
cable into that. This arrangement worked 
perfectly with C.C. Writer. 

Is C.C. Writer for you? It depends on 
your needs. If you are interested in word 
processing because of the flexibility and 
speed it can add to your writing, this pro- 
gram will not satisfy you. If you do not 
have a typewriter, but do have a Color 
Computer and a printer, you could do a 
lot worse than C.C. Writer. As the pro- 
gram stands, the finished product looks 
good, but I rate my old Smith Corona 
several points ahead in the ease-of-use 
department. Those who crave true word 
processing power would do well to wait 
for something a little more sophisticated 
to come along. ■ 
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PORTABLE 

Untangle + Beautify with the Organizer 




Now you can place your TRS-80 Model 1 components into 
one convenient, portable, handsomely designed desk top 
package. The ORGANIZER puts everything witin easy reach, 
with room for Monitor, Expansion Interface, four Disk Drives, 
Diskettes, Cassettes, tape recorder and many accessories. 
The ORGANIZER eliminates messy wires, reduces eye and 
body strain, provides room for ventilation, and works as a 
dust shield. 

The ORGANIZER is constructed of wood with a rich walnut 
tone, strain resistant finish (similar to quality stereo speaker 
cabinets). When the handles are attached it is TOTALLY 
PORTABLE so that you can move your computer to home 
and office easily without unplugging cables. 

There is sufficient ventilation space in the cabinets, but the 
accessory fan is recommended when using for prolonged pe- 
riods. The ORGANIZER has been designed to give you 
enough room on the sides for all connections and cables. The 
disk drive cabinet can be placed next to or on top of the video 
cabinet (see pictures). 

The ORGANIZER consists of two cabinets: 

CABINET ONE holds Monitor, Expansion Interface (including 
LOBO, LNW, and all other presently made interfaces), Power 
Supplies, Line Filters, Cables, Power strip, fan and has an 
easily removable front panel for re-booting. 

CABINET TWO can hold up to four Disk Drives, Tape Record- 
er, fan, Diskettes and cassettes. This cabinet is usable with 
any manufacturers^ 5 1 /4" disk dries horizontally or vertically. 
THIS CABINET IS MADE TO HOLD THE DISK DRIVES FOR 
THE MODEL III AND THE COLOR COMPUTER. 

BUY BOTH $72.50 




*We also have a cabinet for the Color Computer. This cabinet 
is designed to protect and house the keyboard computer 
component and to handle any size video monitor on top. The 
disk drive cabinet can also be purchased with this unit (see 
accessories price list). 

Additional Accessories: 

Fan $19.50 

Carrying Handles $1 7.50 

Cabinet One $42.00 

Cabinet Two $32.00 

Color Computer Cabinet $32.00 

(+ disk cabinet) $54.50 

APPLE CABINET $37.50 

For VISA, MASTERCARD, or C.O.D. 
For fast service 

CALL NOW COLLECT 

(213) 456-9023 

Or send check or money order to: 



DesignaTron 



2794 Hume Rd., 



Malibu, California 90265 



►'See List of Advertisers on page 402 



80 Microcomputing, March 1982 • 51 



SO REVIEWS 



SECS 
Sigmon 
Data Soft, Inc. 
Sepulveda, CA 
$29.95 each 



by Douglas R. Cook 



If you are interested in exploring what 
the color graphics TRS-80 Color Com- 
puter has to offer, then you are in for a 
treat. The Screen Edit Control System, 
SECS, is one of the most useful tools 
available for color graphics. SECS is two 
programs, one in machine language and 
the other in what I would call Color 
Graphics Basic. You must learn a few new 
commands, but nothing wild. They are a 
little different than ordinary Basic. If you 
have a reasonably good understanding of 
almost any Basic, then you should have 
no trouble adapting to SECS. 

With SECS programs you can produce 
any 8 by 10 dot matrix graphics character 
you desire. A group of 64 characters may 
be created and used at any one time. The 
characters and programs generated may 



be saved to tape and reload. 

Along with the SECS programs comes 
an Editor program. It allows you to conve- 
niently edit programs or text on the 
screen. A large number of corrections, ad- 
ditions or deletions may be made with 
ease, at any location on the screen. Pro- 
grams or text may be saved to tape and 
then reloaded later with either Basic or the 
Editor program. 

The SECS and Editor programs are ex- 
cellent. A large television screen will pro- 
duce a more detailed graphic character 
that the SECS program allows. 

Sigmon 

This is a 6809 machine-code monitor 
program giving you 18 powerful corn- 
mands. Dump, List, Disassemble, Assem- 
ble, Find, Move, Step, Break, Set, Go, 
Write, Read, PLOAD, PRT, NOPRT, Mode, 
Exit and Speed. Sigmon comes with a 
14-page instruction booklet and a source 
listing. The program is written in code that 
can be relocated. It is 6K long and located 
at the top of memory and can be protected 
by Basic's Clear command. 

The monitor is easy to use and the in- 
struction manual is well written and infor- 



mative. DataSoft has noted several ad- 
dresses used by Basic and by Sigmon as 
buffered storage areas. There are no Ba- 
sic entry points noted, but Sigmon does 
use portions of the operating system for 
subroutines. 

The Dump command displays hex or 
ASCII and has the option of including the 
graphic values along with memory values. 
The List command displays a character 
representation of memory contents, with 
a large number of locations displayed per 
line. The Step command can be very use- 
ful in fixing stubborn programs. The Write 
and Read commands create and load a 
Basic-compatible (CLOADM) tape file. The 
disassembler displays address, opcode, 
mnemonic and next address. The assem- 
bler allows entering either numeric values 
or mnemonics directly into memory. The 
Move command moves a block of memory 
from one location to another. These are 
only a few of the options available, but 
they give you an idea of the power of 
Sigmon. 

Sigmon is a good monitor program. 
Even though it is a large program, the ca- 
pabilities it has are necessary for the seri- 
ous programmer. ■ 



Chromasette Magazine 
Santa Barbara, CA 93102 

$45/year 



by Douglas R. Cook WB7SOW 

Chromasette Magazine is the second- 
generation magazine of the suc- 
cessful CLOAD Magazine. Chromasette is 
dedicated to the Radio Shack TRS-80 Col- 
or Computer. Chromasette arrives month- 
ly on cassette containing six to eight pro- 
grams in TRS-80 Extended Color Basic. 
The programs are usually long, so 16K of 



"Most Chromasette Magazine 
programs are written in 
TRS-80 Extended Color Basic. . . 




memory is required. Along with the tape 
are several pages of notes, comments and 
instructions on running the programs. 
Chromasette points out problems and ex- 
plains solutions they have developed in 
programming Color Basic. 

The program notes suggest changes to 
the programs to do slightly different 
things or improve operation. The modifi- 
cations help the user explore the pro- 
grams and understand how they run and 
what happens when the changes are 
made. The exercises provide insight for fu- 
ture programming techniques. 

The first program on every tape is a 
graphics display called Cover. Cover is dif- 
ferent every month. Besides enjoying the 
graphic display, by listing this program 
you can learn how to perform color 
graphics with the Color Computer. 



A few of the programs are instructional. 
In Jumble you un-jumble letters of various 
groups to spell a word. How Far computes 
the distance between two locations on 
Earth. This program is useful in amateur 
radio operations for determining the 
distance between any two radio stations 
in contact with each other. 

Some of the programs are games. The 
games are entertaining. You will probably 
not find these games boring after one or 
two plays. Color graphics and sound are 
included in the games. Most programs 
can be run by either keyboard or joystick 
control. 

Most Chromasette Magazine programs 
are written in TRS-80 Extended Color Ba- 
sic, some use machine-language subrou- 
tines. This is a magazine for the advanced, 
average and beginning programmer. ■ 
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Scarfman 

The Cornsoft Group 

Indianapolis, IN 

Models I & III 

$19.95 cassette & disk 

by J. L. Latham 



Scarfman is like the popular arcade 
game Pacman. 
The instructions advise you to power up 
under TRSDOS and then insert the disk in 
drive for Model I and in drive 1 for Model 
III. However, you can bring up your Model I 
cold and boot up the Scarfman disk 
without TRSDOS. 

In the arcade version several colored 
monsters run around a simple maze. You 
control another creature shaped like a 
large C. The object of the game is to eat 
the monsters. It is not just a chase-the- 
monsters-through-t he-maze situation, 
however. Under special circumstances 
the monsters change color and should 
you catch them at the wrong time, they 
eat you. 

Each game begins with your character 
at the bottom center of the screen and the 
five monsters at the top center. Arrow 
keys control your character. Little square 
boxes dot your path and as you pass each 
one you gain points. Plus signs occur 
around the maze and force all the 
monsters into the safe-to-eat stage. When 
you have disposed of blocks and pluses 
the maze fills with them again and the 
level of difficulty increases. The monsters 



improve at finding you or hiding and they 
revert to inedible monsters more quickly. 

The action is fast. You have to stay 
sharp to prevent being devoured. All too 
often I have sneaked up on a tasty 
monster only to have him turn into a man- 
eater and scarf me off the screen. Some 
people say the arcade version is slower 
than the TRS-80 version. 

And this black and white version is 
superior to one version written for the Col- 
or Computer. 



When your game is finally over, press- 
ing Enter starts the monster running 
again and skips Reboot. 

Sound is an extra feature. A speaker 
amplifier attached to the cassette cord 
produces sound effects each time a 
square, plus, monster or you are de- 
voured. The sounds are simple and syn- 
chronous with the speed of the action. 
The Cornsoft Group also states that the 
program will work with the Alpha Prod- 
ucts Joystick. ■ 



Newscript 6.0 

ProSoft 

North Hollywood, CA 

Models I and III, 48K 

$99.95 disk 

by Jon Boczkiewicz 

My system consists of a Model I, disk 
drive, 48K of memory, an expansion 
interface and the Radio Shack's Line 
Printer IV. I consider Scripsit to be a very 
useful word processing program, however 
I dislike not being able to use the high- 
density proportional type in a justified for- 
mat. The only company offering what I 
wanted — a justified proportional font, as 
well as the other features -was ProSoft. 
Newscript has a fantastic documenta- 
tion. (A friend who works with mainframes 
claims the documentation alone should 
cost $80) It runs 150 pages with a table of 
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contents and index. Every bit of it (except 
the graphics) was done with the Newscript 
program. 

The Format 

There are several programs, most of 
them are written in Basic for easy modifi- 
cation. The program seems to have been 
written with the Radio Shack LP IV (Cen- 
tronics 737) printer in mind, but with a 
strong support for the MX-80, though any 
printer may be used. There is a section on 
installation procedures, explaining how to 
customize the program for the printer and 
the DOS being used. DOSPLUS, LDOS, 
NEWDOS and TRSDOS are supported. 
There is also a section (and a utility pro- 
gram) for purchasers of the earlier ProSoft 
programs, Subscript/Subedit. A sample 
letter serves as an example, and the 
documentation covers some editing. 

If you don't like Radio Shack's Level II 
manual, you probably won't like New- 
script' ^documentation. Most of the man- 
ual consists of commands, explanations, 
and examples. There is no way to look up 
what you want to do. However, most of the 
commands are logical (.ce for center, .us 
for underscore). Even though there is a 
summary sheet you will probably keep the 
manual near you for a while. 

The two chief programs are Edit and 
Script. Edit allows full editing of a docu- 
ment, including insert and delete, block 
copy, move or delete, and global search 
and change. A convenient feature for me, 
living on a power line which gets its share 
of breaks and outages, is Autosave, which 
allows the document to be saved auto- 
matically as often as you desire. It does 
take a few seconds to record the file, but 
not nearly as long as would be required to 
retype even one screen. It also has the 
ultimate command, Whoops. This restores 
the screen to its original contents wiping 
out all changes. 

Documents are created as a group of 
files. You may set file length at the begin- 
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ning as well as file name, but if you over- 
run the file length, it extends itself auto- 
matically. It is recommended that a series 
of short files be used rather than a few 
long ones as they are much faster to save 
and recall. Since it is possible to put 
breaks in the document to allow changing 
the disks, the length of a document is ac- 
tually unlimited. The greatest page num- 
ber is 999, but pages do not have to be 
numbered. Files can be chained during 
editing or during printing. 

In the Edit mode, the top line is the 
command line, and the lines running 
down the side are the Line Manipulation 
Area (LIMA). This allows line-oriented 
editing, along with character-oriented 
editing. The lines are 255 characters 
long, and the screen serves as a window 
on this line. There is one problem— ma- 
nipulating material is limited to that 
shown on the screen. The scale with the 
Top-Of-File (and End-Of-File) markers is 
for aligning columns and can be called 
up at any time. Starting on the third 
line, you can use Script commands or 
write text. 

The program supports Radio Shack's 
lowercase modification, and gives type- 
writer-like reversal. When the end of the 
line is reached, the program backs up to 
the last space and pulls any characters 
after it onto the next line, so lines break 
only at the end of words. Though the pro- 
gram is in Basic, there is no problem with 
missed keystrokes, even while the words 
at the end of lines are being manipulated. 
The only delays occur when Enter is 
pressed, any commands in the command 
line or the LIMA are processed, and the 
screen is refreshed. This takes about two 
seconds for refreshing, plus whatever 
time is required for processing commands 

When you create a document, edit sig- 
nal completion by typing End on the com- 
mand line. This saves the file in process, 
and gives you the opportunity to stop, edit 
another file, or go into Script (default). The 
file must be saved, as Script is another 
program 13 grans long. Because the disk 
must have a minimal DOS on it, as well as 
the various word-processor programs, not 
too much can be stored on it. If you have 
only one disk drive, you must store on 
another disk and put the main disk back 
when switching to another program. Here 
double-sided disks come in handy. 

Printing is controlled by a series of 
command words which must be placed 
first on a line, though there may be several 
command words in a single line. Each is 
two letters long and starts with a period, 
such as .pp, the indicator for paragraph. 
Some have parameters which can be 
varied, others do not. Some have special 



limitations; for instance, .pp must be the 
last on a line, if you put several on a line, 
offering greater flexibility. 

Newscript features easily used controls 
for double-width (expanded) letters, 
underlining single-sheet printing, over- 
striking for darkness, double spacing, 
editing and others. 

The print font can be changed and de- 
faults to proportional or high-density 
print, justified by increasing the space be- 
tween the letters to fill the space at the 
end of the line. You can control the 
amount of fill allowed and the default 
gives a slightly greater amount of space 
than the printer ordinarily does. This 
makes the printout more readable. Chang- 
ing this is a sophisticated control which 
requires planning and experimentation. 

Formatting controls allow for hanging 
indents or offsets, variable indentation to 
set off lines, and skipped lines. Up to six 
header and footer lines may be used, with 
a left-justified, centered, and right-justi- 
fied section on each line. You may merge 
other files with the file being printed, or 
use keyboard input where desired. The 
program has many capabilities and for 
this reason is slightly complicated. 

Newscript differs from earlier ProSoft 
products with some important changes. 
Mininit, an extra option on the earlier pro- 



grams, is now included, which supports 
Radio Shack's lowercase modification. 
This also speeds up the keyboard, provid- 
ing repeat and debounce, both of which 
can be tailored to the needs of the key- 
board and typist. You no longer have to hit 
Enter with every line and forced spacing is 
possible. 

The program is not perfect. It does not 
provide any means of hyphenating, and 
some commands are not convenient. But 
you get a phone number to call for help, 
and they provide service for their 
customers. For those of you who have 
sophisticated dot-matrix printer and a 
limited budget, this is definitely a program 
to consider. ■ 

Since I wrote this article several things 
have changed, I moved up to a Model III 
and needed a new program to run on it. I 
called and was told that there had been 
several changes (enough to justify calling 
the new program 6.1), and that Prosoft 
would convert and update the program for 
$6. The new program is available on a 
TDOS diskette, a subset of DOSPLUS, 
which gives much shorter transition time 
between Edit and Script. This costs $12 
for Model I, or $10 for Model III, though it is 
standard for new customers. And the pro- 
gram contains even more capabilities 
than before. ■ 



XBUG 

Computer Applications Unlimited 

Rye, NY 

Models I & III 

$19.95 



by Alan Burnes 



XBUG is an excellent monitor and 
software debugger with efficient 
power, clear documentation and low cost. 
If you are just getting started with ma- 
chine-language programming, XBUG will 
fulfill your needs. If you already use an as- 
sembler and disassembler as an experi- 
enced machine-language programmer, it 
is a good investment as an interactive 
debugger. 

XBUG has 25 commands and command 
variations. These commands can be cata- 
gorized into memory and register manipu- 
lation functions and software develop- 
ment functions. 

Memory and Register 
Manipulation Functions 

Display and search memory. Displaying 



a page of memory is accomplished by 
entering the command byte and starting 
address for the memory page. The 
memory display format for XBUG is 16 
lines, 16 bytes to a line, in a split-screen 
format with the hexadecimal display on 
the left and the ASCII representation on 
the right. 




Single keystrokes initiate a scroll for- 
ward through memory in 256-byte blocks 
or 128-byte half-blocks, or a scroll back- 
ward in full 256-byte blocks. 

Searching through memory for bit pat- 
terns up to 16 bytes long is also easy. 
XBUG searches all memory starting at the 
current page and displays either a page of 
memory on a find or returns a "no find" 
message. Memory searching may be re- 
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HAPPINESS IS. ..NEWSCRIPT 

THE WORD PROCESSOR FOR 
BUSINESSMEN AND PROFESSIONALS 

We offer you ongoing support by answering 
your questions and providing reasonably 
priced enhancements. 

A FEW OF NEWSCRIPT'S STANDARD FEATURES: 

*Form Letters with merging of names and addresses 
*Gives superb appearance to your final documents 
*Comprehensive manual with hundreds of examples 
•Centering, top/bottom titles, indents, pagination 
•Underlining, boldface, double-width, italics f 
*Sub-scripts, super-scripts, proportional pitch t 
•Generates Table of Contents, sorted Index 
•Allows block graphics, special symbols t 

•Search and replace globally or within a range 
•Block move, copy, delete, insert from other file 
•AUTOSAVE. WHOOPS. DIRECTORY. KILL. REPEAT 

•Based on IBM's "EDGAR" and "SCRIPT" systems 
•Supplied ready-to-run on "tiny" DOSPLUS 

•Easily transferred to NEWDOS. NEWDOS/80. LDOS. TRSDOS 
•Includes handy Quick Reference Card 

NEWSCRIPT CONTROLS THESE PRINTERS : 

•EPSON MX-80. MX- 100: all 12 fonts, plus underlining 
and block graphics; italics with GRAFTRAX 

•Centronics 737. 739; Radio Shack L.P. IV. L.P. VIII. Prowriter. 
Daisy Wheel II. NEC PC-8023A, TEC 8500R, C.ITOH 8510; 
Right-justified true proportional printing (ledding) 

"Good support for: Diablo, Spin writer, Starwriter, QUME, Microline, 
Anadex, modified Selectric, standard line printers 

NOW AVAILABLE: right-justified true proportional support for 
Diablo, Spin writer, Starwriter. and Qume (Daisy Wheel Option)** 

TYPICAL USER AND REVIEWER COMMENTS: 

the manual: 

"It definitely rates the first '10' given to any documentation reviewed in this column." (A. A. Wicks, COMPUTRONICS, October, 1981) 

the software: "An excellent Word Processor" (D.H.); "Absolutely fantastic" (S.E.S.); "You have features that I cannot duplicate 
on my $14,000 system" (J.B.) 

the support: "Your phone information system and the prompt and courteous staff that you provide to help your clients...are worth 
the cost of the system. (V.H.H.) 

REQUIRED CONFIGURATION: 48K TRS-80 with 

one disk drive. Specify Model I or Model III. 




t Some features work only if your printer has the mechanical capability. 
* * DaisyWheel proportional is extra-cost option. 
* Effective April 10th.. NEWSCRIPT will be S12S. 

TO ORDER, CALL NOW, TOLL-FREE: 

(800) 824-7888, Operator 422 

CALIF: (800) 852-7777, Oper. 422 

ALASKA/HAWAII: (800) 824-7919 

FOR TECHNICAL INFORMATION CALL: 

(213) 764-3131, or write to us. 



NEWSCRIPT 6.2: 
NAILING LABELS OPTION: 
Special: NEWSCRIPT + LABELS: 
Daisywheel Proportional Option: 
"PENCIL" to NEWSCRIPT Converter: 
Manual Only ( 1 80 pages): 
Reference Card Only: 

Electric Webster + Correction Feature: 
Graphics Editor and Programmer: 
DOSPLUS 3.4: 

Order from your Software dealer, or from: 



$ 



99.95 
29.95 
115.00 
49.95 
14.95 
30.00 
2.50 

149.50 

45.95 

149.95 



TERMS: We accept VISA. Mastercard, checks, Money Orders, COD. and 
even cash. We pay shipping via surface UPS inside U.S.A. Please add 
S3. 00 for Blue Label, 6% tax in California, and 15% outside North A 
ica (air shipment). 
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sumed by two keystrokes since XBUG re- 
tains the current search pattern until you 
enter a new pattern. 

Modify memory. XBUG modifies memo- 
ry either by setting a block to a constant, 
or by writing hexadecimal data into 
memory byte by byte. 

To set a block of memory to a constant 
requires you to enter a single letter com- 
mand, the starting address, the length of 



the block to set, and the desired hexadeci- 
mal constant. If no constant is given, zero 
is the default value. This function is useful 
in debugging software that reads or writes 
to buffers. With the buffer set initially to a 
known state the exact changes caused by 
test software can be observed. 

To enter hexadecimal code using the 
keyboard requires a command byte, start- 
ing address, and an even number of bytes 
up to 16, of input data. 



CPRINT Parallel Printer Interface 
Micro Labs, Inc. 
Richardson, TX 
$49.95 



by Bill Dye 



Until recently, owners of the Color 
Computer were limited to using the 
serial interface to attach a printer. Radio 
Shack's only compatible printer was the 
Line Printer VII with its limited features 
and marginal print quality. The alternative 
was a printer that could be converted to 
the RS-232 interface. Even then, if the seri- 
al printer could receive at a higher speed, 
the Color Computer was limited to a 
2,400-baud output. Also, the Color Com- 
puter only put out a seven-bit signal un- 
less the PTFX program was loaded first. 

CPRINT is an eight-bit Centronics-com- 
patible, parallel printer interface that 
functions as a bi-directional port. After 
connecting cables and powering up, 
EXEC49152 initializes CPRINT; all PRINT# 
-2s and LLISTs are redirected to the 
parallel port. 

I tried a short LLIST first. Although I 
was running at 2,400 baud, I was surprised 
at the increase in speed. CPRINT gives 
you control of the line and page length 
and skips over the perforations between 
pages. To change these values, the ex- 
cellent instructions give you the locations 
to POKE. 

The benefits of the CPRINT are most 
apparent for anything beyond straight 
printing. A serial interface usually loses 
the first byte if the computer wants to 
transmit while the printer is busy. After 
transmitting a line, the computer waits for 
a ready signal before continuing. A paral- 
lel interface does not have that problem; 
the computer can get the next line ready 
while the printer is busy with the last. 

The eighth bit allows you to use all 
printer control codes and block or bit 



graphics. If you have an editor that works 
with ASCII, fancy print graphics become 
less of a chore. 




CPRINT's screen printer can be activat- 
ed anytime the cursor is on the screen. 
Text is printed normally; a period replaces 
any unprintable characters. After getting 
a screen print, you must hit Enter to clear 
the machine or the next entry is ignored. 
This is handy for saving a screen of code 
for later reference, but if used to print a 
program-generated screen, the input vari- 
able name is deleted from the program. 
This makes documentation of program 
screens time-consuming. Compensating 
for this, you can turn off the printer and 
the computer will not hang. This lets you 
get screen prints while suppressing regu- 
lar printing. 

CPRINT creates some radio frequency 
interference (RFI). Micro Labs recom- 
mends using a twisted or shielded printer 
cable or shortening the cable. If that 
fails, unplug the cable, when you are not 
printing. 

CPRINT is well made and increases the 
selection of printers available to the Color 
Computer owner. ■ 



Display and modify registers. XBUG 
supports display and modification of the 
Z80 registers. The registers are displayed 
on the left, 16 bytes of memory to which 
the registers point, are displayed in the 
center, and the status flag registers are 
displayed on the right. The registers can 
be modified with a command byte, the 
code modified for a register, and a 
hex byte or hex word can be inserted into 
the register. 

Software Development Functions 

XBUG relocates to any address in RAM. 
Therefore, it can be used with virtually any 
system program regardless of its location 
in memory. The only requirement is that 
you have at least 2,560 bytes of RAM for 
XBUG either before or after the system 
program. 

XBUG single steps at three speeds 
allowing careful perusal of tricky portions 
of code or fast stepping through loops. 

Another handy debugging technique is 
the use of program breakpoints to stop a 
program at a user-specified place. With 
XBUG you can set up to 10 program break- 
points and remove them either selectively 
or globally. When a program hits a break- 
point the last register or memory display 
is updated and displayed on the screen. 

During debug XBUG's display and key- 
board monitoring capabilities can be dis- 
abled allowing test program access to the 
keyboard for input and to the screen for 
output. 

I liked XBUG's ability to load and write 
system tapes. This function is useful to 
backup or rewrite system tapes at 1,500 
baud for my Model III. 

If you desire a printout of a screen dis- 
play XBUG can route a copy of the screen 
through the parallel printer port, or with 
the Model III through a serial port. 

XBUG Documentation 

XBUG's simple manual describes all 
the commands complete with examples. 
Its organization is logical and clear and in- 
cludes several appendices. The first ap- 
pendix is a hexadecimal-ASCII conver- 
sion table. Following that is a full index to 
the Z80 instruction set including the CB, 
ED, DD and FD extensions. It is possible 
to use this index to disassemble some of 
the screen memory displays, although a 
disassembler would be preferable. 

I am impressed with the quality of this 
product. The manual, software and exam- 
ples are excellent. 

I found Computer Applications Unlimit- 
ed to be conscientious when I did have 
questions on their software. XBUG is a 
good investment. ■ 
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(Graphics Editor and Programmer) 

G.E.A.P. 

J.F. Consulting 

Palm Desert, CA 

$16.95 

by Richard C. McGarvey 



One of the most tedious parts of pro- 
gramming is the design and layout of 
the CRT display. Whether you are drawing 
and animating a space ship attack or set- 




ting up a data form to be filled in by a com- 
puter operator, the display programming 
is time consuming and nerve wracking. For 
this reason I have often considered writ- 
ing a program that would let the program- 
mer draw or write on the CRT and manipu- 
late the video contents into proper posi- 
tion and proportion. Once the image was 
perfect, the computer would generate the 
program to recreate the screen every time 
it was needed. This program could then be 
merged into the main program. 

G.E.A.P. 

Well, William Mason of J.F. Consulting 
beat me to it. G.E.A.P. is a Basic program 
that does all I planned and more. 

Any programmer can easily learn to 
draw a screen of graphics or text and then 
save the screen as a Basic program 
merged into the final game or applica- 
tion program. 



"You can even 
create your 
own modules. . . 



G.E.A.P. allows the programmer to ma- 
nipulate all or part of the screen. The pro- 
grammer can try different layouts without 
damaging the previously saved screen. If 
the new way looks better he can perma- 
nently update the screen. Otherwise he 



can recall the old screen layout and try 
something else. 

G.E.A.P. Modes 

G.E.A.P. has four modes. Regular mode 
is signified by a flashing dot cursor. The 
cursor can be moved in any direction with 



The Designate mode is the guts of the 
G.E.A.P. program. While in this mode you 
can select any area of the screen, reverse 
it, move it, tilt or rotate it, multiply the 
views of it, magnify it, fill it in, shrink or ex- 
pand it and save it if you like it or cancel it 
if you do not. You can draw half of a 



"The Designate mode is 
the guts of the G.E.A.P.. . ." 



the arrow keys in any combination. The 
left arrow moves the cursor left and the up 
arrow moves it up. Both arrows together 
move the cursor up and left. If the shift key 
is held as the cursor is moved, a line is left 
in the trail of the cursor. Want to erase the 
line? Go back over it with the cursor with- 
out holding the shift key. The Regular 
mode is active at power up and can be 
reached from all other modes (except the 
Print mode) by hitting the period key. 

The second mode is the Print mode. The 
main function is to put text on the screen. 
Enter the Print mode by hitting the aster- 
isk. Once in this mode the cursor changes 
to an asterisk. The cursor can be moved 
with the arrows; anything that is typed ap- 
pears on the screen. To exit the mode you 
must first enter the Keypad mode by hit- 
ting the Clear key. Once in Keypad mode 
every other mode is readily available by 
hitting the appropriate cursor key. 

The Keypad mode is available at the 
touch of the < key or by the Clear key if 
you are in the Print mode. The cursor, the< 
symbol, is again positioned by the arrows. 

Now look at your keyboard. Note the 
keys Q, W, A, S, Z and X. These form a 
graphic block similar to the graphic 
blocks on the TRS-80. If you want to draw 
a graphic block position the cursor to the 
right of the location that you want the 
graphic. Hit the keys corresponding to the 
portion you want lighted. If all six keys are 
hit, in any order, a graphic block equal to 
CHR$(191) is drawn on the screen. If only 
the Q is hit only the upper left corner of the 
graphic block is lit. 

Other commands in the Keypad mode 
are for the advanced user. To exit the 
Keypad mode, hit the cursor key of the 
mode you want. 

The fourth and final mode is the most 
interesting. The Designated mode is en- 
tered by hitting the - key. A flashing - is 
used as the cursor. This cursor will not 
erase as it moves. 



screen, duplicate the half and merge it in- 
to an entire screen. The only limit is your 
own imagination. 

Saving the Program 

There are nine options available while 
in all modes except the Print mode. These 
options are entered by hitting the number 
9. One of these options, Dump Program, 
lets you save your creation or reload an- 
other for reediting. The Dump option is 
compatible with disk, cassette or 
Exatron's Stringy-Floppy. You need only 
enter CSAVE or CLOAD for cassette, 
Save"f ilespec" or Load"f ilespec" for disk, 
or ©SAVE and ©LOAD for Stringy- 
Floppy. Once done you can reenter 
G.E.A.P. with simple USR(x) statements. 

You are also given the option of saving 
the screen in compressed or non-com- 
pressed code. You can save a designated 
figure in a Basic string. You can even 
specify the line numbers for screen stor- 
age so you can merge it with a program 
more easily. 



Final Pointer 

G.E.A.P. can incorporate input state- 
ments with user-specified or default vari- 
ables. Graphic animation is possible by 
updating only the moving part of the 
screen. You can insert delay loops. You 
can even create your own modules and ex- 
pand on G.E.A.P. if it does not have a fea- 
ture that you need. The documentation, 17 
pages of intensive instruction, is broken 
down into three stages so you can gradu- 
ally master the utility. 

The only way to find out how indispens- 
able this program is for the Basic pro- 
grammer is to buy it and use it. I have seen 
other programs that claim to do what 
G.E.A.P. does but no other has lived up to 
my expectations. ■ 
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Micro Cue Print Buffer 
Microcompatible 
Atlanta, GA 
S299-S599 

By G. Michael Vose 

80 Microcomputing technical editor 



There are few things more frustrat- 
ing than sitting, watching and waiting 
while your new 40-characters-per-inch, 
dot-matrix printer ties up your computer 
for 15 minutes printing out your latest pro- 
gram. Invariably, you think of an enhance- 
ment to add— but forget it by the time the 
listing is printed out. Wouldn't it be great 
if you could use your machine while that 
printer trundles along? 

Or you might work in an office with two 
computers but only one printer. It is a ma- 
jor hassle to unhook the printer cable from 
one machine and attach it to the other. 
There is also the problem of having one 
computer and using a dot-matrix printer 
for drafts and a letter-quality printer for 
correspondence— what a pain switching 
the cable back and forth. 

Occasionally, you might need to print 
out a series of files. If you don't have a 
spooler program, you have to print each 
file separately, twiddling your thumbs be- 
tween typing file names and giving print 
commands. Wouldn't it be nice to send all 
those files out at once? 

As you may have guessed, there is a so- 
lution to these problems. Microcompati- 
ble, Inc., with a factory in North Carolina 
and a marketing department in Georgia, 
has introduced a printer buffer called the 
Micro Cue. Available in four different 



models, the Micro Cue can help you solve 
your computer/printer interface problems. 

80 Checks It Out 

The model being tested here at 80 Mi- 
crocomputing is the PB322P Print Buffer, 
containing two parallel transmit ports and 
two parallel receive ports. The unit con- 
tains 32K of memory and a Z80 micropro- 
cessor. A 1K ROM contains the software 
to control the system. All these electron- 
ics are driven by a 2.0MHz clock. 

The on-board memory is the buffer's 
principal claim to fame. It allows a user to 
transfer files from the computer to the 
buffer for printing. This transfer operation 
takes only a few seconds. The computer is 
then free for other tasks while the buffer 
drives the printer. The 32K buffer will hold 
Scripsit files up to 18 pages in length. It 
would be hard to write a Basic program 
that could fill the entire buffer. 

Micro Cue's other notable feature is its 
multiple port configuration. With the right 
model, you can hook up two printers and 
two computers to the buffer and select 
any combination of computer and printer 
with a simple flick of a switch. You cannot 
send output from both computers to the 
same printer at the same time, of course, 
but only Inspector Clouseau would want 
to do that anyway. 

The Micro Cue recognizes all your com- 
puter's codes as well as messages from 
your printer. It lets you know if the printer 
is not ready and also recognizes out-of- 
paper signals. The buffer can receive data 
when the printer is not ready, but it will not 
send data until the printer is set to go. 

The Micro Cue even allows single page 
output. This is accomplished with some 




difficulty, however. It is necessary to 
send an ASCII control character (1 E hexa- 
decimal) at the end of each page of text. 
This causes the buffer to halt the trans- 
mission of data, turn on the paper-feed 
light and wait. After putting a fresh piece 
of paper into the printer, you press the 
paper-ready switch down to resume print- 
ing. To disable the page-break feature, 
there is an override position for the paper- 
ready switch. 

There are serial data transfer versions 
of the Micro Cue and three single port buf- 
fers available, as well. Prices start at $299 
and go up to $599 for the double-port 
model reviewed here. 




The Micro Cue Print Buffer in action. 



The Acid Test 

At the editorial offices of 80 Microcom- 
puting, we use our Model I to run dozens 
of program listings every day. Our listings 
include Basic programs, Assembly-lan- 
guage source files and even the odd For- 
tran or Cobol listing. The Micro Cue we've 
been testing interfaces our Models I and 
III to an NEC Spinwriter and sometimes a 
Centronics 739 or Radio Shack Line Print- 
er V. In over three months of use, we have 
not experienced a failure. The only incom- 
patibility detected was with the NEWDOS 
Zap utility— the output to the printer 
became garbled using this utility. 

The only inconvenient feature we've 
found with the Micro Cue is the inability to 
software control the print process once it 
has begun. For example, if you forget to 
set the paper in your printer to the top of 
the page, you cannot stop the printout by 
entering commands into the computer. 
The only way to stop the printout is to turn 
the buffer's power switch off. Then you 
have to wait 10 to 1 2 seconds for the mem- 
ory chips to bleed off their electrical 
charge, turn the power switch back on and 
reload the buffer to print the file (after 
you've corrected your mistake). There is 
probably no way to get around this prob- 
lem—it means you must place the unit in 
an accessible place. 

In spite of its healthy price tag, Micro 
Cue comes with only one cable, a 34-pin 
edge connector at one end and a DB25 
male connector on the other. You must 
come up with your own additional cables 
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ASYLUM 




ASYLUM is the most sophisticated, sinister, challenging 3-D 
graphics adventure ever written! You are placed in an asylum 
for Deathmaze 5000 survivors. Your only goal: ESCAPE! 

Asylum has 3-D PERSPECTIVE GRAPHICS! And it has 
over 1200 locations! Hallways recede into the screen, as 
though you are actually there! Doors open and close! Beds, 
desks, and even other inmates are drawn on the screen! And 
graphics are generated instantaneously! Simply press an 
arrow key to move or turn, and you are moved. Absolutely no 
waiting! 

An ADVANCED LANGUAGE INTERPRETER means that 
Asylum will understand English language commands from a 
vocabulary of almost 300 words. Commands may include 
complete statements. "GET EVERYTHING ON THE DESK 
EXCEPT THE MATCHES" is perfectly legal! 

To whet your imagination: the Hall of Doors, Nicholson the 
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nails, the old roadster in the dragstrip, the ancient catapult 
room, plus dozens of other problems and a reasonable 
amount of built-in, subtle hints. 

p ASYLUM: 

A TRS-80 Cassette - $19.95 

*« — . TRS-80 Diskette - $22.95 

S Model I or Model III 
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MED SYSTEMS SOFTWARE 

P.O. BOX 3558 CHAPEL HILL, NC 2751 4 
TO ORDER, CALL 1-800-334-5470 ,. 
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BASIC 



Announcing the quick and easy way 
to write custom business applications 
, in hours instead of weeks. 



At last, you can get a microcomputer 
business application development system 
that is designed for one purpose 
only . . . fast production of bug-free 
professional-looking custom business 
applications. 

"Thinks" the Way Business Thinks 

Quic-N-Easi is the revolutionary screen- 
format-oriented application development 
system that thinks in terms of transactions, 
records and fields. The same way business 
thinks. Quic-N-Easi expects an application 
to include custom formatted key entry. It 
lets you set up the character, field, and 
record validity checks business wants by 
merely filling in the blanks. It automatically 
signals in real time when errors occur 
and "explains" what is wrong in plain 
English messages you select for each 
custom application. 

Much Faster than BASIC 

Quic-N-Easi programming is much faster 
than BASIC because the standard busi- 
ness applications (key input, file handling, 
and output reporting) are handled via 
pre-programmed parameter driven sub- 
routines. To produce finished professional 
looking custom business programs, you 
merely: 

Draw the business formats directly 
on the CRT in minutes. 

Fill in the blanks for field attributes, 
validations, tables, etc. 

Invoke the Quic-N-Easi interpreter 
to check fields against tables, check 
limits, access data files, and perform 
business calculations, etc. 



fv. 



I .11 Optionally define file and output 
' ' formats right on the screen. 

Pays for Itself in a Week 

By eliminating the coding drudgery of 
writing screen, field, file, and format 
programs in BASIC, programmers are 
free to concentrate on the unique business 
aspects of each custom application. No 
professional programmer can afford to 
develop one more business application 
without Quic-N-Easi. The savings are so 
significant with Quic-N-Easi, it can actually 
pay for itself in only one week. 

Gives You Much More than a 
Screen Builder . . . the Only 
Complete Business Development 
System for Microcomputers 

Quic-N-Easi handles the entire application 
development job from key entry to final 
output. You get everything you need, 
including detailed documentation to begin 
writing professional programs the first 
day. You get . . . 

r^Tj A singularly capable Quic-N-Easi 
'—■ — ' screen builder 

r#I] A comprehensive parameter driven 
L ' Quic-N-Easi content editor 

T^l A full Quic-N-Easi interpreter 
'— ' language 

[~^1 A complete Quic-N-Easi file 
'— — management system with Index 
Sequential, Random, and 
Sequential File Access Method 

A complete Quic-N-Easi print format 
handler 



A detailed Quic-N-Easi reference 
manual 



A Quic-N-Easi self-teaching guide 
A Quic-N-Easi quick reference card 
T # -| An interface to other program files 

ORDER NOW— Don't Waste 
One More Day Coding BASIC 

Your time is too valuable to waste hours 
on end writing BASIC code. The first 
week you use Quic-N-Easi, your finished 
business programs will look better, run 
better, and return more dollars to you. 
Don't delay. Order Quick-N-Easi today. 
Phone ... 215 968-0689 

nmc- n • Ea5i 

STANDARD MICROSYSTEMS INC. 

136 GRANITE HILL COURT, LANGHORNE, PA 19047 

Pricing Information 

■ Complete Quic-N-Easi system $395 

■ Manual only $60 

■ Visa and Mastercard accepted 

■ Dealer Inquiries Invited 

Minimum System Requirements 

Z80 • 48K • Floppy Disc 

• CP/M (except TRS80 Mod III) 

Disk Formats 

8" Single Density • VECTOR 
GRAPHICS • MICROPOLIS Mod 2 • 
TRS80 Mod II • TRS80 Mod III • APPLE 

• OSBORNE • INTERTEC • ZENITH 

Apple, CP/M, Intertec, Micropolis, and TRS80 are 
trademarks of Apple Computer, Digital Research, Intertec 
Data Systems, Micropolis Corp., and Tandy Corp. 

^279 

PRINTED IN USA 
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for multiple port configurations. We were 
a little short of cables when we hooked 
our unit up so we had to press some 40-pin 
cables into service. I was forced to experi- 
ment to get the pins lined up correctly. Un- 
til I succeeded, the unit would not work. 
The documentation never mentioned this 
potential source of difficulty. This is a ser- 
ious omission since some buyers of the 
Micro Cue will likely possess limited 
technical knowledge. 

In fact, the instruction manual is Micro 
Cue's one major fault. It contains a very li- 
mited amount of information; it is poorly 
laid out (for example, one note refers the 
reader to "see Configuration below" but 
this configuration is actually two pages 
away); and the diagrams are hard to read. 
Microcompatible offers a detailed hard- 
ware description, including schematics, 



plus a programmer's guide containing the 
ROM's software listing for an additional 
$25. 1 wouldn't be tempted to spring for an- 
other 25 bucks, though, after looking at 
their original manual. 



". . . the instruction 

manual is Micro Cue's 

one major fault." 

The Future 

The folks at Microcompatible are an ac- 
cessible bunch. I talked to them on the 
phone twice in recent months. They said 



Plug'n Power Controller 

Tandy/Radio Shack 

Fort Worth, TX 

Models I & III, Color Computer 

$39.95 

by John W. Warne 



The Plug'n Power Controller connects 

■ to the cassette recorder jack on the 
Model I keyboard and plugs into an or- 
dinary electrical outlet. The instructions 
cover use with Model I, Level I and Level II, 
Model I TRSDOS, Model III and the Color 
Computer. 

Once loaded, the software prompts for 
the correct time to the nearest minute. It 
provides a real-time display of hours and 
minutes in the lower left of the screen. 
Times must be entered in the 24-hour 
system (17:00 equals 5 p.m.). 

To control a light, radio or other small 
appliance, you need a BSR-type module 
for each appliance. The modules are wide- 
ly available. The device to be controlled is 
plugged into the module. A one-letter 
house code and a one-number unit code 
are selected on the controller module. The 
module is plugged into any polarized 
electrical outlet. 

The computer awaits instructions in the 
direct command mode. A screen status 
display (Fig. 1) indicates the condition of 
each module. A unit is turned on by enter- 
ing the house code, the unit code and the 
desired activity (on/off for appliance 
modules, on/off, dim and bright for lamp 
modules). There is no feedback from the 
controlled module to the software. The 
status is only an indication of software- 



issued commands, not the actual condi- 
tion of the module. 

HOME CONTROL SYSTEM 



COMMAND? BR8 






HOUSE CODE: N 


UNIT STATUS 




1 OFF 


2 OFF 3 OFF 


4 OFF 


5 OFF 


>6 0FF 7 OFF 


8 OFF 


9 OFF 


10 OFF 11 OFF 


12 ON 


13 OFF 


14 OFF 15 OFF 


16 OFF 



Fig. 1. 

Level I machines ai)ow up to 32 lines of 
programming code, the Color Computer 
up to 30 and Level II can use 45. The 
instruction booklet does not state the 
number of lines for the Model III. 

Execution of commands proceeds a 

# TIME HOUSE CODE UNIT CODE COMMAND 

13 04:00 N 05 ON 

14 04:30 N 05 OFF 

15 05:30 N 05 ON 

16 06:15 N 16 ON 

17 06:15 N 04 ON 

18 07:15 N 04 OFF 

19 06:30 N 05 OFF 

20 07:30 N 05 ON 

21 09:00 N 05 ON 

22 10:00 N 05 ON 

23 12:20 N 05 OFF 

24 12:35 N 05 ON 

21:52:30 NEXT LINE TO BE EXECUTED: 18 

Fig. 2. 



"(There is) no 
automatic restart. 



they are working on new software that will 
allow software switching between devic- 
es using the multiple port Micro Cue. (This 
is possible now for the Z80 machine lan- 
guage programmer— it is possible to send 
256-byte chunks of code into temporary 
storage in the buffer with an LPRINT 
CHR$(27) "L" command.) The switches on 
the front panel will still be usable, accord- 
ing to a development engineer I talked 
with, but software control of this function 
will also be available. The company did 
not indicate what this upgrade will cost 
existing owners. 

The Micro Cue is about the size of a 
Lynx modem and is housed in a light grey 
cabinet. It is unobtrusive and quite useful. 
Depending on your needs and budget, it is 
another nifty peripheral for your favorite 
computer. ■ 



step at a time. The number of the next 
event is displayed at the bottom right of 
the screen. Once all events are performed, 
the computer starts again at the first 
event. Fig. 2 illustrates a typical page from 
a schedule. 

Commands are provided to insert, 
replace and delete command lines, page 
the display, jump through the list and exit 
the programming mode to the command 
mode. The controller will not operate 
automatically from the command mode. 
You must remain in the programming 
mode for events to be executed by the 
real-time clock. 

Exiting to TRSDOS and using the DOS 
Dump command transfers the controller 
fiie to disk. (The instructions do not ex- 
plain what, if anything, can be done for the 
non-disk user). Once the file is saved, the 
instructions do not tell you when or how to 
get the file back into operation. The only 
clue is in the filename used in the ex- 
ample— DATA/CMD. I realized the entire 
controller system had been saved, not just 
the programmed event schedule. You re- 
boot the program by typing the filename 
used. 

The instruction manual includes sever- 
al Basic routines for accessing the con- 
troller modules for incorporation in user 
programs. The real-time clock is not active 
except while using the full controller soft- 
ware package. 

One disadvantage is the lack of any 
backup in the event of power failure. The 
software has no automatic restart feature 
and the clock has to be reset each time 
the system is rebooted. Those planning to 
use it for security lighting over weekends 
or vacation trips are forewarned. ■ 
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Disk-80 

Micromint Inc. 

Woodmere, NY 

$275 kit, $380 assembled 

by Dennis Bathory Kitsz 



You unpack it, plug it in, turn it on and 
it works. That's refreshing for a 
TRS-80 Model I system expansion— and 
surprising. But Disk-80 is that easy and 
reliable. 

Designed by Steve Ciarcia, Disk-80 is a 
disk controller interface and memory ex- 
pansion for the Model I TRS-80. It includes 
the usual complement of expansion fea- 
tures: floppy disk controller, 32K memory 
expansion, Centronics-type parallel 
printer port, and an interrupt-driven real- 
time clock. It is compatible with all TRS-80 
software. 

Disk-80 is not unique; in fact, it is mun- 
dane. But uniqueness is rarely the criteri- 
on for Model I system expansion. Rather, 
transparent operation and high reliability 
are essential, and these qualities are ad- 
mirably present in Disk-80. Two novice 
TRS-80 users and I used (and abused) the 
unit for three months and it never ex- 
hibited any unpleasantries. 

The address and data buses are fully 
buffered for noise-free operation as well 
as the power essential to drive peripheral 
devices. Unlike the Tandy modification or 
the LNW-80 design, Disk-80 does not use 
(nor apparently need) passively terminat- 
ed signal lines. The device is designed 
very compactly and internal noise is 
minimal. Only the memory refresh and 
read/write circuitry is terminated, and as 
an added bonus, the sensitive refresh cir- 
cuitry is doubly buffered and reshaped 
with Schmitt trigger ICs and fed through 
gates and resistors that stabilize its lines 
for dramatically reliable upper memory. 




Furthermore, all power supply traces to 
the memories are handsomely bypassed— 
a technique where capacitors are placed 
near the parts in question to minimize 
neighborhood noise during memory use. 
The memories are located together on the 
far edge of the board, using by-the-book 
placement. 



The disk control system is a pleasure to 
use because it is invisible. Disk-80 incor- 
porates a hardware data separator of 
standard design as standard equipment, 
and it works with the precision of the Per- 
com add-on for the Radio Shack interface. 
Disk read errors were common to TRS-80s 
until designers went back to the drawing 
board and read Western Digital's recom- 
mendations for their own disk controller 
chip— use an external data separator. 
Disk-80 does this and again uses Schmitt 
triggers for signal reshaping on informa- 
tion incoming from disk drives. You can 
add the usual four drives with Disk-80. 

The real-time clock also includes de- 
sign upgrades, including CMOS integrat- 
ed circuits to lower power consumption 



and noise and increase precision. The par- 
allel printer port (incorporated in the pow- 
er supply board) is standard. The power 
supply itself is adequate and concisely 
designed. The entire expansion unit is 
packaged in a small plastic case less 
than half the size of the Radio Shack 
expansion system. 

Excellent documentation and full sche- 
matics are provided with Disk-80, and the 
construction article (Byre, March 1981) de- 
scribes details of the circuit operation and 
unveils many of the mysteries of expan- 
sion interface operation. 

Reviewing Disk-80 is almost incon- 
gruous, because any comments can 
be summarized with the sentence, 
"It works. "■ 



I 



6809 Assembly Language Programming 

Lance Leventhal 

Osborne/McGraw-Hill 

Berkeley, CA 

$16.99 

by Phil Saunders 

I bought a home computer to learn As- 
sembly language. However Radio Shack 
has no manual for programming the 6809 
microprocessor in the Color Computer. 
Therefore one of my first purchases was 
6809 Assembly Language Programming. 

This is the fifth volume in his series on 
Assembly language programming. Other 
books in the series concern programming 
the Z80 and the 6502. 

Leventhal assumes the reader has a 
basic knowledge of microcomputing prin- 
ciples. 6809 Assembly Language Pro- 
gramming is divided into five basic sec- 
tions: Fundamental Concepts, Introduc- 
tory Problems, Advanced Topics, Soft- 
ware Development, and the 6809 Instruc- 
tion Set. Following are five appendices 
and an index. 

The Fundamental Concepts section 
gives an introduction to Assembly lan- 
guage. It gives reasons for using Assem- 
bly language and compares Assembly 
language with high-level languages (Pas- 
cal and Fortran). This section describes 
the functions of an assembler, including 
special features such as macros and con- 
ditional assembly. It goes on to describe 
the architecture of the 6809 in comparison 
to the 6800. Also discussed are address- 
ing modes and conversion of 6800 pro- 
grams to the 6809. The final chapter gives 
the syntax rules of the standard Motorola 
assembler. I refer to this valuable sec- 
tion constantly. 




The second section starts you program- 
ming. First there is a statement of the pur- 
pose of the program, a sample program, 
the source code (with comments) and the 
object code. An explanation of the in- 
structions and programming methods 
used in the program follows. The pro- 
grams, accompanied by text, are followed 
by problems for the user to solve. 

I need to say a word about the pro- 
grams. All begin at zero— fine for most 
computers. However, this is part of the 
mysterious memory used by Basic. 
Despite what the manual says about this 
memory being available for machine- 
language programs, every time I POKE a 
number into memory location $01, the 
number changes. This means a monitor is 
probably necessary for programming or 
the programs have to be relocated. Ac- 
tually, the book is designed to be used 
with an assembler: I strongly recommend 
using one. 

Problems covered in the second sec- 
tion include transferring data, program 
loops, character codes, and arithmetic 
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problems. Code conversions and using 
tables are also covered. 

The Advanced Topics section uses the 
same format as section two. It covers ad- 
vanced programming methods and gives 
notes on their use. This section also 
shows some peripherals for the 6809. 
Some information, particularly on the 
6820 Peripheral Interface Adapter, is 
useful in interfacing other devices. Also 
shown is an Analog-to-Digital converter 
for the 6809. Since this is a full eight-bit 
device, it could extend joystick range. In 



addition, interrupts and a real-time clock 
are both discussed. 

The fourth section covers software 
design: structured programming, modular 
programming and flowcharting. These 
chapters also have a thorough discussion 
of coding, debugging, testing and an 
often forgotten topic, documentation. 

This is followed by the section on the 
6809 instruction set. There are details of 
how each instruction affects memory lo- 
cations and registers, often shown in sev- 
eral addressing modes. Included in these 



descriptions are mnemonics, allowable 
modes, object code, and the number of 
bytes needed. Also shown are 6800 in- 
structions with their 6809 translations. 

In summary, the book is an excellent 
value. It contains vital information for pro- 
gramming the 6809. Although not written 
for the Color Computer, most information 
is relevant. It is not for the absolute begin- 
ner; if you are just starting I recommend 
Ron Bishop's book Basic Microproces- 
sors and the 6800 or the various volumes 
of An Introduction to Microcomputing. ■ 



TRS-80 Graphics 
Robertson and Grillo 
Tandy/Radio Shack 
Fort Worth, TX 
Softcover, 133 pp. 
$7.95 

by Bruce Douglass 

There are not too many books that deal 
with a variety of graphics techniques 
for the TRS-80. This is not surprising, 
since the graphics are not something to 
get excited about when compared to, say, 
the Atari. They have not, however, been 
utilized to their potential in many pro- 
grams available on the market. This book 
is a good, inexpensive introduction for the 
beginner to this fascinating topic. 



them. An example for a line-printer display 
of Snoopy's friend Woodstock is given. It 
is done in the classic variable-density 
printer-character style by actually "draw- 
ing" the figure inside LPRINT" " state- 
ments, and then simply printing them. 
This is a simple approach that is easy for 
anyone to understand. The use of Tab is 
then explained by example, and some for- 
matted outputs are shown. The next few 
routines print out variations of sine 
curves, along with harmonics of the sine 
function. 

There follows a valuable discussion of 
histograms, or bar-graphs, with routines 
to generate examples. While certainly a 
simple topic, it is useful for the end-user. 

The graphics dealt with so far have 
been quite elementary, but Chapter 4 dis- 



"This book is a good. . . 
introduction to TRS-80 graphics." 



The book is in a large format and is easy 
to read. If you can write a routine to draw a 
line between two points or draw a circle 
anywhere on the screen in less time than 
it takes for you to pour a cup of coffee, 
then this book is not for you. It does not 
even mention machine language, and so 
all the graphics techniques used are im- 
plemented in Basic. 

This book is a good elementary intro- 
duction to TRS-80 graphics. One valuable 
aspect of the book is the preponderance 
of example Basic routines, along with ex- 
ample outputs for each routine. For the 
beginner, this approach should smooth 
over any fears of dealing with a complex 
subject. 

It begins with a topic not mentioned 
much in these days of CRTs— printer 
graphics. Different logos are displayed 
with short Basic routines to produce 



cusses computing pictures. Some of the 
examples are interesting. One routine 
generates a sine wave for the CRT display. 
Some problems and solutions follow— for 
example, the printer-graphics problem, 
"What is the distribution of heat in a room 
as the exterior of a Franklin stove heats up 
from 70 to 400 degrees?" An interesting 
and useful routine is one that prints 
blocks of characters so the user can scan 
and determine appropriate density char- 
acters for printer graphics. 

Chapter 5 develops the idea of data 
statements storing encoded graphics for 
later display. Some of the graphics used 
here work acceptably, and some simply 
do not come off at all. The table-driven 
silhouette of a witch is not readily recog- 
nizable, but it at least introduces the topic 
to the uninitiated. 

So far, all of the graphics have been 



ASCII-character oriented. Nothing is 
wrong with that, but it certainly does not 
exploit the power of the TRS-80 graphics 
characters. This problem is solved in 
Chapter 6. STRING$( ) is employed as well 
as CHR$( ), demonstrating their uses. This 
discussion includes a short lesson on the 
graphics codes. Example routines include 
how to draw a box around a message, and 
a routine that displays oversized random 
digits using the graphics characters. 
There is even a short routine to display an 
oversized digital clock. 

In chapter 7, pixel graphics are intro- 
duced. Although it might be thought na- 
tural to begin here and later introduce the 
other topics, this arrangement is logical 
and is a useful progression. The Set and 
Reset commands are explained well, and 
serve as a useful supplement to the Level 
II manual for the beginner. Example rou- 
tines do such exciting things as draw 
lines between two points or draw circles 
of a given radius around a point on the 
screen. Other routines draw the state of 
Massachusetts and a smiling face. 

The last chapter deals with motion 
graphics. It begins with the usual ping- 
pong ball idea of reflection and uses the 
idea to generate interesting displays with 
the inclusion of obstacles for the bounc- 
ing pixel. A marquee program fails rather 
miserably. The authors attempted to 
make this introduction to graphics as sim- 
ple as possible, and so greatly limited the 
animation used. Perhaps it will be effec- 
tive in exciting the imagination of the 
readers to develop more intricate 
displays. 

As mentioned, this is a very elementary 
approach to graphics for the TRS-80. Pixel 
graphics are not even discussed until the 
seventh chapter and not very much is 
done with them after that. However, for 
the neophyte learning to use his com- 
puter, this book may well provide a 
valuable introduction to the topic of com- 
puter graphics.* 
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Microcomputer Math 

William Barden Jr. 

Micro Applications Publishing 

Mission Viejo, CA 

Softcover, 168 pp. 

$9.95 

by Bruce Powel Douglass 



Barden's new book, Microcomputer 
Math, deals with the structure of 
computer mathematics on a very elemen- 
tary level. Although the book is specifical- 
ly aimed for TRS-80 and Color Computer 
uses, most of the information applies to 
all binary coded arithmetic. This book is 
CPU independent; no CPU instructions 
are mentioned: Z80, 6809, or otherwise. 




Readers of Barden's other literary 
efforts, such as TRS-80 Assembly 
Language Programming, are aware of 
(Barden's) loose writing style. His anec- 
dotal writing approach lessens the fears 
of readers intimidated by the subject. It 
makes for wordy reading, but for many, a 
painless approach is worth the verbosity. 
Readers more at home with academic 
writing may find it a poor time investment. 
Barden uses the anecdotal approach with 
a bit more gusto in the present volume. It 
neither hinders the presentation of the 
material, nor does it greatly aid it. 

The book is divided into 10 chapters, a 
glossary and two appendices. The topics 
range from an introduction to binary num- 
bers to a brief discussion of floating point. 
Each chapter ends with a few exercises to 
test understanding, and the uncomment- 
ed answers can be found at the end of the 
book. The first appendix is a hex-octal- 
binary-decimal conversion table, and the 
second appendix is a two's compliment 
number conversion chart for decimal to 
binary and vice versa. 

The first chapter introduces the reader 
to the narrative's main character, Big Ed. 
Throughout the book, Ed learns more and 
more about numbers through the help of 
customers from microcomputer compo- 
nent manufacturers. The topic dealt with 
an introduction to binary numbers and 
converting binary to decimal. Once this 
concept is firmly entrenched, Barden in- 



troduces the reader to a green creature 
with eight fingers on each hand. The 
topics of position-dependent numerical 
value are covered well from a simple 
standpoint (although it is not referred to 
as such). Certainly, anyone with a high 
school degree has seen this topic before, 
and so it does serve to begin on a common 
ground. 

Chapter 3 begins the real information 
with the subject of two's compliment and 
signed numbers. This excellent chapter 
presents the information very understand- 
ably and simply. Addition and subtraction 
of eight-bit operands is covered well, and 
the discussion includes the necessary 
topic of "carries" and "borrows." The 
algorithms are presented well, although it 
might be useful here to present Z80 or 
6809 instructions in the examples to ac- 
custom the reader to Assembly language 
and how they manipulate numbers. 

Chapter 4 is a brief chapter and covers 
overflow, carries, and flags that inform 
you of such occurrences. The chapter 
shows and describes the flags for both 
the TRS-80 Model I and for the Color Com- 
puter. Chapter 5 presents logic and shift- 
ing operations. The logic operations dis- 
cussed include OR, AND, XOR and NOT. 
Rotates, logic shifts and arithmetic shifts 
round out the chapter. 

Now that the preliminary work is out of 
the way, Barden approaches multiplica- 
tion and division algorithms. Barden uses 
two methods to introduce multiplication: 
successive addition and the "shift and 
add." He also discusses signed multipli- 
cation and uses the XOR to get the sign 
bit, performing the multiply on the ab- 
solute value of the numbers, and then if 
the sign is negative, set the MSB. The re- 



are relatively simple to implement com- 
pared to multiple-precision multiplies and 
divides. Barden presents an algebraic fac- 
toring method. The concept is simple 
enough, and the discussion is straightfor- 
ward. Barden dismisses the problem of 
multiple-precision division with a com- 
ment that it is difficult to implement (he re- 
turns to it later in the chapter on floating 
point numbers). 

Chapter 8 discusses binary fractions 
and lays the groundwork for the topic of 
floating-point numbers (to be discussed 
soon). The chapter presents binary num- 
ber scaling as an alternative approach to 
dealing with binary fractions. These tech- 
niques work on fixed-point numbers, and 
so serve as an introduction to a topic and 
often discussed in the current microcom- 
puter literature. 

Chapter 9 deals with the problem of 
converting numbers into ASCII represen- 
tations for display. It includes conversion 
of fixed-point binary fractions as well as 
integers to ASCII. Again, the information 
is presented in a clear, if not concise, 
manner. 

Barden begins floating point with a dis- 
cussion of scientific notation, introducing 
the ideas of exponents and mantissas. He 
briefly discussed the format for single and 
double-precision numbers. Unfortunately, 
Barden did not mention floating-point 
arithmetic except to mention that it is a 
difficult topic. 

It is unfortunate that Barden did not 
spend another 20 pages discussing imple- 
mentation of floating-point arithmetic 
on the microcomputer. In my opinion, it 
seriously undermines the utility of the 
book. I purchased this book to learn about 
the number formats used by the TRS-80 to 



"Barden begins floating point 

with a discussion 

of scientific notation. . . " 



mainder of the chapter deals with division 
algorithms, and Barden presents two 
methods, successive subtraction and re- 
storing division. People performed divi- 
sion using this latter approach before ma- 
chines appeared to do it for them. A very 
brief mention of what to do with signed 
operands ends the chapter. 

Chapter 7 discusses multiple-precision 
arithmetic. It presents additions and sub- 
tractions, complete with borrows and car- 
ries in algorithmic form. Of course, these 



aid the writing of some complex matrix 
operations in machine language, and I 
am disappointed that it is not helpful 
in this regard. 

This book is an excellent introduction 
to the elementary aspects of computer 
mathematics, provided you enjoy 
Barden's writing style. It fails in that 
it does not cover any topics of interest 
for the reader who has a good grasp of 
the elementary concepts and wishes to 
know more.B 
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Radio Shack Model III Service Manual 

Tandy/Radio Shack 

Fort Worth, TX 

Sof tcover, 1 25 pp. 

$10.95 



by Jerry P. Turpin 



Radio Shack recently released its 
most important piece of Model III 
documentation: The Service Manual. It is 
a service manual. To use it you need a 
basic knowledge of digital electronics and 
microprocessor technology. 

The Model III is a self contained com- 
puter system which when fully equipped, 
contains 48K RAM, dual internal disks ca- 
pable of double density, a self-contained 
video monitor, RS-232 interface, cassette 
I/O ports, an eight-bit parallel I/O port, 
real-time clock and an internal power sup- 



ply. Obviously, this is not a piece of equip- 
ment to be serviced, or modified without 
extensive documentation. 

Model I's technical manual went into 
great detail to explain the workings of the 
Z80 microprocessor and how its various 
signals are used on the CPU board. The 
writers of the Model III manual expect the 
reader to already possess a working 
knowledge of Z80 architecture. Most of 
the manual consists of schematics, cir- 
cuit traces, wave-forms and parts lists. 

The Service Manual falls short in the 
video monitor section. Although it in- 
cludes a schematic, it does not provide 
the kind of detailed service information 
usually found with commercial televisions 
and monitors. The monitor is a modified 
RCA 12-inch black and white television, 
similar to the KCS-206. Anyone seriously 
considering servicing the video section 
should obtain KCS-206 service data, file 
1981, B-1. 

Another shortcoming is the omission of 



three important tables: A pin-out of the 50 
connector bus I/O connector; a pin-out of 
the 34-connector parallel printer port; and 
a pin-out of the RS-232 port. Although the 
information is available on the appropri- 
ate schematics, a table listing each would 
be helpful. The manual provides advanced 
experimenters with the needed informa- 
tion for interfacing an unlimited variety 
of devices. 

The manual explains almost every- 
thing. Going abroad and want to convert 
your Model III to 50-cycle current? It is a 
simple matter of changing a few jumpers 
and is explained on page 18. Do you have 
a 4K machine and want to expand to 16K? 
This is also explained on page 18. Need to 
align the disk drives? Step-by-step proce- 
dures are on page 109. Purchase your own 
4116 RAMs and save a bundle by install- 
ing them as per the schematic on page 33. 

For the independent service shop tech- 
nician or the advanced experimenter, The 
Service Manual is a must.B 



CPM/Primer 

Stephen M. Murtha and Mitchell Waite 

Howard W. Sams & Co. Inc. 

Wirebound, 96 pp. 

$11.95 



by J.C. Hassall 



At last there is a definitive book on 
CP/M (Control Program for 
Microcomputers). 

This book introduces the CP/M operat- 
ing system (including version 2.0) in a 
clear, concise fashion. It was written for 
all levels of experience. The book is writ- 
ten so well the reader does not need ac- 
cess to a computer running CP/M to un- 
derstand much of the operating system. 
The book is illustrated using a video 
monitor outline to show how the user's 
screen will look. 

The first two chapters introduce the 
CP/M operating system in general and 
specifically to a CP/M microcomputer in 
terms of hardware and software con- 
cepts. The first chapter gives the reader 
an overview of CP/M and the characteris- 
tics of an operating system in general. An 
item I found interesting was the history of 
how CP/M was developed. The second 
chapter covers hardware and software 
concepts of a CP/M microcomputer. Of in- 
terest to newcomers is an explanation of 
logical and physical I/O (Input/Output) 
device assignments, and the software 



hierarchy in a CP/M system. 

If the reader is already familiar with 
microcomputers, skip the first two chap- 
ters. But be sure not to skip any of the ex- 
cellent drawings by Bob Gumpertz. His 
humorous drawings add to the enjoyment 
of the book. 

Starting up and first using a CP/M sys- 
tem is covered in chapter three. The basic 
philosphy of the book is that the reader 
has a system for which CP/M is available 
with the BIOS (Basic Input/Output 
System) module already modified for that 
computer; an explanation of the steps re- 
quired to modify BIOS is beyond the 
scope of this book. The manner in which 
CP/M is booted into the system memory is 
discussed, along with an explanation of 
where the bootstrap program resides on 
the disk. Disk and memory organization is 
just enough detail for the reader to 
understand how the system operates, 
without being overwhelmed by unneces- 
sary details. The three functional modules 
of CP/M and how they interact are 
discussed. 

System initialization is the topic in 
chapter four beginning with disk format- 
ing and an explanation of common disk 
formats. The chapter continues with copy- 
ing a CP/M system disk and the procedure 
to generate a system disk (called SYS- 
GEN). Since the amount of available sys- 
tem memory may vary, the user needs to 
know how to reconfigure the system im- 
age— MOVCPM is the command used. 

Chapter five speaks to the STAT 
(Status) and PIP (Peripheral Interchange 



Program) utility programs (or transient 
commands). The chapter starts with an 
explanation of why the commands are 
necessary at all. Various forms of the two 
commands are illustrated. The com- 
mands have multiple uses. Numerous ex- 
amples are given to illustrate the power of 
the commands. 

Chapter six deals with ED, the CP/M edi- 
tor. Some people can make ED do a 
dance, I cannot. 

The CP/M assembler ASM is covered in 
chapter seven. I liked the coverage given 
to the various ASM directives and pseudo- 
operations. Most books either gloss over 
or ignore them entirely. 

The last chapter is devoted to DDT. The 
Dynamic Debugging Tool allows real-time 
debugging of a program from the 
keyboard. In the course of the chapter, all 
DDT commands are used and explained. 

Appendix A gets to the heart of CP/M 
detailing the general system and I/O call 
procedures, the I/O status byte and a host 
of other features. Particularly handy is a 
disk allocation and extents chart. 

Appendix B is a comprehensive list of 
CP/M compatible software. The list is 
divided into five program categories. Each 
category is subdivided for clarity's sake. 

The last appendix is a CP/M reference. 
All commands are listed by command 
type with a brief description of what each 
command does. ASM and DDT commands 
are included. 

A handy pocket reference card provided 
recapitulates Appendix C.I 
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News From 

KITCHEN TAB1E SOFTWARE, INC. 

by David Busch 




Those of you who still haven't 
found a practical use for the nifty 
Radio Shack pocket computers you 
snapped up during the sale last May need 
worry no longer. The innovative crew at 
Kitchen Table Inc.— the world's foremost 
fictitious manufacturer of space age pro- 
ducts—has introduced a complete word 
processing package for the TRS-80 Pock- 
et Computer. 

The system includes a lowercase modi- 
fication kit for the single-line liquid crystal 
display, a pocket-sized daisy-wheel 
printer and interface, and a sophisticated 
software adaptation of KTI's best-selling 
Word Whacker program. 

Because the TRS-80 Pocket Computer 
has no string handling capabilities, there 
are a few limitations. For example, all 
word input must be seven characters or 
less. The system is perfect for sports- 
writers or television scriptwriters, while 
less than ideal for attorneys or insurance 
underwriters. 

KTI has also introduced a miniature 
programmable device, dubbed the TLS-8E 
Pockets Computer. The Federal Trade 
Commission has reportedly insisted on 
the plural designation because KTI could 
not find a single pocket which could hold 
computer, cassette interface, tape 
recorder, and printer all at once. 

Because the KTI Pocket Word Whacker 
(PWW) will work with either the Tandy or 
KTI micro-micro computers, let's look at 
that package first, before delving into the 
features of the Pockets Computer. 



Pocket Word Whacker is an extremely 
powerful package. The lowercase modifi- 
cation is simple to install. Kitchen Table 
provides complete instructions so the 
user can carry out the modification 
himself. To keep the cost of the kit as low 
as possible, several changes are made to 
existing integrated circuits in the pocket 
computer. If you're a bit rusty at micro- 
soldering, KTI will provide you with IC's 
which have already been adapted for a 
modest fee. 

A few rarely-needed parts in the pocket 
computer must be de-soldered and dis- 
carded, and the tiny IC chip supplied by 
KTI placed in any convenient nook or cran- 
ny. I couldn't make up my mind where to 
put the device, and so called KTI for ad- 
vice. I found nooks are preferred over 
crannies, because of the reduced chance 
of static electricity buildup. 

Once the mod is in place, the pocket 
computer will produce the full lowercase 



the shifted equal sign (lowercase equal 
sign is still operative) was a minimal price 
to pay for this elegant kluge. 

Pocket Word Whacker is a short pro- 
gram, well within the memory limitations 
of both the Pocket and Pockets com- 
puters. The computer must be nestled in 
its cassette interface, and properly con- 
nected to a suitable recorder prior to 
entering word processing mode. Kitchen 
Table recommends several reel-to-reel 
tape recorders which can be used for op- 
timal results at 15-inches per second tape 
speed. The company will even sell you a 
remote pause kit allowing these units to 
be turned on and off by the pocket com- 
puter. A battery pack and ac/dc inverter 
are optional. 

However, we had our hearts set on us- 
ing a good-quality battery powered 
cassette recorder. Since these are expen- 
sive, we settled for our existing CTR-80A 
instead. 



". . . the world's foremost fictitious 
manufacturer of space age products- 
has introduced a complete word processing 
package for the TRS-80 Pocket Computer." 



character set in unshifted mode (no 
descenders, however), and uppercase 
when "shift" is pressed. 

This poses one possible problem— how 
does one obtain the "normal" shifted 
character set. such as the apostrophe, 
quotation mark, dollar sign, etc? Kitchen 
Table has come up with a clever solution. 
With the lowercase mod, the space key 
(SPC) becomes a second shift, or con- 
trol key. 

Some may object to the subsequent 
loss of the SPC key caused by the above 
solution. Not to worry. "Space" may still 
be obtained by hitting SHFT + SPC + 
"equal sign". I felt that the elimination of 



Once the software is run, the user sim- 
ply types normally on the keyboard, that is, 
assuming he or she has very, very tiny 
fingers. Normal people may prefer to set 
the computer on a hard surface, and 
whack away with two fingers. Kitchen 
Table supplies Velcro tabs which may be 
placed on the bottom of the cassette inter- 
face and the typing surface to hold the 
computer in place. 

Limitations of the computer itself have 
been overcome admirably. The user sim- 
ply types in a word, and hits Enter as each 
word is completed. The program stores 
the word in a string array, and, as memory 
fills, dumps the memory contents to the 
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TRS*-CP/M* 

TRS-80 owners ... if you would like to learn more about 
CP/M, call or write for our free brochure. 



OMIKRON proudly presents 



THE WORKS 



the ultimate CP/M package for your TRS^80* Model I 



The WORKS includes: 
Mapper I & CP/M 2.2, CBASIC \\, MBASIC-80 and WordStar 



$399 



WordStar is widely recognized as the 
most advanced product on the market. It is 
featured by many computer manufacturers, in- 
cluding Xerox, for wordprocessing applications. 

□ List price: $495 



CP/M 2.2 is the latest version of CP/M 
from Digital Research. Our package also includes 
the MAPPER I CP/M adapter and a sophisticated 
set of utilities and drivers designed to optimize 
the CP/M system for the TRS-80. 

D List price: $239 



MBASIC-80 is the CP/M version of 
Microsoft BASIC. The conversion of TRS-DOS 
BASIC programs to MBASIC is easy because the 
syntax is almost identical. 

□ List price: $349 



CBASIC II is the most widely used BASIC 
for CP/M applications programs. This version of 
BASIC contains all of the features necessary to 
develop complex business programs. 

D List price: $149 



OMIKRON 



Products that set Precedents 

J J 27 Hearst Street, Berkeley, CA 94702 (415) 845-8013 



f TRS-80™ Radio Shack/Tandy Corporation 



,50 CP/M™ Digital Research 






MMSFORTH VERSION 2.0: 

MORE FOR YOUR RADIO SHACK 
TRS-80 MODEL I OR MODEL III ! 

• MORE SPEED 

10-20 times faster than Level II BASIC. 

• MORE ROOM 

Very compact compiled code plus VIRTUAL 
MEMORY makes your RAM act larger Variable 
number ol block butters. 31-char. -unique word- 
names use only 4 bytes in header! 

• MORE INSTRUCTIONS 

Add YOUR commands to its 79-STANDARD-plus 

instruction set! 

Far more complete than most Forths: single & 

double precision, arrays, string-handling, clock, 

more 

• MORE EASE 

Excellent fullscreen Editor, structured * 

modular programming 

Word search utility 

THE NOTEPAD letter writer 

Optimized for your TRS-80 with keyboard 

repeats, upper/lower case display driver, full 

ASCII, single- & double-width graphics, etc. 

• MORE POWER 

Forth operating system 

Interpreter AND compiler 

8080 Assembler 

(Z80 Assembler also available) 

Intermix 35- to 80-track disk drives 

Model III System can read, write & run Model I 

diskettes! 

VIRTUAL I/O for video and printer, disk and tape 

(10-Megabyte hard disk available) 




FORTH 



THE PROFESSIONAL FORTH 
FOR TRS-80 

(Over 2,000 systems in use) 

MMSFORTH Disk System V2.0 (requires 1 disk 
drive & 32K RAM, specify Model I or II) $129.95* 

AND MMS GIVES IT 
PROFESSIONAL SUPPORT 

Source code provided 

MMSFORTH Newsletter 

Many demo programs aboard 

MMSFORTH User Groups 

Inexpensive upgrades to latest version 

Programming staff can provide advice, modifications 

and custom programs, to fit YOUR needs. 

MMSFORTH UTILITIES DISKETTE: includes FLOATING 
POINT MATH (L.2 BASIC ROM routines plus Complex 
numbers, Rectangular-Polar coordinate conversions, 
Degrees mode, more), plus a full Forth-style Z80 ASSEM- 
BLER; plus a powerful CROSS-REFERENCER to list 
Forth words by block and line All on one diskette 
(requires MMSFORTH V2.0, 1 drive & 32K RAM) $39.95* 

FORTHCOM communications package provides RS-232 
driver, dumb terminal mode, transfer of FORTH blocks, 
and host mode to operate a remote TRS-80 (requires 
MMSFORTH V2.0. 1 drive S 32K RAM) $39.95* 

THE DATAHANDLER V1.2: a very sophisticated data- 
base management system operable by non-pro- 
grammers (requires MMSFORTH V2.0, 1 drive & 32K 
RAM) $59.95* 

MMSFORTH GAMES DISKETTE: realtime graphics & 
board games w/source code Includes BREAKFORTH, 
CRASHFORTH, CRYPTOOUOTE, FREEWAY. OTHELLO 
& TICTACFORTH (requires MMSFORTH V2.0. 1 drive S 
32K RAM) $39.95* 

Other MMSFORTH products under development 

FORTH BOOKS AVAILABLE 

MMSFORTH USERS MANUAL • without Appendices, for 
non-owners $1 7.50* 



THREADED INTERPRETIVE LANGUAGES • advanced, 
excellent analysis of MMSFORTH-like lan- 
guage $18.95* 

PROGRAM DESIGN & CONSTRUCTION ■ Intro to struc- 
tured programming, good for Forth $13.95* 

FORTH -79 STANDARD MANUAL - official reference to 
79-STANDARD word set, etc $13.95* 

FORTH SPECIAL ISSUE, BYTE Magazine (Aug. 1980) - 
we stock this collector's item for Forth users and begin- 
ners M.00* 

* ORDERING INFORMATION: Software prices Include 
manuals and require signing of a single system, single- 
user license. SPECIFY for Model I or Model III! Add 
$2.00 S/H plus $3.00 per MMSFORTH and $1.00 per addi- 
tional book; Mass. orders add 5% tax Foreign orders 
add 20%. UPS COD, VISA & M/C accepted; no unpaid 
purchase orders, please. 



Send SASE lor free MMSFORTH Information. 
Good dealers sought 

Get MMSFORTH products from your *" 

computer dealer or 

MILLER MICROCOMPUTER 

SERVICES (M3) 

61 Lake Shore Road, Natick, MA 01760 
(617)653-6136 



10 : REM WORD PROCESSING FOR POCKETS COM- 
PUTER 

20 ; PAUSE "BE CERTAIN CASSETTE RECORDER 
CONNECTED" 

30 : PAUSE "ARE YOU SURE RECORDER IS CON- 
NECTED?" 



40 
50 
60 
70 

80 

90 

100 

110 

120 
130 

140 
150 
160 
170 

180 
190 



: PAUSE "THIS IS YOUR LAST CHANCE" 

: PAUSE "YOU WERE WARNED" 

: BEEP 5 

; REM ••**"« MENU ****** 

: INPUT "(L)OAD, (C)REATE, OR (S)PACE IN- 

VADERS";B$ 
: IFB$ = "C"GOTO220 
: IF B$ = "L"GOTO 140 
; IF B$ = "S" PAUSE "YOU IDIOT, THERE IS NO 

CRT" 
: GOTO 80 
: REM ****** LOAD FILE FROM TAPE 



INPUT "ENTER FILENAME";F$ 

INPUT #1,F$;A$(27) 

INPUT "(E)DIT , (P)RINT, (A)NDROID NIM";B$ 

IFB$="P" GOTO 360 

IFB$ = "E"GOTO480 

IF B$ = "A" PAUSE "YOU NEVER LEARN, DO 

YOU?' 



CREATE TEXT 



200 : GOTO 160 

201 : REM 
220 : N = 27 

230 : INPUT A$(N) 

240 ; IF A$(N) = " = " GOTO 260 

250 : IF NG100 GOTO 310 

260 : INPUT " SEE TEXT FILE (Y/n)";B$ 

270 : IF B$ = "N" GOTO 310 

280 : FOR G = 27 TO N 

290 : PAUSE A$(G) 

300 ; NEXTG 

310: REM ****** SAVE TO TAPE **** 

320 : INPUT "ENTER FILENAME";F$ 

330 : PRINT #1,F$;A$(27) 

340 : GOTO 80 

350 : REM EDIT****** 

360 : PAUSE "HIT ' = ' AFTER LINE TO EDIT" 

370 : N = 27 

380 : IF A$(N) = " = " GOTO 440 

390 : PRINT A$(N) 

400 : INPUT B$ 

410 : IFB$ = " = "GOTO320 

420 : N = N + 1 

430 ; GOTO 370 

440 : PAUSE "ENTER NEW WORD" 

450 : INPUT A$(N) 

460 : GOTO 420 

470: REM •••««» print ****** 

480 : FOR G = 27 TO N 
490 : LPRINT A$(G) 
500 : NEXT G 



Program Listing 



cassette tape. To edit the text, the user 
loads the text file, which is displayed one 
word at a time. Hitting a key after the 
display of the word allows that word to be 
changed. Though this system could con- 
ceivably be rather tedious if whole 
sentences must be altered, it works ex- 
tremely well for changing one or two 
words in an otherwise fine sentence. 

The TLS-8E Pockets Computer is 
deceptively similar in appearance to the 
Radio Shack version, although close in- 



spection reveals the case is made of 
plastic, the keys of wood, and the display 
of only semi-liquid crystal. Instead of ex- 
pensive mercury batteries, the unit 
operates from rechargeable cells kept at 
peak by a tiny electric generator inside. I 
cracked open my sample (the case ap- 
peared to be heat-welded much like a 
cheap tape cassette) and looked at this 
wonder of miniaturization. I found a 
mainspring-powered generator wound by 
the movement and jostling of the owner of 
the computer. A KTI spokesperson ex- 
plained this particular module is built for 
the company in Switzerland by Timex. 

I tested the Pockets Computer exten- 
sively, and found it to operate nearly iden- 
tically to the Tandy model built by Sharp. 
One extra feature I liked was the built-in 
travel alarm feature. The main complaint 
was using SHFT + Y as the snooze but- 
ton. Who can think clearly enough early in 
the morning to take advantage of that 
feature? 

The final piece of the word processing 
package, the tiny five-by-nine-by-three- 
inch daisy-wheel printer, was not 
available for testing at press time. Pro- 
totypes could only print out in the Sri 
Lankan language (KTI officials were not 
sure what it is called. Ceylonic?). 
However, because of the importance of a 
printer in any word processing system, 
the company promised the printer will be 
forthcoming. 

Rumors that a version of the printer will 
be built into all future models of the 
Osborne I microcomputer (boosting the 
price of that machine by $75), are untrue. 

As a public service, KTI has supplied an 
early version of Pocket Word Whacker for 
the use of 80 Micro. A listing of this 
limited-capability program is reproduced 
with this article. It has not been entirely 
debugged (that's why it's free), but should 
be usable for any documents of 100 words 
or less.H 
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COMPUTER BOOKS FOR BEGINNERS 

Everything you need to know to get started programming your own computer. These handy program sourcebooks, each 
jam-packed with easy-to-understand info for beginners, are crammed with hundreds of tips, tricks, secrets, hints, short- 
cuts, and techniques, plus hundreds of tested ready-to-run programs. TRS-80 Color Computer. TRS-80 Pocket Computer. 
Sharp PC-1211 Pocket Computer. Casio FX-702P Pocket Computer. Four of the most popular computers for beginners. 



Color Computer 

101 Color Computer Programming Tips & Tricks, learn-by-doing instruc- 
tions, hints, secrets, techniques, shortcuts, insights, for TRS-80 Color 
Computer, 128 pages $7.95 

55 Color Computer Programs for the Home, School & Office, practical 
ready-to-run software with colorful graphics, 128 pages $9.95 

55 MORE Color Computer Programs for Home, School & Office, 

sourcebook of useful, plug-in-and-run software with colorful graphics, 
for TRS-80 Color Computer, 112 pages $9.95 

The Color Computer Songbook, 40 favorite pop. classical, folk & seasonal 
songs arranged for the TRS-80 Color Computer, ready-to-run music pro- 
grams, 96 pages $7.95 

My Buttons Are Blue And Other Love Poems From The Digital Heart Of An 
Electronic Computer, for poetry lovers, computer lovers, just-plain 
lovers, a high-tech classic, 66 heartwarming poems written by a TRS-80 
Color Computer, great gift for someone close to you, includes the ex- 
clusive ARCsoft Poetrywriter™program, 96 pages $4.95 



practical 
programs! 

™CASIO 



|J? ^% Programs 
3U In BASIC 
For The Home, 



POCKET 
COMPUTER 

PROGRAMMING 
MADE EASY 
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r\ 



101 



Pocket 
Computer 



Programming 
Tips & Tricks 



CA MORE 

w \J Programs 
In BASIC for the 



Murder : • 
In The 
Mansion 

And Other Computer Adventures 
In Pocket-BASIC For The TRS-8 




Program Worksheets 

Handy printed forms make writing BASIC software easy and fun. 
Customized for your own computer system, or use the universal form 
good for any BASIC computer. 40-sheet tablets: 

Color Computer Coding Form $2.95 

Pocket Computer Coding Form $2.95 

APPLE Computer Coding Form $2.95 

IBM Personal Computer Form $2.95 

Universal Coding Form $2.95 

Electronics Projects 

25 Easy-To-Build One-Night & Weekend Electronics Projects, useful 
gadgets, readily-available parts, 96 pages $4.95 



My Buttons |55 
Are Blue 




Color Co 
For Horn 



and Other Love Poems 

From The Digital Heart 
of an Electronic Computer 

.died b 
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Pocket Computer 

50 Programs in BASIC for the Home, School & Office, useful plug-in-and- 
run software for TRS-80/Sharp PC-1211 pocket computers, 96 
pages $9.95 

50 MORE Programs in BASIC for Home, School & Office, sourcebook of 
tested ready-to-run software for TRS-80/Sharp PC-1211 pocket com- 
puters, 96 pages $9.95 

101 Pocket Computer Programming Tips & Tricks, secrets, hints, short- 
cuts, techniques from a master programmer, for TRS-80/Sharp PC-1211 
pocket computers. 128 pages • $7.95 

Murder In The Mansion and Other Computer Adventures, murder 
mystery, space, adventures, loads of fun, 24 game programs for TRS- 
80/Sharp PC-1211 pocket computers, 96 pages $6.95 

35 Practical Programs for the Casio Pocket Computer, useful plug-in-and- 
run software for the FX-702P, 96 pages $8.95 

Pocket Computer Programming Made Easy, new fast and easy way to 
make the world 's smallest computer work for you , 1 28 pages $8.95 

Order direct from this ad. Send check or money order. In- 
clude $1 shipping for each item ordered up to a maximum 
of $3. Or write for our free catalog. Mail orders to: 

ARCsoft Publishers 

Post Office Box 132Q 
Woodsboro, Maryland 21798 

(301) 663-4444 



^6 



Customers outside North America wanting airmail send $6 per oook. Foreign customers pay in 
U.S. dollars For first-class mail delivery in North America include $2 per book. Maryland 
residents add 5% sales tax Sorry, no COD. TRS-80 is a trademark ot Tandy Corp/Radio Shack 



Notes from 

BENEATH the KEYBOARD 



by Paul Wiener 



his month I would like to share some 
thoughts on the interconnection be- 
tween video display formatting and key- 
board input. Very few of the programs I 
have seen come anywhere near using an 
optimal approach to coping with this 
complex interrelationship. 

As a programmer, use validity checks to 
prevent users from bombing your pro- 
grams with bad input. Such error-trapping 
will often result in a user being prompted 
to reenter data previously entered incor- 
rectly. In such a case, if you have not dealt 
carefully with the formatting ramifica- 
tions, this could result in a messy looking 
screen with important data scrolling off 
the top prematurely. 

As an example, I will present a program 
to solve Time/Rate/Distance relationships 
using the formulas: D=RT, R = D/T, 
T = D/R, where D, R, and T stand respective- 
ly for Distance, Rate (speed) and Time. The 
programming task is trivial, but demon- 
strates a formatting and I/O philosophy 
which can be used in more formidable ap- 
plications. 

The simplistic (and alas, all too com- 
mon) approach to such a program is to 
first prompt the user to decide whether 
Time, Rate or Distance is to be solved for. 
Then the user is prompted to enter the two 
factors needed to calculate the third. Next, 
the solution would be displayed. Finally, 
the program would loop back to the begin- 
ning to let the user try other data sets. 

During a session with such a program, a 



ENTER <T>ime. <R>ate. OR <D>istance ?T 

ENTER Rale ?20 

ENTER Distance ?50 

Time = 2.5 

ENTER <T>ime, <R>ate. OR <D>istance ?D 

ENTER Time ?0 

ENTER Rate ?10 

Distance =0 

ENTER <T>ime. <R>ate, OR <D>istance ?R 

ENTER Time ?0 

ENTER Distance ?500 

?/0 ERROR IN 2240 

RUN 

ENTER <T>ime. <R>ate. OR <D>istance ?R 



Fig. 2. 



typical screen might look like Fig. 1. Notice 
the haphazard scattering of information 
and dialogue. There is no reason to let 
dialogue accumulate like dirty laundry until 
it scrolls off the top of the screen. Program 
Listing 1 is a more professional approach. 
This mav not be the bftst solution, but it is 
certainly a step in the right direction. 

When you run the program, it will 
display two columns— one on the left 
labeled Input and the one on the right 
labeled Output. Each column is divided in- 
to three rows: Time, Rate and Distance. 
Near the bottom of the screen you are 
prompted to enter T, R, or D. (See Fig. 2). 
To enter a time of 40, type T40 (no space 
after the T) and press Enter. The input col- 
umn of the Time row is instantly updated 
to the latest value. Input of Distance and 
Rate are analogous. An arbitrary range of 
=> n > 1000000 has been selected to 
limit input values to those which will 
not cause overflow errors or display 
difficulties. 

You can enter and reenter values to 
your heart's content without destroying 
the format. To solve for any one of the 
three variables in terms of the other two, 
simply enter its initial (such as T for time) 
without a number following. The solved 
Time/Rate/Distance trio will be posted in 
the output column. 

After obtaining a solution, you can con- 
tinue entering Times, Rates and Distan- 
ces, which the program will continue to 
post in the input column. The output col- 
umn will be updated only when you call for 
a solution. Therefore, the input column 
may contain invalid trios (T/R/D combina- 
tions that can't possibly go together), but 
the output column will always contain a 
consistent trio— obtained by the last re- 
quested solution. 

The screen will not fill with un- 
necessary, unsightly, almost haphazard 



dialogue. All the data currently being 
handled by the program is visible in an 
easily comprehended tabular form. Input 
is entered in any order you want with a 
minimum of key strokes. Values can be 
changed at any time without going 
through a lengthy dialogue. 

The program has also been error- 
trapped so non-numeric input will not be 
accepted and division by zero will not be at- 
tempted. When you are prompted to press 
Enter to continue, keys other than Enter 
will not be accepted. Try to bomb the pro- 
gram by using bad input; it will not be easy. 

I purposely omitted one fairly common 
input technique — replacing Input state- 
ments with INKEYS routines. The INKEYS 
technique does have several benefits: 
The programmer can be selective about 
which characters are echoed on the 
screen when typed. Thus the format de- 
stroying consequences of keying Clear, 
down arrow, right arrow and Shift right ar- 
row can be sidestepped. Input's often un- 
desirable but compulsory linefeed (often 
an irrelevant question mark), are also cir- 
cumvented by this technique. 

Many such routines have already been 
presented in 80 Micro and other com- 
puter journals. None I have tried has 
worked to my satisfaction. Despite 
authors' claims to the contrary, they were 
all noticeably slow to grab keystrokes. 
PEEKing the keyboard, instead of IN- 
KEY$ing, can improve the response time 
of such routines; but for this example, I 
have chosen to stick with good old Input. 

There are many ways to improve this 
program's formatting and I/O. For in- 
stance, a border could be drawn around 
the tabular area; the input routine could 
be made to recognize and accept correct 
lower case input; the question mark at the 
end of the nonquestion-prompts could be 
eliminated (if you are willing to sacrifice 



Enter <T>IME. <R>ATE OR <D>ISTANCE. To Enter a Time Of 40 Type T40 Enter. 
All Quantities Must Be Less Than 1000000. 



Fig. 1. 
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by Roger Schrag 

SKY WARRIOR! Nerves of steel and 
supreme concentration are your only 
defenses against an alien strike force pois- 
ed for the kill! As you pilot your spacecraft 
over a bizarre alien planetscape, ground-to- 
air missiles scream skyward without warn- 
ing. It's up to you to destroy or be 
destroyed! And adding to your problems, 
your spacecraft has an ever-diminishing 
fuel supply (which can be replenished in 
flight If you're lucky) — if you're not careful, 
you and your ship will spiral down into a 
fatal, fiery crash! 

SKY WARRIOR! Great fun for one 
player or double the action with a friend. 
Features include sound, high score tallies, 
and a realistic scrolling landscape! 



Super 

Arcade 

Action 




© 1981 



TRS-80 TAPE Model 1 & 3 16K 
010-0136 $14.95 

TRS-80 DISK Model 1 & 3 32K 
012-0136 $20.95 



dventur& 

INTERNATIONAL 

A DIVISION OF SCOTT ADAMS, INC. 



BOX 3435, LONGWOOD FL 32750 

(305) 862-6917 (QUESTIONS) 

ORDER FROM YOUR FAVORITE DEALER 

or CALL TOLL FREE (800) 327-7172 

(ORDERS ONLY PLEASE) 

SHIPPING & HANDLING ARE EXTRA 

PRICES SU8JECT TO CHANGE WITHOUT NOTICE 



by Bob Shilling 
• War via the RS-232 • 
16K TRS-80's play against other TRS-80's or 
24K Atari 400/800's! 
Byte Magazine, December 1981: 
"The imaginary world of Com m bat is in- 
teresting and intricate, and it really does 
test one's strategy, tactics, and reflexes 
. . . Com m bat is a great success." 

Commbat is a strategic and tactical 
battle game that allows you to pit your skill 
and dexterity against that of another player 
in a real-time graphic battle to the death! 

You play against your opponent by 
direct connection to another computer (up 
to 300 feet away), by modem communica- 
tion, or through The Source tm . Each player 
has equal resources. Available weapons in- 
clude rockets, lasers, shells, mines, decoys, 
Drone Reconnaissance Aircraft, and one 
nuclear ICBM. You decide which weapons 
to carry, load them onto a maximum of 
eight remote-controlled tanks, and then 
maneuver your tanks to discover and 
destroy your enemy's base before he 
destroys yours. 

RS-232 port and either full-duplex 
modem or direct connection modem 
eliminator cable required. Works with CON- 
NECTION tm or LYNX im modems. 
TRS-80 16K TAPE, Model 1 & 3 

010-0123 $19.95 
TRS-80 32K DISK, Model 1 & 3 

012-0123 $20.95 
ATARI 24K TAPE 

051-0123 $19.95 
ATARI 24K DISK (Requires DOS 2.0S) 

052-0123 $24.95 



Includes a coupon allowing you to 
purchase a copy for a friend for only 

$10.00 



by Wayne Westmoreland & 
Terry Gilman 
See the FANTASTIC Review in BYTE-June 
'82! 

Armored Patrol is a realistic arcade 
battle simulation that puts you into the 
driver's seat of a massive T-36 tank that's 
bristling with firepower. Your orders are to 
discover and destroy the enemy tanks and 
robots in your sector before they locate 
your tank and blow it up. 

Your perspective is from the inside of 
your tank, looking out across a bleak land- 
scape. Somewhere out among the deserted 
blockhouses, enemy tanks and robots are 
on the prowl. You may find the enemy either 
by a visual scan of the area or by making 
use of the radar tracking device displayed 
at the bottom of the screen. 

Armored Patrol is one of the most in- 
credible graphic simulations ever sold for 
the TRS-80! 
TRS-80 16K TAPE, Model 1 & 3 

010-0140 $19.95 
TRS-80 32K DISK, model 1 & 3 

012-0140 $24.95 
ACTUAL TRS-80 SCREEN 




WRITE FOR OUR FREE 150-PROGRAM CATALOG 
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the Input statement). In general, the coding 
could be made more elegant. What other 
improvements would you add? However 
many, I hope this simple example serves to 
inspire you toward more practical and 
creative I/O in your own programs. 

How The Program Works 

The STRINGS statements in lines 1400 
and 1800 draw lines across the screen. 
The PRINT CHR$(31) in line 2000 clears 
the screen from the current cursor posi- 
tion at the end of frame. All on-screen 
material above the cursor is left alone. 
This ensures that previous inputs are 
erased before the user is prompted to 
enter something new. 

As you may have guessed from its num- 
ber, line 2010 was a last minute addition. It 
corrects disruptions of the display which 
can occur despite the program's many 
traps. This could happen if you press 
Clear or Shift right arrow. This situation 
could be rectified by clearing and re- 
drawing the screen after each input cycle. 
But such indiscriminate redrawing is slow 
and results in an unpleasant flicker. Line 
1210 contains a filter to eliminate un- 
necessary redrawings. 

The line drawn across the screen near 
the top (Fig. 2) is built from a graphic 
character which does not appear else- 
where on the screen. Format disrupting 
errors will either clear the line from the 
screen entirely or cause it to scroll out of 
position. The PEEK at the beginning of 
1210 checks video-memory where the left 
end of the line is supposed to be. If it is 
still there, control passes to the next pro- 
gram line. Otherwise, the screen is cleared, 
a call to the routine that fills in the output 
column takes place and the program jumps 
back to the routine that draws the rest of 
the screen and prompts for input. 

Line 2200 isolates the left-most 
character of the input and sets l$ equal to 
it. Lines 2300-2500 make certain l$ is one 
of the acceptable designators, T, R or D. If 
so. it branches to the appropriate Time, 
Rate or Distance routine. If l$ is none of 
the three, the program returns, via line 
2600, to line 2000 where the previous input 
is erased and the user is prompted to 
reenter the data. 

If l$ equals T, then you have selected 
Time. Lines 3000-3800 process this selec- 
tion. Line 3100 strips the left-most charac- 
ter off your input and sets the string 
variable Tl$ equal to what remains. For in- 
stance, if you entered T40, line 2200 has 
already set l$ to T. Now, line 3100 sets Tl$ 
to 40. 

Line 3200 sets T1 equal to the value rep- 
resented by Tl$. If Tl$ contains the string 
40, line 3200 will set T1 equal to the num- 



ber 40. T1 is a temporary storage variable 
which holds a value until it is tested and 
proven valid. 

Line 3300 determines whether the input 
quantity, now stored in T1, is within the 
limits of =< n <1000000. If not, flow re- 
turns to the data entry routine at 2000. If 
the input passes the limit check, flow falls 
through to 3400 where there is a test to 
see if T has been entered alone (without a 



number). If so, the program branches to 
line 10000 where Time is solved for in 
terms of Distance and Speed. Otherwise, 
flow continues to 3500. 

Line 3500 may look a little obscure at 
first. It exists because of the following: If 
you type a non-numeric string that starts 
with a number, VAL will return the value of 
that number. For example, VAL("7XYZ") 
will return 7. This could result in an incor- 



1000 REM INITIALIZATION 

1100 CLEAR 500 

1200 CLS 

1300 PRINTS17," INPUT*; ,, "OUTPUT"; 

1400 PRINT864,STRINGS(64,131) ; 

1500 PRINT@128,"TIME",TI 

1600 PRINT@256,"RATE",RA 

1700 PRINT8384, "DISTANCE", DI 

1800 PRINT@640,STRINGS(64,179) ; 

2000 PRINT§704,CHRS(31) ; "ENTER <T>IME, <R>ATE, OR <D>ISTANCE 

E.G. TO ENTER A TIME OF 40 TYPE T40<ENTER>. 

ALL QUANTITIES MUST BE LESS THAN 1000000. 

2010 IF PEEK(15424) <>131 THEN CLS: GOSUB 13000: GOTO 1300 

2100 INPUT IN$ 

2200 I$=LEFT$(IN$,1) 

2300 IF I$="T" THEN 3000 

2400 IF I$="R" THEN 4000 

2500 IF I$="D" THEN 5000 

2600 GOTO 2000 

3000 REM TIME 

3100 TI$=RIGHT$(IN$,LEN(INS)-1) 

3200 T1=VAL(TI$) 

3300 IF TK0 OR Tl>1000000 THEN 2000 

3400 IF TIS="" THEN 10000 

3500 IF LEN(TIS)+K>LEN(STR$(T1) ) THEN 2000 

3600 IF T1=0 AND TI$<>"0" THEN 2000 

3700 T2=T1: PRINT9144," ";: PRINT@144,T2; 

3800 GOTO 2000 

4000 REM RATE 

4100 RA$=RIGHT$(INS,LEN(IN$)-1) 

4200 R1=VAL(RA$) 

4300 IF RK0 OR Rl>1000000 THEN 2000 

4400 IF RA$="* THEN 11000 

4500 IF LEN(RA$)+10LEN(STR$(R1) ) THEN 2000 

4600 IF R1=0 AND RAS<>"0* THEN 2000 

4700 R2=R1: PRINT@272," " ; : PRINT@27 2 ,R2; 

4800 GOTO 2000 

5000 REM DISTANCE 

5100 DIS=RIGHTS(INS,LEN(IN$)-1) 

5200 Dl=VAL(DI$) 

5300 IF Dl<0 OR Dl>1000000 THEN 2000 

5400 IF DIS="" THEN 12000 

5500 IF LEN(DI$)+K>LEN(STR$(D1) ) THEN 2000 

5600 IF Dl=0 AND DIS<>"0" THEN 2000 

5700 D2=D1: PRINT9400," " ; : PRINT6400 ,D2; 

5800 GOTO 2000 

10000 REM SOLVE FOR TIME 

10100 IF R2O0 THEN 10400 

10200 PRINT§768,CHR$(31) ; "SORRY— CAN'T DIVIDE BY ZERO. PLEASE CHANGE RATE. 

PRESS <ENTER> TO CONTINUE"; 

10300 IN$=INKEY$: IF IN$OCHR$(13) THEN 10300 ELSE 2000 

10400 TI=D2/R2: DI=D2: RA=R2 

10500 GOSUB 13000: REM OUTPUT ROUTINE 

10600 GOTO 2000 

11000 REM SOLVE FOR RATE 

11100 IF T2O0 THEN 11400 

11200 PRINT§768,CHR$(31) ; "SORRY—CAN'T DIVIDE BY ZERO. PLEASE CHANGE TIME. 

PRESS <ENTER> TO CONTINUE."; 

11300 INS=INKEY$: IF IN$OCHR$(13) THEN 11300 ELSE 2000 

11400 RA=D2/T2: TI=T2: DI=D2 

11500 GOSUB 13000: REM OUTPUT ROUTINE 

11600 GOTO 2000 

12000 REM SOLVE FOR DISTANCE 

12100 DI=R2*T2: TI=T2: RA=R2 

12200 GOSUB 13000: REM OUTPUT ROUTINE 

12300 GOTO 2000 

13000 PRINT@175,CHRS(30) ;TI 

13100 PRINT@303,CHR$(30) ;RA; 

13200 PRINT§431,CHRS(30) ;DI; 

13300 RETURN 

Program Listing 



ZERO 
TO INFINITY 

IN 3.4 

Now the fastest and most powerful 
DOS system is here with DOSPLUS 3.4 



The original DOSPLUS is awesome. Our competitors 
have spent months and thousands of dollars trying to 
duplicate it and the best they could produce, are bug ridden 
patch jobs. But, you already know that. Now DOSPLUS, 
the most important new DOS release in TRS-80 history — 
the most "user-friendly" DOS on the market — becomes the 
most powerful. DOSPLUS 3.4 does it all. 

Those of you who liked us before will love us now. You 
will be amazed by DOSPLUS 3.4. It is jampacked with 
powerful options — you get maximum features and 
reliability at an incredibly low price. And you get a company 
with the guts to back up its product with a lifetime warranty. 

So, if you're looking for the fastest, smoothest, easiest 
to use Disk operating system for your TRS-80, look no 
further. Become a believer! Get your hands on the new 
DOSPLUS 3.4 now! 

ADD THESE POWER PACKED DOSPLUS 3.4 FEA- 
TURES TO OUR LIST OF EXISTING DOSPLUS 
CAPABILITIES 

1) BASIC array sort — multi key, multi array 

2) Tape/Disk — Disk/Tape utility (with relocator) 

3) Input @ (controlled screen input) 

4) Random access and ASCII modification on Diskdump 



$149 



95 



STILL 

THE LOWEST 

PRICED DOS 



5) BASIC checks for active "DO" 

6) Backup and Format from a "DO" file 

7) Much improved Backup (More reliable) 

8) I/O package much faster (disk access time reduced) 

9) Repeat last DOS command with 7" ENTER 

10) Short directory (file name and extension) available 

1 1) Short directory of Model III TRSDOS disks 

12) Single file convert from Model III TRSDOS 

13) COMPLETE device routing supported (DOS and 
BASIC) 

14) Ability to save BASIC programs directly to another 
machines' memory (if equipped with Dosplus 3.4) 

• Plus many more improvements 

• Includes the new expanded easy read 200 + page 
user's guide 

• Also includes the new DOSPLUS Z80 disk basic VER 1 .6 
Upgrade your 3.3 to 3.4 capability, only $49.95 



The first in the industry backed by a lifetime warranty: 



'Lifetime warranty to original owner on original media. 



DOSPLUS first in Quality! 
First in the industry! 




f]?/cro'SYsrems 

SOFTOJdre-/nc - 
5846 Rjnston Street 
(305) 983-3390 Hollywood, FL 33023 



CALL TOLL FREE 
1-800-327-8724 ext.203 

FORVISA/MASTERCHARGE/C.O.D.ORDERS 
TOLL FREE LINES WILL ACCEPT ORDERS ONLY! 

For Applications and Technical information, call 

(305) 983-3390 or drop us a card. 

. ^384 

Dealers inquiries invited 



REMSOFT, INC. 

Let Your TRS-80® 

Teach You 

ASSEMBLY LANGUAGE 

Tired of buying book alter book on assembly 
language programming and still not knowing your 
POP Irom your PUSH? 

REMSOFT proudly announces a more effi- 
cient way, using your own TRS-80* to learn the 
fundamentals of assembly language programm- 
ing - - at YOUR pace and YOUR convenience. 

Our unique package, "INTRODUCTION TO 
TRS-80" ASSEMBLY PROGRAMMING", will pro- 
vide you with the following: 

• Ten 45-minute lessons on audio cassettes 

• A driver program to make your TRS-80* video 
monitor serve as a blackboard for the instructor. 

• A display program for each lesson to provide 
illustration and reinforcement for what you are 
hearing. 

• Step-by-step dissection of complete and useful 
routines to test memory and to gain direct con- 
trol over the keyboard, video monitor, and 
printer. 

• How to access and use powerful routines in 
your Level II ROM. 

Presently available for Model 1 only 
REM ASSEM-1 (tape) only $69.95 
REM ASSEM-1 (disk) only $74.95 

LEARN TRS-80® 

ASSEMBLY LANGUAGE 

DISK I/O 

Your disk system and you can really step out 
with REMSOFT'S Educational Module, 
REMDISK-1, a "short course" revealing the details 
of DISK I/O PROGRAMMING using assembly 
language. 

Intended for the student with experience in 
assembly language, using the same format as our 
extremely popular introduction to assembly 
language programming, this "ASSEMBLY 
LANGUAGE DISK I/O PROGRAMMING" course in- 
cludes: 

• Two 45-minute lessons on audio cassette 

• A driver program to make your TRS-80* video 
monitor serve as a blackboard for the instructor. 

• A display program for each lesson to provide il- 
lustration and reinforcement for what you are 
hearing. 

• A booklet of comprehensive, fully-commented 
program listings illustrating sequential file I/O 
random-access file I/O. and track and sector I/O. 

• A diskette with machine-readable source codes 
for all programs discussed, in both Radio Shack 
EDTASM and Macro formats. 

• Routines to convert from one assembler format 
to the other. 

Presently available for Model 1 only 
REMDISK-1 only$29.95 

Dealer inquiries invited 

These courses were developed and recorded by 
Joseph E. Willis and are based on the successful 
series of courses he has taught at Meta 
Technologies Corporation, the Radio Shack Com- 
puter Center, and other locations in Northern 
Ohio. The minimum system required is a Level II, 
16K RAM. 



REMSOFT, INC. 

571 E. 185 St. 

Euclid, Ohio 44119 

(216) 531-1338 



Notes from 

BENEATH the KEYBOARD 




W. 



v 




SHIPPING CHARGES: 

$2.50 WITHIN UNITED STATES 

$5.00 CANADA AND MEXICO ^129 

OTHER FOREIGN ORDERS ADD 20% 

OHIO RESIDENTS ADD 5V4 % SALES TAX 

TRS-SO® IS A TRADEMARK OF TANDY CORP. 



rect value accidentally being entered into 
the program. Line 3500 circumvents this 
error. To do so it must take the following 
into account: A numeric variable always 
has a LEN-length one character greater 
than it looks. This is because of a cursor 
movement character imbedded in the 
number. For instance, LEN("6") = 1, but 
LEN(STR$(6)) = 2. This accounts for the + 1 
in line 3500 which compares the length of 
the number derived by VAL with the length 
of the string it was derived from. This de- 
tects whether the string contained any 
non-numeric characters invisible to VAL. 
Failure to pass this test means you mis- 
keyed and the program will not accept 
your input. Otherwise flow falls through. 

Line 3600 is the last error trap of the 
series. It ensures that if T1 = 0, you actual- 
ly typed 0. This is necessary because VAL 
will evaluate a non-numeric string as zero. 
Again, detection of faulty input bounces 
you back to line 2000. 

If flow reaches line 3700, it means T1 
has been proven to hold a valid time value. 
So T2, the variable used to contain such 
bonafide values, is set equal to T1. Next, 
the new value must be printed at the ap- 
propriate place on the screen. After the 
cursor is positioned, a series of spaces is 
printed. This ensures that if a new short 
value (such as 8) replaces a previous 
longer value (such as 987654), there is no 
"residue" from the older value cluttering up 
the display. CHR$(30) cannot be used for 
that purpose here. The information in the 
right column must not be erased. Finally, 
the cursor is repositioned to the beginning 
of the field, the new time-value is printed 
and control returns to the input routine. 

Line sequences 4000-4800 and 
5000-5800 parallel 3000-3800, except they 
deal with Rate and Distance input, respec- 
tively. 

Lines 10000-10600 calculate Time from 
Rate and Distance values. Lines 



10100-10300 contain an error-trap which 
precludes a program crash due to at- 
tempted division by zero. The INKEY$ 
statement in line 10300 accepts a single 
character of keyboard input. Note the 
phrasing IF IN$<>CHR$(13). Since the user 
is prompted to press to continue, it is be- 
fitting to code in such a way so only En- 
ter actually results in the program's 
continuing. 

Line 10400 solves for Time and stores 
the result in the variable Tl. Note, Tl holds 
time-values obtained by solving an equa- 
tion, as opposed to T1 and T2 which hold 
values (uncertified and certified, respec- 
tively) entered by the user. Likewise for R 
and D variables. Line 10500 calls a subrou- 
tine to output the result of calculations. 
Finally, at line 10600, the program jumps 
back to the data entry routine. 

The 11000-11600 sequence is analo- 
gous to the 10000-10500 sequence except 
Rate, rather than Time, is solved for. The 
12000-12300 is the corresponding Dis- 
tance determining routine. The only note- 
worthy difference between this routine 
and its Time and Distance counterparts is 
the zero trap has been dispensed with as 
there is no division involved. 

Lines 13000-13300 print the calculation 
results in the output column. The 
PRINT@'s position the cursor. This time, 
we are working in the right-most display 
column, so CHR$(30) may be used to re- 
move residual digits left by previously 
posted values. Line 13300 returns to the 
calling routine after a valid Time/Rate/- 
Distance trio has been posted in the out- 
put column. 

I have often been amazed at the poor 
display quality of the otherwise fine 
programs I have seen during my career as 
a software editor. I hope this program 
example succeeds at imparting a super- 
ior video formatting philosophy to you 
programmers.! 
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it's Here! The Computer strategy 
Game with Bounce! 




For: 

Apple 

Atari 

TRS-80 



Have you ever 

seen an exciting 

action game combined 

with the intense 

strategy of chess, 

backgammon or Othello? 

Ricochet... the first 

abstract strategy game designed 

exclusively for the computer owner. .. 

is both. And loads of fun. 

You maneuver your blocks, both to 
protect your own goal from attack and 
to hit your opponent's goal. TWO launchers 
to fire. Your shots ricochet off the 
blocks, earning you points on the way 
to their targets. It's twice as challenging 
because the position changes with both 
your own and your opponent's moves 
and shots. 

You don't have to play alone, either. 
Play against any one of four different 
opponents (each a different personality) 
inside your computer, or against 
another human. 



And Ricochet is truly competitive... if 
you want it to be. A "smart clock" lets 
you put more pressure on your opponent 
by forcing him to play faster than you. 
But you've got to win two out of three 
(or three out of five) games to claim 
victory. Your computer rates you after 
each match, so you can compare your 
mastery of the game with that of other 
players— perfect for tournament play. 
So perfect that MIND TOYS and Automated 
Simulations are sponsoring the first 
national Ricochet tournament. See your 
local dealer to find out how you can 
become a regional or national champion. 

Price $19.95 



© 1981, AUTOMATED SIMULATIONS, INC. 

P.O. Box 4247, Mountain View, CA 94040. 



Another Mind Toy 

From Automated Simulations 

•apple, atari and trs-80 are trademarks of Apple Computer, inc., Atari, inc. and Tandy Corp., respectively. 




PMC Peripherals 

Quality at unprintable prices 




Yes, our disk drive has a proven per- 
formance and an established reliability 
record. We specialize in single sided 
5 x /4 inch single or double density drives 
featuring 5 ms stepping and 40 tracks 
with case and power supply. The case is 
color matched to IBM and PMC per- 
sonal computers. 



Compare printer specifications . . . 
compare design reliability, repairability 
or any other parameter! Our DMP-85 is 
a true "work-alike" to C. Itoh 8510 or 
NEC 8023 and offers many more fea- 
tures than the MX-80FT at a lower 
price. You need excellent printers and a 
professional supplier. Come to PMC. 





IBM Selectrics or similar typewriters 
become 12 cps letter-quality printers at 
a quarter the cost of "daisy wheel" 
printers. The ETF-80 coupled with a 
word processor becomes your personal 
typist accurately reproducing text at 
100 wpm. What a bargain, ETF-80 . . . 
CALL now for details. 



PMC peripherals are designed for PMC, IBM, Apple, Radio Shack or other fine per- 
sonal computers. We don't advertise our unprintable dealer /distributor prices but if 
you call or write you'll find we don't meet the competition . . . we make it! 



VMf Personal Micro Computers, Inc. 

M 1 W M \*S 475 Ellis Street, Mountain View, CA 94043 * (415) 962-0220 
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without 
printer 



$999 

{fcl/|QE^ with printer or 



typewriter interface 



WORD PROCESSOR »£?&» 

Lowest priced combination word processor /microcomputer that everyone can afford and so 
simple that anyone can use! The EPS-80 is a word processor designed to replace typewriters as 
a personal tool and also to be used as a popular personal computer with thousands of pro- 
grams available. 



Use without a printer 

In an office environment, the EPS-80 word processor 
gives the user editing power which is not available in the 
latest electronic typewriters. The built-in high speed 
cassette storage achieves inexpensive and reliable 
transfer of text from one EPS-80 to another. Therefore, 
where multiple EPS-80s are used, not every one has to 
have its own printer. For instance, a single letter quality 
printer on one EPS-80 can prepare final copies of letters 
for four to ten non-printer stations. The overall system is 
efficient, costs less per station than an equal number of 
electronic typewriters, and provides much higher 
throughput. There is no need for the usual cycle of dicta- 
tion, correction and proofreading as the basic compos- 
ing function can be in the hands of the originator. 



Use with a printer 

Writers, students and businessmen will find the most 
intelligent investment is the EPS-80. For high speed 
printing, we offer our model DMP-85 dot matrix printer 
and for letter quality printing, our Electric Typing Fin- 
gers, Model ETF-80, turns your IBM Selectric or similar 
typewriter into a printer. When you buy the EPS-80, you 
get both a word processor and a powerful personal com- 
puter that will do many necessary tasks. There are fully 
proven computer programs for invoicing, billing, finan- 
cial or engineering analysis, spreadsheet calculations, 
and many more. Even if you never utilize the computer 
capability, the EPS-80 word processor can provide filing 
and retreival of reference information and mail list han- 
dling in addition to fulfilling normal typing needs. 



How can we offer a product with so much capability at such a low price? It is due to our highly 
reliable, low cost cassette storage system that performs as well as many floppy disk systems! 
We believe the EPS-80 is an immediately important tool in small and large offices and it is also 
destined to be your personal typing friend at home. If you think word processing and low cost 
computing power would improve the jobs you do, call or write now for complete information. 

PMC is licensed to use Electric Pencil, a copyright of Michael Shrayer. 



PJWiT^ Personal Micro Computers, Inc. 

M A W M^*S 475 Ellis Street, Mountain View, CA 94043 (415)962-0220 
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GRAPHICS 



An artistic sampling from our own menu. 



The Editor' s Choice 



Ialvos Gesamte is an itinerant pro- 
\ grammer and artist, as well as the 
pen name one of our editors shares with 
various friends. Kalvos is also the author of 
the program which appears on our cover. 
The program creates a design which starts 
off simply and becomes more and more 
complex as it continues through several 
revolutions; it ends up, finally, looking 
much like a complex piece of embroidery. 
Photos 1-3 show the program in several 
of its stages. Part of the pleasure of this 
program comes from watching it make its 
changes. What amazes us most about this 
program is that Kalvos created it using a 
black and white monitor. 



(J 



ake Commander is our own Techni- 



musician, a newcomer to the States and to 
skiing, and a programmer extraordinaire. 
Photos 4-11 are samples of what can be 
produced with the short program he has 
chosen for this sampler. The best part of his 



program, as we see it, is that it allows the 
user to become an artist. Even better, it got 
Jake thinking and led to an even more com- 
plex and beautiful program that we will be 
featuring in our May issue. Read what Jake 
has to say about this month's program: 

The program is very simple and operates 
on the Spirograph (c) principle. I have plans 
for an in-depth article on that subject, so I'll 



Photo 4. 180.9 
Photo 5. 181 
Photo 6. 357.8 
Photo 7. 45.1 
Photo 8. 44.9 
Photo 9. 33 
Photo 10. 180.5 
Photon. 91 



:L 


0..3 


.L 


0..3 


:L 


0..4 


:L 


0,.3 


B 


0,0 


B 


0.0 


B 


0,0 


L 


0,0 



.05..05 
.1,.1 

.05,. 05 
.3,.3 
.6..6 
.4,.4 
.4,.4 
.5,.5 



Table 1. Input for results pictured in 
Photos 4-11 



reserve the heavy stuff until then. 

As a basic explanation, suffice it to say 
the program draws circles. The circles 
aren't the common or garden variety, how- 
ever. They are created by setting points on 
the screen with a known distance between 
each point. This distance is input when you 
reply to the prompt asking for the number of 
degrees between points. If you answer ten 
degrees, the program will plot a single 
point, move ten degrees clockwise, then 
plot another, and so on. Since there are 360 
degrees in a circle, this would simply create 
a circle of 36 dots, so the radius is varied as 
the pixels are plotted. That's how we get 
some nice spiral effects. 

To add some versatility, I added a feature 
whereby you can set a whole small circle or 
draw a line or box to the new coordinate in- 
stead of merely setting pixels. Most inter- 
esting patterns come from unanticipated 
visual interaction between previously set 
pixels. You're more likely to get this if you 
use degrees between points that are not ex- 




Photography by Charles H. Freiberg 
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"Delta offset is just a 

posh way of asking for the 

change of step size for each iteration. 
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10 PCLEAR4 




370 NEXT 


20 PM0DE4 , 1 




380 FOR A-0TO255STEP5 


30 PCLS 




390 LINEIA.OI-I 127, 951, PSET 


40 SCREEN 1,1 




400 NEXT 


50 DIM C( 1,63) : A>31 




410 FOR A-OT0191STEP5 


60 FORN.10T01STEP-2 




420 LINE(255,A1-I 127, 951, PSET 


70 F0RQ=252T025S 




430 NEXT 


80 LINE(Q,0I-(Q,191I,PSET 




440 FOR A-255 TOOSTEP-5 


90 NEXT 




450 LINEIA, 1911-1 127, 951, PSET 


100 FORO-189T0191 




460 NEXT 


110 LINE! 0,01-1255, Q),PSET 




470 FOR A=191TO0STEP-5 


120 NEXT 




480 LINE IO.AI-1 127, 95), PSET 


130 FOR X=63T0 STEP-N 




490 NEXT 


140 LINEIX, 01-131, 311, PSET 




500 FOR A.1T0254STEP5 


150 NEXT 




510 LINE! A, 1-1 127, 95), PRESET 


160 FOR Y-0 TO 63 STEPN 




520 NEXT 


170 LINE (0,Y)-(31,31),PSET 




530 FOR A=1T0190STEPS 


180 NEXT 




540 LINEI 255, A 1-1127, 951, PRESET 


190 FOR X • OT063STEPN 




550 NEXT 


200 LINE (X, 631-131, 311, PSET 




560 FOR A -254T01STEP-5 


210 NEXT 




570 LINE IA, 1911-1 127, 95), PRESET 


220 FOR Y=63TO0 STEP-N 




580 NEXT 


230 LINE 163, YI-131, 311, PSET 




590 FOR A-190TO1STEP-5 


240 NEXT 




600 LINEI 0,A 1-1 127 ,951, PRESET 


250 GETIO, 01-162, 621, C,0 




610 NEXT 


260 PUTI63, 01-1 125, 621, C, PRESET 


620 FOR A.1TO130STEP3 


270 PUT! 126,0 )-( 188, 621,0, PSET 


630 CIRCLEI 127,95) ,A 


280 PUT 1 189, 01-1251, 62), C, PRESET 


640 NEXT 


290 PUT! 0,631-162,1251,0, PRESET 


650 FOR B.O TO 95 


300 PUT 163, 63)-( 125,1251,0, PSET 


660 LINEI 127,95-BI-l 127+B, 95 ) .PRESET 


310 PUT 1126,631-1188,1251,0 


PRESET 


670 LINE- 1 127, 95+B), PRESET 


320 PUT 1189,631-1251,1251,0 


PSET 


680 LINE-I127-B, 95), PRESET 


330 PUT (0,1261-162,1881,0, PSET 


690 LINE- 1 127, 95-B), PRESET 


340 PUT! 63, 126 1-1 125, 188 1 ,C, PRESET 


695 CIRCLEI 127, 951, B/2 


350 PUTI 126,1261-1 188,1881,0 


PSET 


700 NEXT 


360 PUTI 189,1261-1251,1881,0 


PRESET 


710 GOTO60 


Program Listing 1 


. Kalvos Gesamte. 



act multiples of 360, but nearly so. For in- 
stance, if you use 91 degrees instead of 90, 
the pattern will have reached 364 degrees 
after four iterations. This is a circle plus 
four degrees. The pattern will then repeat 
except that it will now be offset by four de- 
grees. This is the sort of trick to use to get 



interesting combinations. 

To allow still more flexibility, I have in- 
cluded an option to move each spiral to the 
right after each iteration. Patterns created 
using this option will spread out across the 
X-axis. So you won't become too bored by 
this facility, you are also able to increase 



the step size between each rightward move 
as the drawing progresses. This gives a suc- 
cessively larger gap between each spiral, 
resulting in an illusion of acceleration. Both 
these parameters are input to the program 
in answer to the Offset, Delta Offset 
prompt. Delta offset is just a posh way of 
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Reader Service for facing page ^35— 



'Indiscriminate use of 

this parameter 

makes for messy patterns." 



10 CLS 

20 INPUT "DEGREES BETWEEN POINTS" ,D:D=D/57 . 29578 

30 INPUT "DIOTS DINES CJIRCLES B)OXES M ,S$ 

35 INPUT "OFFSET, DELTA OFFSET ", OF , DO 

40 INPUT"RATIO OF X TO Y",A,B 

60 PMOOE4 , 1 : PCLS : SCREEN1 , 1 : XA= 128 : YA=95 

70 R=0 

80 X=R*COS( R )*A+128: Y=R*SIN( R )*B+95 

85 XP=X+OF:YP=Y:OF=OF+DO 

90 IFXP<0ORXP>255ORYP<0ORYP>191THEN140 

100 IFS$="D"THEN120ELSEIFS$= B B H THEN110ELSEIFS$= H C"THEN115 

105 LINEIXA,YA)-(XP,YP) , PSET .-GOTO130 

110 L I NE ( XA , YA ) - I XP , YP ) , PSET , B : GOTO 130 

115 CIRCLE! XP,YP I ,5,1 :GOTO130 

120 PSET(XP,YP) 

130 XA=X:YA=Y:R=R+D:GOTO80 

140 IFINKEYtoCHRtl 13 1THEN140 



Program Listing 2. Jake Commander. 



asking for the change of step size for each 
iteration. The two figures should be input 
separated by a comma, not the best way to 
ask for input in a Basic program, but suffi- 
cient for our purposes here. When first try- 
ing out this routine, answer this prompt 
with two zeroes; later on, use small 
numbers only. Indiscriminate use of this 
parameter makes for messy patterns. 

Finally, you can change the aspect ratio 
(or horizontal/width ratio) of the spirals 
when replying to the prompt asking for the 
ratio of X to Y. Start out by answering 1,1 to 
this prompt, later using smaller numbers 
such as .8,.4. If you reply with two equal 
numbers, the spirals will simply be smaller. 

There's no error trapping in the program; 
it's only for experimental use, so go easy 
with your input. To achieve the results in 
photos 4-11, use the input in Table 1 in the 
order given. ■ 



-ATTENTION ALL TRS-80® OWNERS- 



No matter how your Model I, II, or III is used, whether it be business 
or pleasure, this product can benefit you. 

The FATIGUE FIGHTERtm reduces the operator fatigue 
(irritated, watery eyes and headaches) caused by the harsh white 
video display thereby making computer use more efficient and/or 
enjoyable. The graph at the right will help explain how it works. 
Superimposed on the standard eye sensitivity curve is the band pass 
curve of the FATIGUE FIGHTERtm as recorded by a 
spectrophotometer. A marker is also on the graph at the ideal 
psychological tolerance color. As you can see, the green color of the 
FATIGUE FIGHTERtm takes advantage of both eye sensitivity and 
psychological tolerance to make the display less irritating. 

The FATIGUE FIGHTERtm is made of tough % inch thick acrylic 
sheet which adds absolutely no distortion or fuzziness to the display 
and is industry proven to be an excellent material for optical filtering 
(e.g. lenses for laser safety goggles). It installs easily on all three 
TRS-80® models with a pressure sensitive adhesive which will not let 
the filter fall off yet allows easy removal if necessary. Finally, the black 
and silver border design makes it a perfect match for the computer 
styling. 

If you want a FATIGUE FIGHTERtm of your own but prefer not 
to order by mail, check with your local computer stores to see if they 
have them in stock. Otherwise follow the ordering instructions below. 



TO ORDER' Senl1 Hme& Address Typed or Clearly Pnnled wilh Check or Money Order |U S. FUNOSl lor 
S14.95 Each. Including Shipping. Canadian Orders add J1.00 Each. All Other Foreign Orders 
Add S2.00 Each lor Shipping. NO CREDIT CARD ORDERS. COO's |U.S. 0R0ERS ONLY I are S? 50 

TRS-80 IS A Additional Per Order & are Accepted by Mill or by Calling 904378-2494 9 5 M-F Florida 

TANDY CORP. Residents Add 4S Sales Tax. 

TRADEMARK. ALL MAIL ORDERS MUST BE SENT TO THE U.S. ADDRESS 



^H 



SOUTHERN INNOVATIVE DESIGN 
1520 NORTHEAST 12TH STREET 
GAINESVILLE, FLORIDA 32601 ^35 



DEALER INQUIRIES INVITED' 



CANADIAN DEALERS ONLY— For pricing and ordering Information contact: 
MICR0-C0MP ENTERPRISES. 955 Brock Rrj. S.. Unit 3. Pickering. Ont. LI W 2X0 Phone 416-839-4561 



Psychological 
Tolerance Color 



MAXr- 



Eye Sensitivity 
Spectral Curve 




Violet 



Blue 



Green Yellow Orange Red 




sSee List ol Advertisers on page 402 



80 Microcomputing, March 1982 • 81 




Because your computer is 



BUSINESS ANALYSIS 

Business Analysis is a flexible, professional time series analysis and forecast- 
ing package. It features a unique graphing capability and can direct any chart or 
graph to your printer. Ideal for personal or business applications, Business Analy- 
sis can be used In sales and stock market analysis, forecasting, product or 
business planning, and family spending and energy consumption trends. Docu- 
mentation included. Model I & III, Level II, 18K. 

TRS-80." Tape, #01 40R-38 $75.00 

TRS-80," Disk,#0152RD-38 $99.95 

EASY CALC 

Easy Calc is a unique program that will turn your computer into an electronic 
worksheet with all the speed and power of a programmable calculator. In addition 
to the regular calculator features, you can calculate percentages, summations of 
all rows of columns and other time saving functions. Your worksheets can be 
merged with Scripsit* word processor files for complete, professional reports. 
ENTER and SAVE your calculations with a touch of a single key! Easy Calc's 
special library feature allows you to name each file with up to 28 characters. All op- 
tions are MENU selectable and described in plain English. A detailed User's 
Manual Is provided. 

TRS-80." Disk, #0369R3D-38 (Model III version) $49.95 

TRS-80," Disk, #0269RD-38 (Model I version) $49.95 

TLDIS/DLDIS 

Tape and disk-based Labeling Disassemblers, TLDIS and DLDIS are three-pass 
disassemblers which assign labels (where appropriate) to routines in a machine- 
code program to give an output which is identical to a hand-assembled source 
code. Options enable you to send the disassembly to a lineprinter or to tape. TLDIS 
and DLDIS have many other special features and come complete with documenta- 
tion. Model I & III, Level II, 16K. 

TLDIS. TRS-80." Tape. #0230R-38 $14.95 

DLDIS, TRS-80,' Disk, #0231 RD-38 $19.95 

THE ELECTRONIC BREADBOARD 

The Electronic Breadboard permits the design and analysis of analog circuits. It 
can be used to evaluate voltages, currents, impedance and the frequency response 
of any circuit. This package is ideal for audio component repairmen, ham radio 
operators, hobbyists, electrical engineers, telecommunications engineers, 
audiphiles and students of electronics, it is a great training aid! Documentation is 
included. Model I & III. Level II. 16K. 

TRS-80; Tape. #0287R-38 $49.95 

SUPER»TERMINAL 

The most flexible and powerful microcomputer terminal program available at 
any price, Super»Terminal, allows you to communicate with almost any other 
computer system quickly and efficiently. It provides single key auto sign-on, file 
transfer capabilities which include prompted output and Xon/Xoff code recogni- 
tion, and a continuous count of parity, framing and overrun errors. These and many 
more features make communications with Super»Terminal fast, efficient and 
easy to use. Requires TRS-80' Model I or Model III with 32K memory and one disk 
drive. Documentation is included. 

TRS-80,' Disk, #5700RD-38 $95.00 



TYPING TEACHER 

Transform your computer into both a typewriter and an instructor with this com- 
plete seven-part package. Includes on-screen diagrams and practice sessions. 
Your computer becomes a bottomless page for typing practice. The lessons are 
tailored to the keyboard, but train you to use any standard typewriter. Manual. 
Model I & III. Level II. 16K. 
TRS-80. - Tape. #0099R-38 $12.95 

SPACE SHUTTLE 

Instant Software's Space Shuttle puts you in the command pilot's seat of 
America's first reusable space shuttle. Until commercial space flight becomes a 
reality, this is the closest you'll get to the ultimate flight. Complete with documen- 
tation. Model I & III, Level II, 16K. 

TRS-80," Tape, #0332R-38 $14.95 

JET FIGHTER PILOT 

After you've flown a few missions with the Jet Fighter Pilot package, you'll know 
you've earned your wings. Jet Fighter Pilot is a brilliantly realistic simulation of a 
real mission putting you in total control of the aircraft. All controls respond the 
same as they would on a real jet fighter. This combat flying program comes with 
comprehensive documentation. Model I & III, Level II, 16K. 

TRS-80." Tape, #0159R-38 $14.95 

DANGER IN ORBIT 

Danger in Orbit is a real-time, machine-code space game with variable levels of 
difficulty, superb high-speed graphics, sound effects and automatic scorekeeping. 
Destroy asteroids with your anti-matter cannon! Prevent alien spacecraft from in- 
vading the Terran Defense Network. Avoid alien attacks from hyperspace. Only 
lightning reflexes and nerves of steel will enable you to survive Danger In Orbit. 
Comes with documentation. Model I & III, Level II. 16K. 

TRS-80," Tape, #0237R-38 $14.95 

SKYBOMBERS II 

Skybombers II is an aerial war game pitting two nations against each other. Bat- 
tlesounds and graphically displayed explosions give each battle a vivid reality. The 
scores for both countries are constantly updated at the bottom of the display 
screen. Experience air warfare at its best with Skybombers II. Requires 32K RAM, 
Applesoft in ROM and game paddles. Documentation is included. 

APPLE," Tape. #0183A-38 $9.95 

APPLE." Disk. #0271 AD-38 $19.95 

BALL TURRET GUNNER (with sound) 

Ball Turret Gunner is a deep space, laser attack game. As a member of the Ball 
Turret Gunner service you're at the console of the spaceship: your mission- 
destroy the enemy! Multiple levels ol difficulty, optional sound effects, superb 
graphics and complete documentation enhance this program. Model I only. 

TRS-80." Tape, #0051 R-38 $9.95 




only as good as the software 



GEOGRAPHY EXPLORER:USA 

Learn the vital (acts about each state in our union in the most fun and 
fascinating way yet. The program displays computer generated maps of the United 
States, its seven regions and even its individual states. Questions may be multiple 
choice, recognition or fill-in format. A unique TEACHER mode allows multiple op- 
tions of how the material is to be presented. As an added bonus. Geography Ex- 
plorer.USA has the capability of supporting a light pen. The union of sophisticated 
software with the speed and novelty of the light pen represents a milestone in Com- 
puter Assisted Instruction. Fully documented, this program is educational for any 
age group. Model I or III, Level II. 16K. 

TRS-80." Disk, #0071 RD-38 $49.95 



MASTER REVERSI 

Master Reversi is a state-of-the-art game that's simple to play, yet infinitely 
challenging. It is a tournament-winning program that has more features than any 
other reversi program on the market. Master Reversi offers a special library of 
tournament-level games for you to analyze. Whether you're having fun or studying 
for the world championship. Master Reversi is the game for you. Documentation in- 
cluded. Model I. Level II. 16K. 



TRS-80." Disk. S0378RD-38. 



S29.95 



AIR FLIGHT SIMULATION 

An actual simulated take off. flight and landing. Air Flight Simulation is 
both fun and educational. Basic flight instructions, explanations of basic 
aerodynamics, principals of flight and well illustrated documentation included. 
TRS-80" version requires Model 1 or III, Level II. 16K. APPLE" version requires 16K 
RAM and Applesoft. 

TRS-80." Tape, S0017R-38 S9.95 

APPLE." Tape. S0148A-38 $9.95 

COSMIC PATROL 

With Cosmic Patrol you get the best of the search and destroy space games. Im 
pressive sound option and superb graphics make Cosmic Patrol the best of its 
kind. Defend your interstellar space and prey on the enemy with this fast, realtime 
action game program. Documentation included. Model I & III. Level II. 16K. 



Here's how to order: 



RETAIL: Ask us for a list of the Instant Software dealers nearest you. If there is 
not one near you. let us know. Meanwhile, if you would like to order any of the 
products featured on these pages call toll-free 800-258-5473. or use the handy 
reply card in this magazine (a photocopy of it is acceptable). Just fill in the 
necessary information and return it to us. To receive a free copy of our latest 
catalog, just ask, or check the appropriate box on the reply card Visa. Master- 
card. American Express and personal checks or money orders are accepted. 
Sorry, no COD s. Please add $2.50 per order for postage & handling. 

DEALERS: If you would like to join the hundreds of Instant Software dealers in 
the United States. Canada and Europe who are already celebrating our software, 
fill in the coupon below (a photocopy is acceptable) or call toll-free 800-258-5473 
and ask lor our dealer sales department. 

"TRS-80. arid Scripsit are trademarks of Tandy Corp. APPLE is a trademark of 
Apple Computer Co. 



Instan t Software 

A SUBSIDIARY OF WAYNE GREEN INC., PETERBOROUGH, NH 034E8 



TRS-80," Tape. H0223R 38... 
TRS-80." Disk. 0O224RD-38. 



$14.95 
$19.95 



SANTA PARAVIA AND FIUMACCIO 

Build a powerful kingdom from your tiny city-state. Set in the year 1400 AD. 
in Italy, this challenging program allows you to test all your leadership skills. 
See if you have what It takes to be a wise and competent ruler. Well 
documented. TRS-80" version Model I & III. Level II. 16K. APPLE" version requires 
Applesoft in ROM. 

TRS-80." Tape. S0043R-38 $9.95 

APPLE." Tape. K0174A-38 $9.95 

APPLE." Disk. K0229AD 38 $19.95 



f 1 want to join the celebration! \ 

_^m^^ A* ni: Instant Software dealer you > •"> open up » new world 

of software for vour cuKomcrs. You'll rcvcivc the finest 

business, utilities, applications, games, stmubifonsand educa- 
tional software for most popular microcomputers, Find out 
^ how you can incre.iv vour profits as an Instant Software 

■^ dealer. liKpiirv today— you owe yourself ;• celebration. 

f DCall me directly. 

□Send me dealer information. 

Dealer name . 

Address . . 

City _ 
Your name 
Telephone ( 




State.. 



Z'P 



AREA CODE 

Instant Soliware. Inc.. Peterborough. NH 03458 
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HARDWARE 



A Color Computer can print while hooked into CompuServe! 

Where There's a Will. . . 



Shawn A. McClenahan 
11347 Emelita St. U4 
N. Hollywood, CA 91601 
C.I.S. 70445, 406 

One frustration that comes 
with using the TRS-80 Col- 
or Computer in conjunction with 
CompuServe Information Ser- 
vice (CIS) is the inability to ob- 
tain a printout on your printer. 



PRINTER SOCKET 



Tandy says it's impossible be- 
cause the Color Computer only 
has one RS-232C port. At the 
TRS-80 show in Los Angeles this 
year, one of the repeated ques- 
tions of business people, stock- 
brokers and home users was, 
"How do I use a printer with the 
Videotex Terminal or the Color 
Computer while on CIS?" The 



answer each and every time 
was, "It can't be done." As far as 
most business people were con- 
cerned, regardless of whatever 
other attractions the Color Com- 
puter or Videotex Terminal may 
have had, the nearly unanimous 
reaction was, "No printout- 
no sale." 
All of the above negative pro- 

MODEM SOCKET 




PLUG TO COMPUTER 
Fig. 1 



clamations aside, there is a sim- 
ple way to use any 300 baud 
serial printer (that is compatible 
with Color Basic) to print Com- 
puServe or many other comput- 
er bulletin board services— plus 
the use of the printer alone for 
computer output and have the 
test function required by the 
diagnostic cartridge RS-232 port 
test. All this without the hassle 
of switching cables. However, 
(and here's the bad news) if you 
have one of Radio Shack's print- 
ers you'll note that it is set for 
only a 600-baud transmission 
rate. While this article may still 
interest you, the lack of fore- 
sight here means a baud rate 
converter in the future. 

Now, for you farsighted indi- 
viduals who purchased printers 
capable of being set at, or modi- 
fied for, operation at 300 baud, 
the simple solution is to just 
"slave" the printer to the tele- 
phone modem output line. Then, 
whatever comes out of the mo- 
dem runs simultaneously to the 
printer input and the Color Com- 
puter or Videotex Terminal input. 

An easy to construct, multi- 
purpose switchbox is the only 
hardware necessary. See the 
schematic shown in Fig. 1 . Use a 
high quality rotary switch for S1 
since the $1.98 special, wiper 
style is very unreliable (I know; I 
tried one). The connectors are 
all 4-pin DIN style. Keep the wir- 
ing as short as possible and use 
a metal box and shielded exter- 
nal cable, both attached to the 
system ground, to avoid noise 
and RFI (FCC) problems. Status 
LEDs for Printer Ready or Car- 
rier Detect On are unnecessary, 
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but if you like lights go ahead. 
Closing S2 "slaves" the printer, 
and anything coming out of the 
modem will also go to the print- 
er. The positions on the switch 
box are (1) printer only, (2) test/ 
shorting plug, and (3) modem 
with slave printer when S2 is on. 
The center (2) position shorts 
the RS-232 input/output and car- 
rier detect lines together as re- 
quired by the RS-232 test in the 
diagnostic cartridge. If you have 
problems getting 4-pin DIN 
plugs and sockets you may have 
to special-order them, or try a 
parts store that has video ac- 
cessories. 

As mentioned before, any se- 
rial printer that is compatible 
with Color Computer Basic and 
which can be set to run at 300 
baud will work. The printer must 
provide a line feed with every 
carriage return, use ASCII code, 
and generate a low busy signal 
when not ready. The serial port's 
input line must be pulled up 
high, either at all times (with a 
DTR signal perhaps) or go high 
after each character is sent, 
whenever you use the printer by 
itself. When you "slave" the 
printer there is no handshake 
line. This is because the Basic 
ROM output character routine 
uses the input line (pin 2) as a 
handshake line for printers that 
provide a high (more than +3 
volts) signal when ready to ac- 
cept the next character. In the 
terminal mode the input pin is 
receiving data— no handshake 
is possible. Of course, if you 
have a Videotex Terminal you 
don't have to worry about this. 



For those of you having trou- 
ble providing any handshake for 
your printer (and if you run it 
alone you absolutely have to 
have one), the people at The 
Micro Works (who sell an ex- 
cellent monitor and disassem- 
bler for the Color Computer) 
recommend that "the daring 
may install a 10K pull-up resistor 
between. . .the anode of CR6 
(yes, that's inside) and + 5 volts 
if your printer doesn't provide 
the proper handshake." Con- 
versely, since the output line 
goes high after a character is 
sent, you might try that resistor 
and a diode going from the out- 
put line to the input line with the 
diode preventing positive sig- 
nals from going back to the out- 
put. The 10K resistor is sup- 
posed to be high enough to not 
interfere with the normal input 
function of the RS-232 port. 

The other pinouts of the serial 
port are: (1) Carrier Detect— not 
used by printer but for modem 
status; (2) Input— to computer 
from modem, also discussed 
above; (3) Signal Ground; (4) Out- 
put—from computer. 

For my Eaton LRC7000 printer 
I installed one switch to select 
between 600 baud (normally 
used by the computer for print- 
ing) and 300 baud (used to syn- 
chronize with the modem out- 
put), and printer self test. 
Another switch allows me to 
select between the 64/32-col- 
umn mode (no buffer), and the 40 
column (buffer) mode. At 64 col- 
umns this lets me obtain a full 
format output from the Micro 
Works Color Disassembler. At 




32 columns, it matches the color 
Computer's video output. I use 
the 40-column, 3-line, 128- 
character buffer mode for CIS 
or other CBBS printouts. I con- 
nected the printer's Ready To 
Send (RTS) line, which provides 
a low signal when busy, to the 
line going to the Color Com- 
puter's RS-232 input line. 

If your printer requires 
switches to alternate between 



the necessary settings, obtain a 
schematic and have them in- 
stalled. If they are already there, 
set them before you enter the 
CIS Videotex program. If your 
modes are software, program or 
keyboard selectable, also set 
them before you enter the Video- 
tex program (this option is not 
possible on the Videotex termi- 
nal). Once you Exec into Video- 
tex you lose control of your nor- 




Photo 2. Inside of switch box. 
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Photo 1. Switch pack and modified ROM pack. 

■See List ol Advertisers on page 402 




MX-80 
OWNERS 



TIRED OF PRINTING ON THE PERFORATION? 



TIRED OF JUMPING TO BASIC JUST TO 
CHANGE PRINT MODES? 

REJOICE! MXPLUS IS HERE 

INSTALL MXPLUS AND YOUR MX-80 WILL 
SKIP PERFORATIONS AUTOMATICALLY . 

(SWITCH SELECTABLE, OF COURSE) 

LETS YOU SELECT CONDENSED, EMPHASIZED 

OR NORMAL PRINTING INSTANTLY USING ONLY 

THE PRINTER PANEL BUTTONS. 

MXPLUS IS A PLUG-IN MODULE THAT 

INSTALLS IN MINUTES. 

NO SOLDERING REQUIRED. 



NO MX-80 SHOULD BE WITHOUT MXPLUS 

ORDER TODAY 

CALL: 800-835-2246x441 

OR HI.KS.AK. CALL 213-969-2250 

WRITE: 

DRESSELHAUS COMPUTER PRODUCTS 

22713 VENTURA BLUD. SUITE F 

WOODLAND HILLS. CA 91364 



$39.95 

POSTPAID CALIF ADD 6% 

SAMF DAY SHIPPING 

WITH MC VISA 
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SOFTWARE FOR YOUR 16K TRS-80 
MODEL l,lll, COLOR 



the 
programm 




Do vou know all the innovative 
ways of using BASIC commands.' 
The staff at the Programmer'- 
Institute have spem 8 months 
designing a set of programs explain- 
ing everything the manuals omit. 
And much more. 

The Programmer's Program leads 
vou step hv step through the hmda 
mentals of programming vour «onv 
puter. Then vou explore the liner 
|xums . . . multiple loops , queue' . 
'1." k~ . name programmnm . son- . 
trees , boolcx-an logic , and memory 
savers. Ali ilie-e methods make 
vour programming tasks easier and 
more efficient. 

Difficult programs are built 
before vour very eves, and designed 

A must for every owner of a 
microcomputer ($40). 



On cassette or diskette*, out magazines are designed ex- 
plicitly lor vour computer. Included everv month are 
ft 10 readv-to-load programs ranging from game-, home 

unique "teaching" programs. We will also keep vou in- 
formed on all the latest products. 
Our next issue will include: 

1. STOCK MARKET ANALYSIS 

2. Word Search Puzzles 

i. Minefield with graphics 
4. Micro-Spell Came Qui: 

PLUS TWO SPECIAL TEACHINO PROGRAMS 

A. Generating Mazes 

Ii. Understanding Binary Trees 

(Back issues are available) 
You have already missed Concentration, Checkers, 
Poker, Football, Algebra and Geometry tests, 
Schedule 1040, Mailing List, and Home Budget 
Analysis. The price per subscription to TRC, 
APPLETREE, or MAG ATARI is $50 per year, $30 
per '.': year, and $10 for a trial issue. 
Don't miss anymore issues! 



Our complete home financial package with check maintenance, income net woi 
graphing, budgeting, mailing li-t. and appointment bill calendars is available li 
ABSOLUTELY FREE with anv -V order Pur. has,- both above pa. kages and ■ 
onlv $75! ORDER TODAY! 



IT 



THE PROGRAMMER'S INSTITUTE 



A Futurehouse Company 
P.O. Box W\ Dept. B 
Chapel Hill, N.C. 27S14 
(1)10) 48*2 1 °8 
MC & Visa Welcome 
Programmer'- Program 
(g) Computer Model 



Year Subscription i '-.• Yeai 
I ! Cassette 



.Both Trial Is 
. Diskette 



TRC and the programmer's program are trademarks ol Futurehouse. 
ivailable on cassette or diskette for the TRS-80 Model 111, Atari 400/800, Apple 



ette for the Model I, Color Ext. Basic. (For diskette add $1 p, 



nth.) 



HI-RESOLUTION GRAPHICS 
FOR MODEL II $495 




E/RAM II SCREEN PHOTO 

E/RAM II is a hardware/ software package which adds a 512 X 240 high- 
resolution graphics display to the TRS-80" Model II. An assembly language 
driver is provided along with a high quality, fully assembled, printed circuit 
board which plugs directly into the Model II card case. 

The software driver provides the user with useful assembly language 
subroutines which may be called from any high level or assembly 
language program. Routines include control functions which can either 
turn the normal TRS-80' or the E/RAM II display on or off, erase the screen, or 
invert the video. Plot functions include SET, RESET, or READ a point on the 
screen. When the LINE function is passed end-point coordinates, an 
optimizeP dot raster line is produced at machine language speed. 

For more information, or to order, see your dealer or call THE COMPUTER 
STORE at (918) 747-9333. 

Dealers and OEM's contact: 

KEYLINE COMPUTER PRODUCTS. INC. 

P.O. BOX 35268 

TULSA, OKLAHOMA 74135 

"TRS-80 is a registered trademark of Radio Shack, a Tandy Corporation 
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mal computer commands; Reset 
just sends you back to Videotex 
and you'll have to turn off the 
machine and start over. 

If your printer has sufficient 
buffer capacity you should have 
no problem copying single 
pages (one screen's worth of 
text equals 512 bytes). I have no 
problem with my modified Eaton 
LRC in the 40-column, multi-line 
buffer mode. If you can, upgrade 
or increase your printer's buffer 
memory. Or, if needed, you 
could purchase an outboard on- 
line serial buffer to install be- 
tween the switch box and your 
printer. Some of these off-line 
buffers can even be set for dif- 
ferent input/output baud rates 
and can therefore solve the only 
problem of the Radio Shack 
600 baud (try Microcompatible 
for one). 

If the output from the modem 
overflows your buffer, or is 
transmitted too fast for your 
printer to keep up, or you're 
scrolling the output from some 
long CompuServe/Micronet file, 
you can modify your terminal 
parameters with CompuServe. 
Using the CompuServe program 
going from the main menu is te- 
dious and time-consuming. But 
if you enter Micronet, "TER LFD 
X", where X is the character 
time delay to 255, you quickly 
get a line feed delay (LFD) in Mi- 
cronet to allow your printer to 
catch up. You can enter "R DIS- 
PLA" to go back to CompuServe 
while still keeping the LFD for 
your printer. With no buffer, the 
64/32-column mode X = 28 
worked fine for me, even with 
rapid scrolling. When done you 
can go back to normal delay by 
executing the same procedure, 
using X= when your printing is 
finished and you want to go 
back to quick scanning. (Thanks 
to Dixie at CompuServe for sug- 
gesting this solution.) 

You can put another ROM in 
most ROM cartridges by install- 
ing another socket in the area 
provided and use a toggle switch 
to select between them. Don't 
forget to use pull-up resistors 
(4.7K to 10K) on the chip enable 
lines to actively disable the un- 
selected ROM. However, you 
may have to install another 
switch to reconnect the FIRQ 
and Q Clock lines (pins 7 and 8) 



that you broke to prevent the 
cartridge from taking over the 
computer. Some Color Comput- 
er programs will not function 
without the autostart. The diag- 
nostic cartridge memory test, 
when used with Extended Basic 
installed, will not function at all 
without the autostart. Exec 
&HC000 and then trying the 
memory test will not work. 

The MC6809E and MC6883 
chips run very warm and, in the 
interest of reliability, heat sinks 
should be affixed. I used several 
lay-on-top types (used for 16-pin 
ICs) and a small fan from an old 
hair dryer. You might also try 
drilling some holes around the 
power transformer to improve 
air circulation around this 
hot area. 

The suggestion to piggy-back 
16K RAM chips to get 32K bytes 
of memory is fine, except that 
the line from pins 4 of the RAM 
chips to pin 35 of the MC6883 
SAM chip should have a ferrite 
bead on it or run through a 
33-ohm resistor. This should 
solve some static and transient 
problems that might arise. Want 
your hacker buddies to know 
how much memory you're now 
running? Wish there was a 32K 
RAM button to replace that 16K 
insult? Well, Radio Shack has 
one for the Model III that will 
also fit the Color Computer. 
Its part number is AHC-0078, 
its price is 50$, and you can 
call 1-817-870-5600 (National 
Parts for Radio Shack) and 
order one.H 




Photo 3. Switchbox. Note rocker 
switch used for S2. 
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How to maximize 
your Model III : 



You don't have to settle for 
standard equipment. Let MTI 
and Alpha Byte help you build 
the Model III you want. 




MA 

MTI FLOPPY DISK ADD-ON KITS 

Now you can upgrade your I6K level II Model III to 
a full 48K Disk System the easy way with MTI's 
Double Density Disk Controller and your choice of 
Disk Drives. You can choose 40 track, Double- 
Sided 40 track or Double-Sided 80 track Drives to 
supply your disk storage needs. Forty Track 
Drives store I75K, Double-sided 40 Track drives 
store 350K. Four Double-Sided 80 Track Drives 
provide up to 3 MEGABYTES of On-Line storage. 

INTERNAL DISK DRIVE KITS 

The first drive kit includs one Tandon Disk Drive, 
MTI Double Density Controller, Switching power 
supply, 32K of RAM, all mounting hardware, 
cables and Detailed Installation Instructions. The 
second internal drive kit includes a second drive 
and the necessary installation hardware. 

40 TRACK DRIVE SYSTEM 

ORIVE NO. 1 KIT 695.00 

DRIVE NO .2 KIT 279.00 

40 TRACK DUAL HEAD SYSTEM 

DRIVE NO 1 779.00 

DRIVE NO. 2 389.00 

80 TRACK DUAL HEAD SYSTEM 

DRIVE NO. 1 929.00 

DRIVE NO. 2 569.00 



EXTERNAL DRIVE KITS 

Two external drives can be attached to any dual 
drive Model III Computer. 



40 TRACK EXTERNAL DRIVES 

ORIVE NO. 3 

DRIVE NO 4 

DUAL HEAD 40 TRACK EXTERNAL DRIVES 

DRIVE NO. 3 

DRIVE NO. 4 

DUAL HEAD 80 TRACK EXTERNAL DRIVES 

ORIVE NO. 3 

DRIVE NO. 4 

FIVE MEGABYTE EXTERNAL 
WINCHESTER HARD DRIVE 



379.00 
359.00 



.499.00 
479.00 



679.00 
659.00 



2795.00 

Add the Ultimate in Fast High Capacity Disk 
Storage to any Model III Floppy Disk system. 
Reliable Winchester technology provides enough 
storage for the largest business files. Winchester 
disk drives have greatly increased data transfer 
rates and that means faster program and file 
loading. This is a complete self contained system 
that connects to a standard Model III Disk System 
in minutes without any modification to the com- 
puter. 

MODEL III DIAGNOSTIC PROGRAM 49.95 

A complete diagnostic program for the Model III. 
Tests RAM and ROM, video display and all disk 
drives. Catch problems while they're small and 
be sure that your Model III is in perfect running 
condition. 




MODEL III CP/M-80 NOW AVAILABLE! . . 849.00 
CP/M® & 80 Column Kit. 

Now you can run proven CP/M based software on 
your Model III, with standard 80-column display. 
A simple internal modification will transform your 
Model III into a NEW computer and allow you to 
run CP/M the industry-standard operating system 
and assure you of a large supply of fine software. 
Includes CP/M 2.2. 

MODEL III SPEED-UP MOD 149.00 

Now you can run your Model III at 4 MEGAHERTZ, 
that's almost double the standard speed. This 
simple-to-install kit does require some soldering. 

MODEL III COOLING KIT 44.95 

Heat build up is a major cause of system failures 
and 'flakey' operation. This kit provides excellent 
cooling. 

DOSPLUS OPERATING SYSTEMS 
FOR THE MODEL III 

Solid BUG-FREE operating systems for the Model 
III. Supports different size drives on the same 
system and Basic Program Chaining with 
variables saved in memory. 

40 TRACK 99.00 

80 TRACK 119.00 

EXPANDED DOSPLUS 3.3.8 149 00 

Read and Write 40 Track Diskettes on an 80 Track System. 
HARD DISK DOSPLUS 299.00 

Supports the MTI 5 MEG HARD DISK. 
CP/M is a reg. trademark ol Digital Research. 



We guarantee everything for 30 days. If 
anything is wrong, return the item and we'll make 
it right. And, of course, we'll pay the shipping 
charges. 

We accept Visa and Master Card on all orders; 
COD orders, up to $300.00. 

Add $2.00 for standard UPS shipping and 
handling on orders under 50 lbs, delivered in con- 
tinental U.S. Call for shipping charges over 50 
lbs. Foreign, FPO and APO orders add 15% for 
shipping. Californians add 6% sales tax. 

Prices quoted are for stock on hand and are 
subject to change without notice. 

31245 LA BAYA DR, WESTLAKE 
VILLAGE, CALIFORNIA 91362 



IPUTER 
PRODUCTS 

lb order, or for information, call: 

(213)706-0333 

To use our 24-hour modem order line, call: (213) 883-8976. 



*> 11 
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MODEL III DISK KITS 

TWO 40/track drive kit and hardware. Comes 
complete with all the necessary hardware and 2 
drives of your choice, (MPI or TANDON 40 
track). NO SOLDERING OR TRACE CUTTING 
REQUIRED! COMPLETE EASY TO FOLLOW 
INSTRUCTIONS INCLUDED 875.95 

TWO 80/track drive kit and hardware. Same as above 1,095.00 

ONE 40/track drive kit with all hardware and your choice of MPI or TANDON 40/ 
track drive. (INSTRUCTIONS INCLUDED) 599.99 

ONE 80/track drive kit with all hardware and one MPI 80/track drive. No soldering! 

(INSTRUCTIONS INCLUDED) 699.99 

TRS-80 MODEL III, 48K, 2 40 Track TANDON or MPI drives 2.095.99 

TRS-80 MODEL III, 48K. 2 80 Track MPI drives 2,325.99 

1 YEAR WARRANTY 

16 K MEMORY 19.95 

MODEL I, III APPLE AND EXIDY. Instructions included. 
(MOD 1 Keyboard requires jumpers. $2.00 e xtra) 

ARCHBOLD SPEED-UP MODIFICATION FOR MOD I 
TRS-80. RUN UP TO 300% FASTER CPU SPEED! SPEED UP 
SLOW PROGRAMS WITHOUT SOFTWARE! 45.00 

MONITOR^' 

Black and White Monitors 12" (TECO) 129.95 

Green Phospher Monitors 12" (TECO) 159.95 

AMDEK Black and White 1 2" Monitor 159.95 

A MDEK Green Phopher 1 2" Monitor 100G 189.95 

MODEL I DISK DRIVES 

These drives come complete with power supply and chassis. 
90 day warranty on disk drives. ALL DRIVES COMPLETELY 
TESTED PRIOR TO SHIPPING! 40 track drives are fully 
compatible with TRSDOS, NEWDOS-80, LDOS etc. 
Fully compatible with the PERCOM DOUBLER and Double 
density! 80 track drives require MAKE-80 program to run 
regular software. (SPECIAL! GET A FREE 2 DRIVE CABLE 
WHEN BUYING 2 or more DRIVES!) 

40 TRACK MPI or TANDON DRIVES 319.95 

80 TRACK MPI 439.95 

DOUBLE SIDED 80 TRACK MPI 579.95 

2 DRIVE CABLES 25.95 

4 DRIVE CABLES 35.95 

SPECIAL DOUBLE SIDED CABLES (CALL $) 

MAKE-80 CONVERT 40 TRACK TO 80 TRACK. 
(SPECIFY MOD I, III) 29.95 

DISKETTES 

SPECIAL: Brown Bag Diskettes (Verbatim) Bag of 20 . 49.95 

SPECIAL: Brown Bag Diskettes 100 Quantity 214.00 

VERBATIM DATALIFE DISKETTES Box of 10 32.50 

VERBATIM DATALIFE DISKETTES 100 Quantity ..:... 275.00 




SPECIAL DISK HOLDER 



Holds 50 Diskettes 

Reg. Price $35.95 
SPECIAL 



$ 21.95 



PERCOM DOUBLER II (Includes DBLDOS) Doubles storage 
on Model I disk drives. Installs in Exp. Int. in minutes! Will not 

effect normal operation! 169.95 

NEWDOS-80 (New Version 2) 139.95 

LDOS 139.95 

DOSPLUS 3.3 89.95 

(Specify Mod I or III) 




LYNX TELEPHONE MODEM 

AUTO/DIAL AUTO/ANSWER. 

COMPLETE WITH SOFTWARE AND 

HARDWARE FOR MODELS I AND III 

The RS-232 is not needed! Completely ^* v *<3 

assembled. LYNX MODEMS are compatible with 

ST-80 III also 299.95 

ST-80 III: Smart terminal program. Allows saving data to disk 
or sen ding data from disk and more! Mod I or III ... 149.95 

PRINTERS 

SPECIAL: FREE CABLES AND FREE SHIPPING 
WITH ALL PRINTERS! 

CABLES FOR MODEL I EXPANSION INTERFACE, MOD III, 

or PMC-80 EXP 100 or PIF-40 only.) 

PLEASE SPECIFY WHICH COMPUTER! 

HIGH QUALITY DOT MATRIX 

EPSON MX-80 (Tractor feed only) 539.95 

EPSON MX-80 FT (Tractor and Friction feed) 639.95 

EPSON MX-70 (Tractor feed only) 419.95 

EPSON MX-1 00 (Tractor and Friction feed 14.5 wide) . 895.95 

EPSON MX-80 Hi-Res Graphics Option 89.95 

Add-On Friction Feed Adaptor for MX-80 or MX-70 59.95 
OKIDATA MICROLINE 80 (Friction and Pin feed) . . 414.95 
OKIDATA MICROLINE 82 (Friction and Pin feed) . . 597.95 
OKIDATA MICROLINE 83 897.95 

(Friction, Pin and Tractor feed 14.5") 
OKIDATA MICROLINE 82A. 120 cps 625.00 

(9x9 matrix w/descenders) 
OKIDATA MICROLINE 83A. 120 cps 925.00 

(9x9 matrix w/descenders) 
TRACTOR FEED ADAPTOR for 80 and 82 75.00 

LETTER QUALITY PRINTERS 

The C-itoh Daisy wheel printer is one of the finest Letter 
Quality printers we've seen. WHY PAY MORE FOR LESS??? 
Exchange Daisy wheels to get the kind of printing fonts you 
need. 12-10 pitch. Excellent with Scripsit or Electric pencil. 
Let's face it, sometimes dot matrix doesn't hack it! (You can 
use standard Diablo Carbon ribbons with the C-itoh to get 
crisp "COPY READY" printouts!) 

C-ITOH DAISY WHEEL 25 CPS 1,795.25 

C-ITOH DAISY WHEEL 45 CPS 1,995.25 

C-ITOH TRACTOR FEED 219.95 

^*~ PMC-80 COMPUTER 

16K LEVEL II Fully compatible with 
all TRS-80 Mod I Software 595.95 

PMC-81 COMPUTER 16K LEVEL II 

with upper/lower case. Upper/lower case 
driver in ROM. Auto key repeat. Numeric keypad. 
4 programmable keys. Built in speaker. 100% Mod I software compatible 679.99 
EXPANDER 100 PMC's expansion interface 32K, disk controller, printer interface. 

(Expands PMC-80/81 to 48K) 499.99 

RF-MODULATOR for PMC or TRS-80 to TV Hook-up. Completely assembled and 
tested. (Plugs in Video port) UHF CH.33 39.95 

TRS-80 Disk and Other Mysteries Book. 1 32 pp 22-50 

Microsoft Basic Decoded and Other Mysteries. 31 2 pp 29.95 

Custom TRS-80 and Other Mysteries, 300 pp 29.95 



CALL TOLL FREE: 800-528-1149 



NO SURCHARGE FOR VISA, MASTER CARD OR AMERICAN EXPRESS!!! 
(10% DEPOSIT REQUIRED ON COD'S OVER $200.00) Send Certified Check, 




Money Order or Check. 



^12 



SIMUTEK COMPUTER PRODUCTS inc. 



4877 E. SPEEDWAY 
TUCSON, AZ 85712 
(602) 323-9391 



CALL FOR 

FREE 100+ PAGE 

CATALOG!!! 



TRS-80 IS A TM OF TANDY CORP. PMC-80 IS TM OF PERSONAL MICROCOMPUTERS 
PRICES AND SPECIFICATIONS ARE SUBJECT TO CHANGE WITHOUT NOTICE. 
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GRAPHICS 




THE NEW DIMENSION IN WORD PROCESSING 
FROM 



SIMUTEK 



Word processing will never be the same. 

CDE£jPrt^ from Simutek is the first word/ 
graphics processor for TRS-80 Mod. I & III. or PMC-80 
and 81. CopyArt gives you unmatched editing flexibil- 
ity. Change sizes and styles of type in a single line. 
Insertor delete characters, words and lines. Under- 
line, bold face and make block moves simply. Pagi- 
nation, headers and footers are a snap. You have 
complete format control, including justification, 
centering and flush right copy positioning. 

And that's just the beginning. 

LDIJiftJJrff is also a graphics generator that can 
make words and letters in any size, produce graphs, 
charts, cartoons, logos, borders and illustrations. Busi- 
ness graphs and charts can be intermixed with text to 
produce reports of exceptional auality. CopyArt s 
scrolling capability frees you from the bonds of a 64 
column screen. CopyArt can simulate a page up to 
255 characters wide. 

Commands in CopyArt are as simple as T for Insert. 'B' 
for block move. etc. CopyArt even supports DOS 
commands like DIRectory, FREE and KILL. A special 
HELP command gives you instant access to an on-line 
manual. 

LCRjyPr t " makes word processing more flexible 
than ever pefore. It supports the full graphics charac- 
ter sets of Epson and Okidata printers as well as the 
proportionally spaced justification superscripting, and 
subscripting capabilties of Centronics' 737 and 739 
printer and Radio Shack's Line Printer IV. On non- 
graphic printers (C-ltoh. Diablo. Radio Shack Daisy 
Wheel, and others with the ability to turn off linefeeds) 
CopyArt creates pseudographics by overstriking 
standard characters. On every printer, especially dot 
matrix printers, the double printing feature produces 
unbelievably crisp copies. 

(Headline and illustrations produced on CopyArt) 
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WORD/GRAPHICS PROCESSOR 
FROM SIMUTEK 



CnEfUrt 

Diskette and instruction manual $149.95 

Requires TRS-80 MOD I or III 48K, 1 disk 

10 DAY MONEY BACK GUARANTEE 

To order call TOLL FREE 800-528-1149 for VISA 
MasterCard American Express COD orders only. 
Or mail check or money order to 

SIMUTEK 

Computer Products Inc. 

4877 E. Speedway, Tucson, AZ 85712 



Technical questions? Call (602) 323-9391. Dealer inquiries welcome. 

TRS-80 is a TM of Radio Shack, a Tandy Corporation • CopyArt is a TM of Simutek Computer Products Inc. 



• See List ol Advertisers on page 402 
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GAME 



What's this got to do with Shakespeare? 



Color Reversi 



Anthony M. Ledger 
RR 3, Box 184 
14 Musket Ridge Road 
New Fairfield, CT 06810 



Othello is a game played on a square 
even-numbered grid using disks with 
sides of different colors. Each player places 
his own color disk on the board bracketing a 



group of the opponent's disks and flips the 
trapped disks over to the opposite color. 
You can trap the opponent's disks in eight 
directions corresponding to the horizontal, 
vertical and diagonal axes of the board. 
Each disk placed on < the board must trap 
and flip at least one of the. opponent's 
disks. As the game progresses, the score 
can change radically. Entire rows, columns 
and diagonals are flipped by a single move. 
As a novice Basic programmer I was fas- 
cinated with the challenge of programming 
an automated version of Othello for the Col- 
or Computer. Extended Basic rapidly draws 





TITLE PAGE AND INSTRUCTIONS 
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no 


DIMENSION AND ZERO 
8OAR0 ARRAY P (X. Y) 












260 






DRAW GAME BOARD 
AXES AND TITLES 








460 






SET INITIAL SYM80LS 












630 






CURSOR LOOP ANO KEYBOARO 
INPUT 

• READ JOYSTICKS 

• GENERATE FLASHING CURSOR 

• REWRITE GAME SYMBOL 

• SWITCH JOYSTICK 

• SET TURN INDICATOR 
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DRAW SYMBOL 
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2680 


AUTOSEARCH ROUTINES 

• SEARCH 8 DIRECTIONS 

• RESET SYMBOLS 

• CHECK ILLEGAL MOVES 

• UPDATE SCOREBOARD 


2990 


SYMBOL 
DELETE 
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8AR GRAPH 
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lines and circles, paints selected areas and 
draws complex shapes with the Line, Circle, 

Anthony Ledger is a staff engineer with 
the Perkin Elmer Corporation working in the 
area of thin film physics. 



The Key Box 

Extended Color Basic 
Color Computer 
16K RAM 
Joysticks 



•PLASHING 
M0VEA8LE 
CURSOR 



BLANK SPACES 

iCR A 1. 1 

OUTER SQUARES- 
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) 10 x 10 
GAME 
ARRAY 



12 x 12 SYMBOL ARRAY P(X.Y) 



ARRAY CODE FOR SYMBOL 



P(X. Y) 
P(X. Y). 
P(X. Y) • 



BLANK SOUARE 

OPEN CIRCLE SYMBOL 

FULL CIRCLE SYMBOL 



Fig. 1. Program Block Diagram for Othello for the Color Computer. 
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Fig. 2. Game & Symbol Array Sizes. 



"The game moves 
relatively fast. . . " 

Paint and Draw commands, I visualized 
composing the game on the screen with a 
relatively small number of simple instruc- 
tions. I underestimated the complexities of 
display animation. A fully automated game 
includes joystick control of a cursor, an 
automatic search method for flipping the 
captured disks, a way to detect illegal 
moves and a scoring method. While finding 
solutions to these problems, I added a next 
turn indicator, a dynamic bar graph and an 
alphanumeric scoreboard. 

The game program allows two players to 
interact with the graphics display in an 
automated mode. I wanted a minimum of 
keyboard input, with the main control func- 
tions performed by joysticks and the joy- 
stick buttons. The following areas show the 
sequential development of the program. 

• Choice of Graphics Mode 

• Game Symbols 

• Game Board Array and Grid System 

• Cursor Control Using Joysticks 

• Autosearch Routine and Resetting 
Trapped Symbols 

• Detecting Illegal Moves 

• Scoring System (bar graphs, alpha- 
numeric display) 

A functional block diagram of the com- 
pleted program indicates the main elements, 
a cursor or keyboard input loop followed by a 
series of automatic search routines (see Fig. 
1). Several subroutines write and erase sym- 
bols and maintain the score indicator. Ap- 
proximately 250 bytes of memory remain 
after the program is run on a 16K Color Com- 
puter equipped with Extended Basic. 

The game moves relatively fast, since all 
changes made to the graphics display are 
incremental. For instance, a single move 
which can capture eight of the opponent's 
symbols is completed in four seconds. This 
includes the time to determine whether the 
move is legal, to search out and flip the 
trapped symbols and to reset the turn in- 
dicator and score display. Sound effects ac- 
company the disk-flipping routine, but do not 
limit the speed of each move since the tone 
is turned on for the shortest time available 
with the Sound command (6/100 seconds). 

Choice of Graphics Mode 

The highest resolution mode (PMODE 
4,1) and SCREEN 1,0 mode for the graphics 
display provides excellent definition of the 
small circular game symbols. The time-con- 
suming Pset and Preset commands to the 
powerful Draw statement which generate 
any pattern including alphanumeric 
characters control the 256 by 192 address- 
able locations in this high resolution mode. 

The highest resolution mode limits the 
choice of colors to two. Screen 1,0 as- 
sembles the display using green symbols 
and lines on a black background. Screen 1,1 

.--See List ol Advertisers on page 402 



Has your TRS-80 Model I, Model III, 
or Color Computer 

READ A GOOD TAPE LATELY? 

SOFTWARE CLASSICS ON TAPE EACH MONTH 
(nearly as cheap as a library card). 




Is your TRS-80 tired of looking at the 
same ol' programs? Is software senility 
setting in? CLOAD Magazine is just 
what your computer needs to stimu- 
late those RAM chips and keep its 
memory fresh. 

CLOAD Magazine is a cassette tape 
with 6 to 8 programs on it, which your 
computer will receive, by First Class 
Mail, every month! Just CLOAD and 
RUN. Games, tutorials, practical pro- 
grams, and utilities to keep your TRS- 
80's video bright and alive. 

Put more culture and variety in your 
computer's life. Get a subscription to 
CLOAD Magazine. 

• .-. f— *" 10? 

,*HL S MAGAZINE INC. 

1 448, Santa Barbara. CA 93 1 0? 
|80'>)96.; 627] 



Trying to educate your CoCo can be a trying experience. Pounding 
on the keyboard is not the positive reinforcement your computer 
needs. CHROMASETTE Magazine is the civilized way to introduce 
your computer to the world of good software. 



The Fine Print: 

Issues are sent first Class Mail 

All issues Irom Oct 78 on available - as* lc» list 

(24 Level I issues also) 

Programs are (or I6K Level II. 16K Model III, and 

occasionally lor disks 

California residents add 6% to single cooes 

Overseas - add SlOto subscript ions, and $! to 

single copies Sent AOrate 



The Bottom Line: 




' vear (12 issues) S-f5 0C 




6 months (6 issues) $2 3 00 


.— .| 


Single copies - Back issues S4 50 


x : 


Good Games #1 112 00 


-«--*— 


Adventures #1 $13 00 


P.O. B( 


TRS-80 is a trademark ol Tandv Corp 


MaslerCard/Visa/Goid also welcome 





With CHROMASETTE Maga- 
zine, CoCo gets both quantity 
and quality. Every month, 6 to 
8 programs arrive by First Class 
Mail. No need to type them in 
— CHROMASETTE Magazine 
is a cassette tape with educa- 
tional, practical, utility, and 
game programs on it. Just load 
and run. Ah, the life of luxury! 



Give your computer a cultural 
lesson. Get a subscription to 
CHROMASETTE Magazine 



The Bottom Line: 

1 year (12 issues) $45.00 

6 months (6 issues) . $25 00 

Single copies $5 00 

Calif, residents add 6% to single copies 
Overseas — add $10 to subscriptions, and $1 to 
single copies Sent AO rate 



MasterCard/Visa welcome 1 



FOR I = 1 TO 100 

PRINT "I WILL NOT CRASH 

IN CLASS" 
NEXT I 




The Fine Print- 
Issues are sent First Class Mail 
All issues from July 81 on available ask 'or list 
Programs arp tor the Extended BASIC model o n lv 



t-hfcornobGttB. Ma 



^ 103 



gazine 



PO. Box 1087 Santa Barbara, CA 03109 (805)96; 
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ALCOR PASCAL 



A PROFESSIONAL QUALITY 

PASCAL FOR THE TRS80 

AND CPM 



Pascal Features 

A complete Jensen and Wirth Standard Pascal 
Produces compact efficient code that executes 

10-20 times faster than interpreted BASIC 
Generates reentrant Romable code 
Can compile large programs (4000 lines + ) 
Fast one pass compiler 
Simple commands for compiling and running 
Supports separate compilation of procedures 

and functions 
Compiler switch options, including conditional 

compilation 
Full heap support including NEW and DISPOSE 
Supports single and double precision REAL 
Files are compatible with TRSDOS 
Over 20 Language extensions 



The Best of Both Worlds 

Pseudocode (Pcode) for compactness 

Native code for speed (advanced develop, pack) 



Linking Loader 

Supports procedure and function libraries 
Can create command files that are callable as 
commands from TRSDOS and CPM top level 

TRS-80 Library 

Pascal library - over 20 routines . . . 
Graphics routines (setpoint. cleargraphics ....) 
Can call operating system and ROM routines 
Memory may be protected from Pascal for use by 
assembly language routines 



Full Screen Text Editor 

Included with Pascal or available separately 

No limit on file size (except disk capacity) 
Full cursor movement and scrolling 
Insert and delete characters, show file, insert file 
Insert, delete, duplicate, split, merge lines 
Horizontal scrolling allows editing of files 
containing lines wider than the screen 
Key and command mode access to commands 
Find string, replace string 
Files are compatible with TRSDOS 
On-line documentation with HELP command 
Can also edit text and BASIC programs 
Many additional features 



250 Page 
Documentation Package 



Optional Advanced 
Development Package 

Z80 native code generator 
Pcode optimizer 



Hardware Required 

TRS-80 model I: TRS-80 model III; or CP/M system 
(with Z80) 48k of memory. One disk drive (two 
recommended) TRS-80 version compatible with 
TRSDOS and most other operating systems. 



: '™ R ^mS!!ii ^Ly Corporate 

TRS-80 Model III CP/M 0jgital Research inc 

' CP/M Z80 Zilog. Inc. 

Send More Information free 

Alcor Pascal System $199 

~ Text Editor only $ 60 

: Advanced Development Package $125 

D Manuals only S 30 

ALCOR SYSTEMS 

13534 Preston Road 
Suite 365 

Dallas. Texas 75240 
For immediate service ca 
(214) 226-4476 



VKA* 



-n _ 

ADD S3. 00 Shipping & Handling 



"If a symbol is already present control returns to 
the cursor loop." 



produces an alternative display, white hori- 
zontal lines, alternating blue and orange 
vertical lines and rainbow colored curved 
lines and characters. 

Game Symbols 

The number of statements needed to set 
or change a given game piece is minimized 
with simple symbols (squares, rectangles 
or circles). The Line statement generates 
the simplest symbols. 

100 LINE(X1,Y1)-(X2,Y2),PSET(0R PRESET).B(Box) or 
BF(Full Box) 

The statement draws a line or a box (full or 
empty) by specifying the coordinates 
(X1.Y1) and (X1.Y2) of opposing corners. 
This statement, used for cursor control, 
also erases parts of the display by writing a 
full box in the background color. 

The Circle and Paint statements write the 
open and filled circles I chose as game 
pieces. A program line of the form 100 CIR- 
CLE (A,B)R,1 writes a green circle (color 1) 
of radius R at the point (A,B) on a black 
background (color 0). Repeating the above 
statement using color deletes the circle 
by drawing a black circle on a black back- 
ground. A filled circle is drawn by painting 
from the center of a circle with the fore- 
ground color. 

100 CIRCLE (A,B),R,1 
110 PAINT (A,B),1,1 

The filled circle is deleted by painting from 
the center (A,B) with color (black), or by us- 
ing a Line statement. 

The game is started on the screen by 
writing two circular symbols of each color 
with like colors on opposing diagonals in the 
four central squares of the board (see Fig. 2.). 
Additional symbols are written at a set of 
coordinates derived from the joystick outputs. 

Game Board Array and Grid System 

The game board is a 10 by 10 array of 
squares drawn on the screen at the begin- 
ning of the program using Line statements. 
The game area occupies screen positions 



from 40 to 250 horizontally and 1 7 to 187 ver- 
tically on the 256 by 192 screen and the joy- 
stick outputs map a 64 by 64 array of posi- 
tions; a little numerical manipulation con- 
fines the joystick controlled cursor to the 
game grid. An array of numbers tracks the 
type of symbol in each square of the grid. 
This array is denoted P(X,Y) in the listing 
and is dimensioned one element larger than 
the game board in all directions, resulting in 
a 12 by 12 array (see Fig. 2.). This oversized 
array surrounds the game array by a row of 
blank squares at all times and simplifies the 
search routines described later. 

At first, the joystick-controlled cursor ate 
the freshly drawn game grid. When the cur- 
sor coincided with a symbol or grid line, the 
flashing action permanently erased it; turn- 
ing off the flashing action left solid cursor 
tracks all over the screen. Rewriting the grid 
and symbols between flashes of the cursor 
solves this problem; in practice, the game 
operation becomes slower as more sym- 
bols fill the board. 

Cursor Control Using Joysticks 

The joysticks position the cursor in the 
center of each square and the joystick but- 
tons place game pieces on the screen. After 
each new symbol is written, symbol writing 
passes to the opponent's joystick. After 
each new piece is set on the board, the posi- 
tion is checked to see if it is allowed; if the 
move is illegal, the symbol is deleted and 
another move allowed. 

The centers of each square are the only 
positions the cursor can occupy. The joy- 
stick outputs are quantized with: 100 V1 = 
INT(JOYSTK(0) . 4)/7)+ 1. Values of the vari- 
able JOYSTK(O) range from to 63; the 
above expression compresses all these 
values into integers between 1 and 10 in- 
clusive. When performed on both joystick 
outputs, the joystick creates only numbers 
between 1 and 10 in both axes, correspond- 
ing to centers of game squares. 

The screen coordinates (A,B) of the 
center of the cursor are expressed as the 
compressed joystick outputs; the joystick 
makes the cursor jump from the center of 




CURSOR 

IN CENTER 

OF OPEN CIRCLE 



Fig. 3. Cursor Positioning in Game Cells. 
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"This prevents the grid from being erased 
and automatically positions game symbols. . . " 



one square to the center of the next. This 
prevents the grid from being erased and 
automatically moves the game symbols to 
the correct position, (see Fig. 3). The joy- 
stick button places symbols on the board 
and provides a numeric output Z = PEEK 
(65820) which is a pair of numbers (254 or 1 26) 
for one joystick and (253 or 125) for the other. 
The two values reflect whether the joystick is 
left or right of the center position. 

Lines 660 to 990 in Program Listing 1 
move the cursor with joysticks to any board 
position without erasing any game sym- 
bols. The Line statement creates the cursor; 
the cursor loop continuously writes a black 
or green cursor, writes the appropriate sym- 
bol in the square and checks the value of Z 
to see if a new symbol is to be placed on the 
board. The joystick button branches the 
program out of the cursor loop. If a symbol 
is already present in the square, control 
returns to the cursor loop; otherwise, the 
symbol appropriate to the joystick in use is 
written. A joystick switching counter (W in 
line 640) in the cursor loop selects the cor- 
rect symbol for each player. 

Autosearch Routine 

and Resetting Trapped Symbols 

The possible arrangements of symbols 
along a single direction from the new sym- 
bol position reduces to four distinct cases 
(see Fig. 4). The search routine checks the 
symbol present in each preceding square 
until it detects one of the four patterns. If 
the routine encounters a blank square first 
(case I) the search ends. If it finds an op- 
posite symbol first the search continues un- 
til a like symbol is found (case II). The value 
of the counter M in the search routine (lines 
1200 to 1 370) is set and the trapped symbols 
are reset. The next symbol in case III is iden- 
tical and the search ends. A full line of iden- 
tical opposite symbols also ends the search 
(case IV). The oversized array terminates 
the maximum search on a known symbol (a 
blank square) and simplifies the reset loop 
limit definitions. 

One dimensional searches for all eight 
directions are arranged serially in the pro- 
gram and are indicated by REM lines AUTO- 
SEARCH LEFT or AUTOSEARCH RIGHT). 
Subroutines at 2710 and 2800 reset symbols 
and produce a series of beeps with the 
statement SOUND (200,1). 

Detecting Illegal Moves 

The search routines determine valid 
board positions for new symbols with the 
counter N8. The value of N8 is incremented 
by one for each case I, III or IV; if N8 equals 
eight at the end of the two-dimensional 
search, no legal moves were found. In this 
case, a subroutine at 2890 destroys the 
symbol with flashing cursors and suitable 

sSee List of Advertisers on page 402 



sound effects. The symbol is reset after the 
cursor moves to an allowed position. 

Scoring System 

Because it is impossible to print text on 
the graphics screen with simple print com- 
mands I added bar graphs, updated each 
time a symbol changed sides. One bar graph 
is empty and the other a full rectangle; the 
height of each is proportional to each 
player's score at any point in the game. 

The incremental bar graph in which a 
small block is added or subtracted from the 
previous bar height as the symbols change 
sides is implemented in lines 3060 to 3190 
as a subroutine to the symbol drawing and 
deleting subroutines. 

An alphanumeric scoreboard, con- 
structed with Draw statements, and a turn 
indicator at the top of the screen further en- 
lighten the players. 

The Draw statements in lines 370 to 450 
write the words SCORE and NEXT at the top 
of the screen. A video scoreboard totals 
both scores at the end of each move (in 
lines 2560 to 2680 and a multibranch set of 
subroutines starting at 3220). A Draw state- 
ment generates each number in a 5 by 7 cell. 

DRAW "BM" + P$ + ".16; (draw Instruc tions)" 



BLANK SQUARES IN 
OVERSIZED ARRAY P(0, Y) 



,. tDGE OF SCREEN GRID 



OLD SYMBOLS 



NEW SYMBOL 



o 



ooo 



SEARCH XI - I TO O 



. 



o 



IF THE NEXT SYMBOL IS BLANK SEARCH 
NEXT DIRECTION 



, 7- RESET 



WHEN A SIMILAR SYMBOL IS FOUND RESET 
THE CAPTUREO PIECES USING M COUNTER 
AND END SEARCH 



h— ■ 



IF NEXT SQUARE IS THE SAME SEARCH 
NEXT AXIS 



I— 



oooooo 



A FULL ROW ALWAYS ENOS IN A BLANK SQUARE 
AND REDUCES TO CASE I 



Fig. 4. One Dimensional Search used to 
identify trapped game pieces. The complex 
patterns simplify to one of four cases. 
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LOW-LEVEL CENTER 

TRS-80 Model l/lll 



STRETCH SUPERSTEP: New third generation Z80 simu- 
lator is the leading element ot the Sottware CPU design base Ani- 
mated Z80 Programming Models. Intelligent RAM Window, 
scrolling disassembler are now extended. New modules are 
FLTCUR 2-D byte oriented editor with full floating cursor and auto- 
repeat plus innovative BUFSTF user-detined butler/window 
setup tor flexible skeleton program views. Use BUFSTF to view 
large amounts ot disassembled code, isolate all instances of 
selected instructions in several formats, more. Gather instruction 
frequency counts in straight-line or program-llow order for 
sophisticated analysis of subject programs and Z80 resource use. 
Many lormatted transparent printer options, including screen pix 
and instruction-by-instruction tabular listing of all active machine 
aspects Pictorial manual gives easy intro to program operation. 
Nothing newer for byte-entry, debugging and analysis of Z80 
machine language programs $39.95 + $2.00 shipping 

EMU 02e: Detailed instruction-level 6502 simulator with ani- 
mated before/alter 6502 Programming Models (registers, flags 
and stack) and scrolling instruction stream disassembler active in 
Single-step and 4-speed TRACE modes, also special high speed 
interpreter running over 5% actual 1 mhz 6502 processor speed. 
Have a 6502 without having a 6502, tind out why the 6502 brain 
was picked by Apple. PET. Atari, arcade machines, etc. $29.95 
+ $2.00 shipping 

BALC0DE 80A: Highly interesting mid-level language for 
TRS-80 Model I. IBM's 8AL (Basic Assembler Language) is an 
idealized machine instruction set currently in use on the IBM 

360/370. BALCODE80A implements an extended BAL subset via X 

a text editor and macro assembler; you write in BAL with 20 Z 

p-registers (16 general purpose. 4 floating point) and powerlul Z 

addressing modes, then assemble to fast Z80 code Hands on Z 

introduction to BAL, source programs are highly portable to make Z 

your TRS-80 an IBM workalike! Includes 106 page IBM reference Z 

publication describing BAL. From Balcode Sottware. $79.00 + Z 

$3 00 shipping Z 



COMPILER t 

WORKSTATION • 

TRS-80 Model I and III • 

Your BASIC program development • 

could go faster... § 

EDIT: Full-Screen BASIC editor with floating cursor and auto- • 

repeat. More than 30 commands and functions let you var- • 

lously tind. change, insert, delete, replace, replicate, copy, # 

move or position BASIC text at the character, string, line or • 

block level. Developed in Britain by Southern Sottware Mod I, J 

III $40.00 + 1.50 shipping. • 

• 

PACKER: (Cottage Software) Editing tool will unpack, shorten. # 

repack, renumber all or part of your BASIC text The UNPACK • 

segment is very useful when preparing BASIC source pro- 9 

grams for compilation by ACCEL2. Mod I. Ill $29.95+ 1.00 • 

shipping. • 

Then your BASIC program • 

could go faster... f 

ACCEL2: Compiler for TRS-80 Mod I, Mod ill Disk BASIC. New • 

functional improvements in place to give more ease-ot-use. 9 

quicker compilation ot large programs, better chaining of com- • 

piled and non-compiled programs. Size read-out helps you x 

monitor code growth during compilation . REM N0ARRAY option. - 
lets you use variable-bound arrays. Professionals note: Com- 
prehensive instructions show how to organize your compiled 
programs for resale on tape. ES/F wafer or disk. No royalties 1 
Developed in Britain by Southern Software. Specify Mod lor III 
$88.95 + $2 00 shipping. 

TSAVE: Writes compiler output to independent SYSTEM tape. 9 

$9 95 + $100 shipping. w 

EXEC: Command-List Processor for TRS-80 Mod I. Prepare, 
execute, pass as many as nine parameters to lists of TRSD0S 
or NEWD0S commands and/or BASIC statements. Simphties 
repetitive procedures such as power-up sequences, file set- 
ups, etc. Compatible with ACCEL2 compiler disk output. 
Developed in Britain by Southern Software. $22.00 + $1 00 
shipping. 



P.O. BOX 11721 SAN FRANCISCO, CA 94101 

TRS-80. TRSD0S tm Radio Shack. ES/F tm Exatron 
•••••••••••••••••• • •••••• 
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"The joystick button 
branches the program 
out of the cursor loop." 





Fig. 5. Playing the Game. 



$ 275 

DISK DRIVES 

5V4" 40 Track drive with case and 
power supply. 

FLIPPY DRIVES ONLY $295.00 

2 DRIVE CABLE $14.95 

4116 MEMORY CHIPS 8 FOR $20 

CORSAIR COMPUTER 

CORPORATION -200 

7952 Highway 80 West 

Fort Worth. TX 76116 

817-244-8051 



The string variable P$ moves the number to 
be drawn to one of four horizontal positions 
in the pair of two digit scores generated by 
the game. The Draw statement in the tens 
column can be skipped for single digit 
scores to avoid displays of 00 to 09. The 
scoreboard blanks before each set of 
numbers prints. 

After playing many games to check the 
program I added a method of switching con- 
trol from one joystick to the other. Key S 
transfers control to player two when player 
one cannot move. 

Playing the Game 

After the program is entered into the Col- 
or Computer, press Run to show the title 
page. Press the spacebar to turn the page 
for game instructions. Use the joysticks to 
move the cursor and use the joystick button 
to place the symbol on the game board. 
Symbols placed in illegal positions are de- 
leted immediately. Switch joystick control 
of the cursor from player to player by press- 
ing key S. 

Press the spacebar to clear the screen 



94 • 80 Microcomputing, March 1982 



and reveal the graphics page. At the end of 
a game press the spacebar to return to the 
instruction page. The flashing cursor disap- 
pears and a short delay occurs as the game 
array P(X,Y) is reset to zero before the in- 
struction page is shown. 

The graphics display initially shows the 
game grid and four starting symbols. The 
scoreboard indicates the correct score 
after the first move is made, and the bar 
graph to the left of the display is updated as 
the four starting symbols are set in place. 
The turn indicator at the top of the screen 
shows which player has the next turn with a 
filled or open circle. The open circle has the 
first move; the S key gives the first move to 
the closed circle. 

A typical game sequence is shown in Fig. 
5 from the four central pieces to approx- 
imately one-third the way through a game. 
Several basic strategies can win the game: 
Capturing corners is to your advantage and 
should remain your first priority. Placing 
symbols in the outer squares is advanta- 
geous; symbols placed in rows and col- 
umns adjacent to the outer squares is haz- 
ardous, but often unavoidable. ■ 

Reader Service for facing page v3 J — 




THE 
SWITCH 

SWITCH T0 57 8"D0UBLE DENSITY 

LNDoubler 5/& 



FEATURES 

• 5- and 8-inch* disk drives 

• Single- & double-density 

• Any size and density in any mix 

• Read Model I, II* and III disks 

• 5- or 8-inch* system disk 

• Single & double sided disk drives 

• DOS+ 3.3.9 included, with Disk 
BASIC. 

• 6 month warranty 

• Up to 3.75 megabytes online 

• Easy installation - plug-in & run 

• Analog phase lock loop data 
separation 

• Precision write precompensation 

• Regulated power supply 

• Guaranteed operation at 4MHz 

• All contacts gold plated 

• Solder masked & silk screened 

• Runs under DOS+ 3.3.9, TRSDOS 
2.3, NEWDOS 2.1, NEWDOS/80 
1.0, LDOS, NEWDOS/80 2.0 r 
and ULTRADOS 

• Reads 40- and 35-track disks on 
80-track drives 

• FD1791 controller + your FD1771 

• Fits Model I expansion interfaces 

• Fits LNW expansion interfaces 

• Track configurations to 80-tracks 

• 5 inch disk storage increased to: 

161,280 bytes - 35-track SS/DD 
322,560 bytes - 35-track DS/DD 
184,320 bytes - 40-track SS/DD 
368,640 bytes - 40-track DS/DD 
368,640 bytes - 80-track SS/DD 
737,280 bytes - 80-track DS/DD 

• 8 inch disk storage increased to: 



591,360 bytes - 77-track SS/DD 
1,182,720 bytes - 77-track DS/DD 
SS: single-sided DS: double-sided 
SD: single-density DD: double-density 

COMPLETE - The LNDoubler 5/8, 
switches your Model I or LNW-80 
into the most versatile computer you 
can own. The LNDoubler's switch 
allows you to boot from 5- or 8-inch 
system disks, and it's accessible from 
outside the interface. The LNDoubler 
5/8 comes with a double-density disk 
operating system (DOS+ 3.3.9), 
complete with BASIC and utility 
programs . . . ready to run your 
software NOW! 

VERSATILE - Whether you want 
single-sided, double-sided, single- or 
double-density, 5- or 8-inch operation, 
complete versatility is here today! 
Any combination of 5- and 8-inch disk 
storage is possible with the 
LNDoubler 5/8. Each of your present 
40-track, single-sided 5-inch drives 
will store up to 184,320 bytes 
(formatted storage) - that's an 80% 
increase in storage capacity for only, 
half the cost of just one disk drive. 
With three 8-inch double-density, 
double-sided drives your Model I will 
have 3.75 Megabytes of online storage 
- that's more storage than a Model II 
or Model III! 

ADVANCED - The LNDoubler 5/8 
is the most technically advanced, 
tested and reliable double-density 



board you can buy. The LNDoubler 
5/8 has more features, more options 
and more software support than any 
other product of its kind. 

EASY TO INSTALL - The 

LNDoubler 5/8 is easy to install. 
There are no traces to cut, no wiring 
to do, just a screwdriver and a few 
minutes of your time is all that is 
required. The instructions are fully 
illustrated for all interfaces. In 
minutes you will be 'up-and-running', 
and enjoying your computer as never 
before. 

COMPARE - Compare features, 
compare quality, compare value, and 
make the SWITCH today! 
Immediate delivery from stock - at 
your dealer NOW for only 



219.95 



DEALERS - You too can 
make The Switch. 




IjNTf/RESEARCH CORPORA TION 



2620 WALNUT Tustin, CA. 92680 (714)544-5744 (714)641-8850 

•8" drive operation requires special cable. 8" double-ciensily requires 3.55MHz CPU speed-up modification or LNW-80 IMHz computer. TKS-80 is a trademark of Tandy Corporation. 



New 
Products 

For the TRS-80 

MODELS l&l 



Digital I/O Port 

♦ teaching newsletter 

8 TTL outputs. 6 inputs, assembled & 
tested PC board, control the outside 
world from BASIC APIO-80b im- 
proved (specify Model 1 or 3) $67 
newsletter $2.50 




T TV- interface 

^^--frf) low cost printout 

^f ^ *^ ^ convert any ASCII or Baudot teletype 

_ q ^_jb- to a TRS-80 printer, no expansion 

C^5£"""""""^ interface needed $62. optional loop 

______ supply S30, write tor more info 



LIGHT* PEN 

with sophisticated software 

add excitement to your software. LTPEN-80 adds 
lour new functions to BASIC, in an instant, pick any 
(X.Y) point or character position on the screen 
simply by pointing the pen 1 ; enhance games . . . 

- I"j: it.' !■-•- > ■■''■' ■'-■■' 



all prices include postage 
information 



call or write for more 



All products post paid w/in USA . foreign orders remit 
U S funds plus extra postage Call or write today 






' O for more info, call O 

717/733-4769 

electronic innovations 

Box 4Q34 LANCASTER PA 176CM 



NEW PROGRAMS 
FOR THE TRS-80 

IfXOPROP 

Income Property Analysis 
for the TRS-80 

INCOPROP: Based upon standardized methods 
of property analysis used throughout the real 
estate industry Generates a 3 page report contain- 
ing an annual property operating statement and a 
comprehensive 10 year cash flow analysis. Con- 
tains I.R.S. tax table to proiect after-lax income 
stream and investor's I.R.R. 



• Handles 5 dillen 

• Handles up to 3 

• Highly interact 

• Disk files crea:ei 
Minimum system rt 
printer. Sold wilh ml 
mg basic aspects t 
data worksheets 
Mode 



■n»lhods o' lax depreciation, 
ns & 3 different type loans 
anal OtlOlitS Sensitivity Analys 
r -.i.-nr anwit storage of data 
nrements: 3?k RAM. 1 drive 
native 78 page user's manual co 
income property investment R 



III; on 






•71m 



inch diskette 
;ion available in M6ASIC 
iing under CP.'M 



1.1 f, r ; ::n 



MAINOEX: An easyto-use program to aid you in 
the indexing of your files on disk. Can't find that 
program you wrote last month? Put your computer 
to work! Find any program or data file in your sys- 
tem in seconds. 

• A Main Index ol all your olher disk's directories. 

• Alphabetizes list of files and gives you names, grans 
used, dales written, tracks and file descriptions 

• Sorts Files by name. disk, and categories 

• File descriptions can be searched for key words 

• Prints disk labels with disk name and file names 

• Uses all Ihe advanced and extremely lasl lile manipu- 
lation capabilities ol Apparat. Inc s NEWDOS.'SO. 

Ht'Quires Level II. 48K. 1 disk drive and NEWDOS/80 on 
casseite lor easy iransle< lo disk $20 95 




DEPT EM. PO BOX 591.NOVATO, CA 94947 
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Program Listing 

10 N=0:CLS:CLEAR 250 

20 PRINT 8 0," ****OTHELLO****" 

30 PRINT 8 64," THIS GAME OF AUTHELLO REQUIRES APPROXIMATELY 8K OF ME 

MORY AND IS WRITTEN USING EXTENDED COLOR BASIC FOR THE RADIO 

SHACK COLOR COMPUTER. THE PROGRAM FEATURES AUTOMATIC SE 

ARCH AND FLIPPING ROUTINES," 
40 PRINT 8 288," A TURN INDICATOR, A BAR GRAPH SCORE DISPLAY AS WELL 

AS FULLY AUTOMATIC ALPHANUMERIC SCOREKEEPING" 
50 PRINT 8 448," PRESS SPACEBAR TO CONTINUE" 
60 U$=INKEY$:BS=" " 
70 IF U$=B$ THEN 90 
80 GOTO 20 
90 CLS 

100 DIM P(ll,ll) 

110 FOR 1=0 TO 11: FOR J=0 TO 11 
120 P(I,J)=0 
130 NEXT J:NEXT I 
140 CLS 

150 PRINT 8 0," ****OTHELLO****" 

160 PRINT 8 64, "1 SYMBOLS (FULL AND OPEN CIRCLES) ARE POSITIONED USING 
JOYSTICKS AND ARE SET USING THE JOYSTICK BUTTONS" 

8 192, "2 IF A SYMBOL IS SET IN THE WRONG POSITION IT W 
AUTOMATICALLY DELETED" 

8 288, "3 PRESS (S) TO SWITCH JOYSTICKS" 

8 320, "4 PRESS SPACEBAR AT END OF GAME TO RESET THE VIDEO 



170 PRINT 
ILL BE 
180 PRINT 
190 PRINT 
BOARD" 
200 PRINT 



8 



PRESS SPACEBAR TO START *' 



416," 

210 U$=INKEY$:B$=" " 
220 IF U$=B$ THEN 240 
230 GOTO 150 

240 PMODE 4,1: SCREEN 1,0 
250 COLOR 3,2:PCLS 
260 FOR J=40 TO 250 STEP 21 
270 LINE(J,17)-(J,187) ,PSET 
280 NEXT J 

290 FOR K=17 TO 187 STEP 17 
300 LINE(40,K)-(250,K) ,PSET 
310 NEXT K 

320 LINE(20,27)-(20,187) ,PSET 
330 LINE(5,187)-(35,187) ,PSET 
340 FOR Y=187 TO 27 STEP-16 
350 LINE(19,Y)-(21,Y) ,PSET 
360 NEXT Y 

370 DRAW "BMll7,4;Dl;N;D6;F4;Fl;Dl;U7" 
380 DRAW "BM125,4;N;R5;D3;N;R4;D4;R5" 
3 9 D RAW "BM133,4;D1;F5;D1;B;L5;U1;E5;U1;B;D7" 
400 DRAW"BM141,4;R4;L2;D7;B;R3" 

410 DRAW"BM2,4;B;D1;D1;F1;R3;F1;D2;G1;L3;H1;B;U5;E1;R3;F1;B;D6" 
420 DRAW"BM10,4;B;D1;D5;F1;R3;E1;U1;B;U3;U1;H1;L3;G1;B;D6;B;R5" 
430 DRAW"BM18,4;B;D1;D5;F1;R3;E1;U5;H1;L3;G1;B;D6;B" 
440 DRAW"BM26,4;N;D7;R4;F1;D1;G1;N;L4;F1;D3" 
450 DRAW"BM34 , 4 ; N; R5 ;D3 ; N; R4 ; D4; R5 " 
460 P(5,5)=1:CIRCLE(134,93) ,7,1 
470 C1=1:C2=0 
480 GOSUB 3070 
490 SOUND 200,1 

500 P(6,6)=1:CIRCLE(155,110) ,7,1 
510 C1=2:C2=0 
520 GOSUB 3070 
530 SOUND 200,1 

540 P(5,6)=2:CIRCLE(134,110) ,7,1 
550 C1=2:C2=1 
560 PAINT(134,110) ,1,1 
570 GOSUB 3140 
580 SOUND 200,1 

590 P(6,5)=2:CIRCLE(155,93) ,7,1 
600 C1=2:C2=2 
610 PAINT (15 5, 93) ,1,1 
620 GOSUB 3140 
630 SOUND 200,1 
640 W=l 

650 REM *****KEYBOARD INPUT**** 
660 V1=INT( (JOYSTK(0)+4)/7)+l 
670 V2=INT((JOYSTK(l)+4)/7)+l 
680 V3=INT( (JOYSTK(2)+4)/7)+l 
690 V4=INT( (JOYSTK(3)+4)/7)+l 
700 ON W GOTO 710,730 
710 X=V1:Y=V2 
720 GOTO 740 
730 X=V3:Y=V4 
740 A=X*21+29:B=Y*17+8 
750 LINE(A-4,B-3)-(A+4,B+3) ,PSET,BF 
760 FOR K=l TO 3 :NEXT K 
770 LINE(A-4,B-3)-(A+4,B+3) , PRESET, BF 



Program continues 




HAVE WE 

GOT A PROGRAM 
FOR YOU IM 82 

Over 150,000 computer owners and novices attended the 1981 
National Computer Shows and Office Equipment Expositions, 
and more than a quarter of a million are expected to be at the 
1982 shows. 
Each show features hundreds of companies using thousands 
of square feet of display space to showcase and sell millions of dollars 
worth of micro and mini computers, data and word processing equipment, 
peripherals, accessories, supplies and software. 

Under one roof you'll see — and be able to buy — all of the hardware 
and software made by every major computer manufacturer for busi- 
ness, industry, government, education, home and personal use. 
The show includes computers costing as little as $100 to com- 
puters selling for $150,000. 

Don't miss the coming of the new computers — show up for 
the show. Admission is $5 per person and $3 for children. 



Ticket Information 

Send $5 with the name of the show you 
plan to attend to National Computer 
Shows, 324 Boylston Street, Chestnut 
Hill, Mass. 02167. Tickets can also be 
purchased at the show. 



Dallas 
Dallas Market Hall 

Thursday-Sunday 

April 15-18, 1982 

11 AM to 6 PM Daily 

DIRECTIONS: 

2200 STEMMONS FREEWAY 

(AT INDUSTRIAL BLVDj 



Uniondale, Long Island 
Nassau Coliseum 

Thursday-Sunday 

April 22-25, 1982 

11 AM to 6 PM Daily 

DIRECTIONS: TAKE L.I. EXPWY 

TO EXIT 38 NO. STATE PKWY 

TO EXIT 31A MEADOWBROOK 

PKWY SO. TO EXIT M5 

HEMPSTEAD TURNPIKE 



Minneapolis 
Minn. Auditorium 
& Convention Hall 

Third Avenue 

Thursday-Sunday 

September 16-19, 1982 

11 AM to 6 PM Daily 

DIRECTIONS: HWY 94 to 
11th St. Exit to Third Ave. 



Washington, DC 
DC Armory/Starplex 

Across from RFK Stadium 
Thursday-Sunday 
October 28-31, 1982 
11 AM to 6 PM Daily 

DIRECTIONS: 

2001E.CAPITOLSTSE 

(E. CAPITOL ST. EXIT OFF 1-295 

— KENILWORTH FRWY) 



Chicago 
(Arlington Heights) 
Arlington Park Racetrack 
Exhibition Center 
Thursday-Sunday 
November 5-7, 1982 
11 AM to 6 PM Daily 

DIRECTIONS: EUCLID AVE & 

WILKE RD. TAKE NW TOLLWAY 

TO RTE 53 EXIT AT 

EUCLID AVE EAST 



Boston 
Hynes Auditorium/ 
Prudential Center 

Thursday-Sunday 

November 11-14, 1982 

11 AM to 6 PM Daily 

DIRECTIONS: TAKE MASS 

PIKE TO PRUDENTIAL 

CENTER EXIT 



Atlanta 
Atlanta Civic Center 



Thursday-Sunday 
December 9-12, 1982 
11 AM to 6 PM Daily 

DIRECTIONS: 

395PIEDMONTAVENE 

(AT RALPH McGILL BLVD) 



The National Computer Shows are produced by Northeast Expositions Inc. who also produce Electronica — shows featuring home entertainment equipment and personal 
electronics — which are held annually in major US cities. NEI also produces the Applefest Shows. For more information about any of these events call us at 617-739-2000 
or write to the above address. * 



500 



s-See List of Advertisers on page 402 
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SCRIPLUS 3.0 



Scriplus is a modification to Scripsit c which enables 
you to take advantage of the special functions, 
features, and print formats of your printer while your 
document is being printed. Allows you to: 



change expanded print 
change no. o-f characters per inch 
or underline in mid-line! 



1) Send coitands to the printer to activate special 
formats' 

2) SCRIPLUS Mill NOT crash programs protected in hi -tee! 

3) "END* returns to DOS READY instead of re-booting! 

4) Initial line feed is changed to a carriage return to 
empty text buffer! 

5) The use gets an ALPHABETIZED Directory (with FREE 
space shown) from within SCRIPLUS! 

6) Optionally select line feed after carriage return 

7) Supports custoi printer drivers (NOT included) 

8) Modifies ALL versions of SCRIPSIT(tn) for Hod I or 
III. Allows you to use Hod I version on Hod III! 

9) Printer can be STOPPED for insertion of text or forms 
alignment! 

10) Inserted text can be edited prior to resumption of 
printing' 

11) Files car. be killed, loaded, merged, or chained from 
the SCRIPLUS DIRectory 1 

12) Allows Hod III versions to be BACKED UP for 
protection! 

13) Works on ALL current major DOS's (Hod I or III) 

14) Works with new 3.2 Hod III Scripsit on 1.3 DOS! 

15) Specifically written for the NX-80, but will 
with ANY printer that accepts CHR$ codes for control! 

16) Previous owners may send in their disks for upgrade 
($15) 



$39.95 



your 



work 




GREAT for EPSON'S 1 With or without 6RATRAX-80(tm) 



11500 Ste»mons Expressway - Dallas, Texas 75229 

mmrnm^m maamm am a mi mi m ammmmmmm mmmmmM m mM 



H/C-VISAI (214)484-2976 - HicroNet* 70130,203 
CARDS I Join OUR Xtra-80 Sig ON HicroNet! 
Accepted! From the "OK" prompt, type: R QSD 



Write for 
our FREE 
Catalog! 



DEALER INQUIRIES INVITEE 

'BSTKBATSTlr d l e"s""Sro"?5 l "5l 

See us at NCC in Dallas' April 21-25 
PowerSoft is a division of Breeze/QSD, Inc. 
SCRIPSIT is a registered TH of TANDY CORP. 




U.S. FUNDS ONLY 
for shipping. 
CHECKS! 



Program continued 



780 IF P(X,Y)=0 THEN 820 

790 CIRCLE(A,B) ,7,1 

800 IF P(X,Y)=1 THEN 820 

810 PAINT(A,B) ,1,1 

820 A$=INKEY$ 

830 Z=PEEK(65280) 

840 ON W GOTO 850,880 

850 IF Z=254 THEN 1070 

860 IF Z=126 THEN 1070 

870 GOTO 90 



880 


IF Z=253 THEN 


1150 


890 


IF Z=125 THEN 


1150 


900 


S$="S B 




910 


B$=" " 




920 


IF A$=S$ THEN 


1000 


930 


IF A$=B$ THEN 


110 


940 


ON W GOTO 950 


,980 


950 


PAINT (160, 8) , 


1,0 


960 


CIRCLE (160, 8) 


,6,1 


970 


GOTO 990 




980 


PAINT(160,8) , 


Ul 


990 


GOTO 660 




1000 REM**SWITCH 


JOYSTICKS*** 


1010 ON W GOTO 1020,1040 


1020 W=2 





1030 GOTO 1050 

1040 W=l 

1050 GOTO 660 

1060 REM**WRITE OPEN CIRCLE** 

1070 IF P(X,Y)=1 OR P(X,Y)=2 THEN 660 

1080 P(X,Y)=1 

1090 LINE(J,K)-(J+16,K+13) , PRESET, BF 

1100 CIRCLE(A,B) ,7,3 

1110 C1=C1+1:G0SUB 3070 

1120 W=2 

1130 GOTO 1210 

1140 REM**WRITE FULL CIRCLE*** 

1150 IF P(X,Y)=1 OR P(X,Y)=2 THEN 660 

1160 P(X,Y)=2 

1170 CIRCLE(A,B) ,7,3 

1180 PAINT(A,B) ,3,3 

1190 W=l:C2=C2+l:GOSUB 3140 

1200 REM***AUTOSEARCH LEFT X*** 

1210 F=P(X,Y) 

1220 N8=0 

1230 X1=X 

1240 FOR I=X1-1 TO STEP -1 

1250 M=I+1 

1260 IF P(I,Y)=0 THEN N8=N8+1 

1270 IF P(I,Y)=0 THEN 1370 

1280 IF P(I,Y)=F THEN 1300 

1290 NEXT I 

1300 IF M=X1 THEN N8=N8+1 

1310 IF M=X1 THEN 1370 

1320 FOR X=M TO Xl-1 

1330 P(X,Y)=F 

1340 A=X*21+29 

1350 ON F GOSUB 2710,2800 

1360 NEXT X 

1370 X=X1 

1380 REM***AUTOSEARCH RIGHT X*** 

1390 FOR I=X1+1 TO 11 

1400 M=I-1 

1410 IF P(I,Y)=0 THEN N8=N8+1 

1420 IF P(I,Y)=0 THEN 1520 

1430 IF P(I,Y)=F THEN 1450 

1440 NEXT I 

1450 IF M=X1 THEN N8=N8+1 

1460 IF M=X1 THEN 1520 

1470 FOR X=X1+1 TO M 

1480 P(X,Y)=F 

1490 A=X*21+29 

1500 ON F GOSUB 2710,2800 

1510 NEXT X 

1520 X=X1 

1530 REM***AUTOSEARCH UPPER Y*** 

1540 Y1=Y 

1550 FOR I=Y1-1 TO STEP -1 

1560 M=I+1 

1570 IF P(X,I)=0 THEN N8=N8+1 

1580 IF P(X,I)=0 THEN 1690 

1590 IF P(X,I)=F THEN 1610 

1600 NEXT I 

1610 IF M=Y1 THEN N8=N8+1 

1620 IF M=Y1 THEN 1690 

1630 FOR Y=M TO Yl-1 

1640 P(X,Y)=F 

Program continues 
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HW ELECTRONICS 

is pleased to announce the addition of new adventures from J ff fjfoCO 

THE PROGRAMMER'S GUILDI 

La 




IWcao: 



GAUNTLET OF DEATH 

Cat. No. 3497 16K, L2, MI&III, cass 

MAZE OF DARKNESS 

Cat. No. 3498 16K, L2, MI&III, cass 

TRAMPMAZE DUALOGY: 

GAUNTLET OF DEATH & MA ZE OF DARKNESS 



Cat. No. 3499 

TIMEOUEST 

Cat. No. 3500 

TIMEO UEST 

Cat. No. 3501 

TIMEOUEST 

Cat. No. 3502 16K, L2, MI&III, cass 

TEMfLEQfTHESliN. 

Cat. No. 3503 16K, L2, MI&III, cass 



32K, L2, MI&III, disk 

32K, L2, MI, disk (converts to Mill) 

32K, L2, Mill, disk (preconverted) 



$19.95 
$19.95 

$29.95 
$24.95 
$24.95 
$19.95 
$19.95 



TEMPLE OF THE SUN $24.95 

Cat. No. 3504 32K, L2, MI&III, disk 

DOMES OF KILGARI $19.95 

Cat. No. 3505 15K, L2, MI&III, cass 

DOMES OF KILGARI $24.95 

Cat. No. 3506 32K, L2, MI&III, disk 

DEADLY DUNGEON $14.95 

Cat. No. 3507 16K, L2, MI&III, cass 

DEADLY DUNGEON $19.95 

Cat. No. 3508 32K, L2, MI&III, disk 

DREADNAUGHT CHRONICLES 

DEATH DREADNAUGHT & DOMES OF 

KILGARI $29.95 

Cat. No. 3509 32K, L2, MI&III, disk 

GRAYLOCK CHRONICLES TRILOGY 

SPIDER MOUNTAIN, DEADLY DUNGEON, & 

DRAGONQUEST $35.00 

Cat. No. 3510 32K, L2, MI&III, disk 

TOWER OF FEAR $19.95 

Cat. No. 3511 16K, L2, MI&III, cass 

TOWER OF FEAR $24.95 

Cat. No. 3512 32K, L2, MI&III, disk 

* ATTENTION COLOR COMPUT ER OWNERS -¥■ 
TOWER OF FEAR $19.95 

Cat. No. 3513 16K, Extended BASIC, cass 



DEALERS: CALL FOR PRICING ON ALL PROGRAMMER'S GUILD SOFTWARE 



The Captain 80 Book of 
BASIC ADVENTURES 

The ideal book tor adventurers, THE CAPTAIN 80 BOOK OF 
BASIC ADVENTURES introduces programmers to the world of 
computer-based "dungeons and dragons". Concepts of adventure 
programs are discussed as well as the process involved in writing your 
own adventure program. An adventure-generating program is includ- 
ed along with listings for eighteen adventures written by some of the 
"greats". 
Cat. No. 3496 $19-95 

HAYES STACK SMARTMODEM 

The Hayes Stack SMARTMODEM is a high performance 300 baud 
communication system for your TRS-80 microcomputer (all models). 
With the SMARTMODEM, your TRS-80 can communicate with other 
TRS-80's or time-share computers. Unlike most modems, the 
SMARTMODEM can be connected to any telephone system in the 
United States since dialing can be Touch-Tone, pulse, or a combina- 
tion of the two. Features such as auto-answer, auto-dial, complete 
programmability, and full or half duplex operation make the 
SMARTMODEM the most sophisticated yet cost-effective data 
communications package available. 

NOTE: Requires RS232 port. -, 

Cat. No. 3388 Jt»<D0 

$25900 



VERBATIM 
DATALIFE DISKETTES 

The ideal diskette for vour TRS-80 
at a great price. With no shipping 
charges to bother with, you just 
can't lose. 



Cat. No. 1147 



$28.00 



TRS-80 SERVICE MANUALS 

TRS-80 COLOR COMPUTER 
Manual #26-300 1/3002MU 
Cat. No. 3478 
TRS-80 MODEL III 
Manual #26-1063MU 
Cat. No. 3479 
TRS-80 MODEL 11 
Manual #26-4002MU 
Cat. No. 3482 




$14.95 



$19.95 



$19.95 



HOW TO ORDER 

Write or phone. Pay by check, M/C, VISA, or COD (add $1.50 for COD). 

(800) 423-5387 (213) 886-9200 

Offer expires Mar. 31. 1982 

Mention this ad and we pay shipping (UPS ground only). 

HW Electronics 

19511 Business Center Dr. Dept. V3 Northridge, CA 



91324 



WHEN IN SOUTHERN CALIFORNIA, VISIT OUR RETAIL STORES 




ELECTRONICS 



19511 Business Center Dr. 
Northridge, CA 91324 



2301 Artesia Blvd. 
Redondo Beach, CA 90277 




SIGMON 

SIGMON is a complete machine Language develop- 
ment tool for your TRS-80 Color Computer and it's 
super powered 6809E microprocessor. 

Features: 

MONITOR: Display memory in HEX and ASCII, Direct HEX and 
Decimal entry into memory/ resisters, Move, Find, Tape Read and 
Write, Output to printer and more. 

DISASSEMBLER: Display Addresses, Opcode operand, 
Mnemonics, and Address expressions for specific range of 
instructions. 

MINI ASSEMBLER: Allows you to enter instructions in Symbolic 
form and have them converted to Machine Language. 

DEBUGGER: Allows Stepping and Break point execution of 
Machine Language programs. 

With SIGMON you can awaken the awesome powers that lurk 

within the dark recesses of your color computer. 

Cassette and Source Code 

for the TRS-80 Color Computer $29.95 

S.E.C.S. 

(Screen Edit Control System) 

SECS adds new power to your TRS-80 Color 
Computer. If you have been waiting for Enhanced 
BASIC and it's capabilities, then you are ready to take 
the next logical step. 

Features: 

FULL SCREEN EDITOR: Full Cursor control with auto repeat, 
Insert, Delete, Join lines, Relocate lines and Audible error warning. 

HI RES GRAPHICS: Two modes of Hi Res graphics, Set point, 
Set line, Set color, Set programmable character, Set screen, and 
Toggle between Low Res and Hi Res/Normal and Inverted 
Screens. 

HI RES CHARACTER GENERATOR: Sixty-four definable charac- 
ters, Save and Load Characters sets to and from tape, Define 
Characters, and Place on screen in any color and in any position. 

The entire system is linked into BASIC and is completely 

transparent to the user. As a BASIC programming tool, SECS is 

unsurpassed. 

Cassette for the TRS-80 Color Computer $29.95 

Software Utilities for the 
TRS-80* Color Computer 

Order through your local software dealer or send check or 
money order plus $2.00 Shipping & Handl'ng to: 




COMPUTER SOFTWARE 
19519 Business Center Drive, Northridge, CA 91324 
(213)701-5161 

"TRS-80 is a resistered trademark of Radio Shack, a division of Tandy Corporation 



Program continued 




1650 A=X*21+29 




1660 B=Y*17+8 




1670 ON F GOSUB 2710,2800 




16 80 NEXT Y 




1690 Y=Y1 




1700 REM***AUTOSEARCH LOWER Y*** 


1710 Y1=Y 




1720 FOR I=Y1+1 TO 11 




1730 M=I-1 




1740 IF P(X,I)=0 THEN N8=N8+1 




1750 IF P(X f I)=0 THEN 1860 




1760 IF P(X,I)=F THEN 1780 




1770 NEXT I 




17 80 IF M=Y1 THEN N8=N8+1 




17 90 IF M=Y1 THEN 1860 




1800 FOR Y=Y1+1 TO M 




1810 P(X,Y)=F 




1820 A=X*21+29 




1830 B=Y*17+8 




1840 ON F GOSUB 2710,2800 




1850 NEXT Y 




1860 Y=Y1 




1870 REM **AUTOSE ARCH NW DIAG*** 


1880 X1=X:Y1=Y 




1890 FOR I=X1-1 TO STEP -1 




1900 M=I+1 




1910 IF P(I,Y1-(X1-I) )=0 THEN 


N8=N8+1 


1920 IF P(I,Y1-(X1-I))=0 THEN 


2030 


1930 IF P(I,Y1-(X1-I))=F THEN 


1950 


1940 NEXT I 




1950 IF M=X1 THEN N8=N8+1 




1960 IF M=X1 THEN 2030 




1970 FOR X=M TO Xl-1 




1980 P(X,Y-(X1-X) )=F 




1990 A=X*21+29 




2000 B=(Y-(Xl-X))*17+8 




2010 ON F GOSUB 2710,2800 




2020 NEXT X 




2030 X=X1:Y=Y1 




2040 REM**AUTOSEARCH SE DIAG*** 


2050 X1=X:Y1=Y 




2060 FOR I=X1+1 TO 11 




2070 M=I-1 




2080 IF P(I,Y1+(I-X1) )=0 THEN 


N8=N8+1 


2090 IF P(I,Y1+(I-X1) )=0 THEN 


2200 


2100 IF P(I,Y1+(I-X1))=F THEN 


2120 


2110 NEXT I 




2120 IF M=X1 THEN N8=N8+1 




2130 IF M=X1 THEN 2200 




2140 FOR X=X1+1 TO M 




2150 P(X,Y+(X-X1) )=F 




2160 A=X*21+29 




2170 B=(Y+(X-X1) )*17+8 




2180 ON F GOSUB 2710,2800 




2190 NEXT X 




2200 X=X1:Y=Y1 




2210 REM**AUTOSEARCH SW DIAG*** 


2220 X1=X:Y1=Y 




2230 FOR I=X1-1 TO STEP -1 




2240 M=I+1 




2250 IF P(I,Y1+(X1-I) )=0 THEN 


N8=N8+1 


2260 IF P(I,Y1+(X1-I) )=0 THEN 


2370 


2270 IF P(I,Y1+(X1-I) )=F THEN 


2290 


2280 NEXT I 




2290 IF M=X1 THEN N8=N8+1 




23 00 IF M=X1 THEN 2370 




2310 FOR X=M TO Xl-1 




2320 P(X,Y+(X1-X) )=F 




2330 A=X*21+29 




2340 B=(Y+(X1-X) )*17+8 




2350 ON F GOSUB 2710,2800 




2360 NEXT X 




2370 X=X1:Y=Y1 




2380 REM* *AUTOSE ARCH NE DIAG*** 


2390 X1=X:Y1=Y 




2400 FOR I=X1+1 TO 11 




2410 M=I-1 




2420 IF P(I,Y1-(I-X1))=0 THEN 


N8=N8+1 


2430 IF P(I,Y1-(I-X1))=0 THEN 


2540 


2440 IF P(I,Y1-(I-X1))=F THEN 


2460 


2450 NEXT I 




2460 IF M=X1 THEN N8=N8+1 




2470 IF M=X1 THEN 2540 




2480 FOR X=X1+1 TO M 




2490 P(X,Y-(X-X1))=F 




2500 A=X*21+29 




2510 B=(Y-(X-X1) )*17+8 






Program continues 
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Program continued 

2520 ON F GOSUB 2710,2800 

2530 NEXT X 

2540 X=X1:Y=Y1 

2550 IF N8=8 GOSUB 2890 

2560 REM**SCORE DISPLAY** 

2570 LINE(0,15)-(39,25) , PRESET, BF 

2580 N1=INT(C1/10) :P$=STR$(2) 

2590 IF N1=0 THEN 2610 

2600 GOSUB 3220 

2610 N1=C1-10*N1:P$=STR$(10) 

2620 GOSUB 3220 

2630 N1=INT(C2/10) :P$=STR$(23) 

2640 IF N1=0 THEN 2660 

2650 GOSUB 3220 

2660 N1=C2-10*N1:P$=STR$(31) 

2670 GOSUB 3220 

26 80 GOTO 660 

26 90 REM**GRAPHICS SUBROUTINES** 
2700 REM***OPEN CIRCLE*** 

2710 LINE(A-8,B-6)-(A+8,B+7) , PRESET, BF 
2720 CIRCLE(A,B) ,7,1 
2730 SOUND 200,1 

27 40 C1=C1+1 
2750 GOSUB 3070 
2760 C2=C2-1 
2770 GOSUB 3110 
27 80 RETURN 

2790 REM***FULL CIRCLE*** 

2800 CIRCLE(A,B) ,7,1 

2810 PAINT(A,B) ,1,1 

2820 SOUND 200,1 

2830 C2=C2+1 

2840 GOSUB 3140 

2850 C1=C1-1 

2860 GOSUB 3170 

2870 RETURN 

2880 REM***SYMBOL DESTRUCT*** 

2890 FOR I =1 TO 12 

2900 A=X*21+29 

2910 B=Y*17+8 

2920 LINE(A-8,B-6)-(A+8,B+7) , PRESET, BF 

2930 SOUND 240+1,1 

2940 LINE(A-6+I/2,B-6+I/2)-(A+6-I/2,B+6-I/2) ,PSET,BF 

2950 NEXT I 

2960 LINE(A-8,B-6)-(A+8,B+7) , PRESET, BF 

2970 P(X,Y)=0 

2980 ON F GOTO 2990,3010 

2990 Cl=Cl-l:GOSUB 3170 

3000 GOTO 3020 

3010 C2=C2-l:GOSUB 3110 

3020 ON W GOTO 3030,3040 

3030 W=2:GOTO 3050 

3040 W=l:GOTO 3050 

3050 RETURN 

3060 REM*****BAR GRAPHS***** 

3070 K1=187-1.6*C1:K2=187-1.6*(C1-1) 

3080 LINE(6,K1)-(15,K2) ,PSET,B 

3090 LINE(7,K2)-(14,K2) , PRESET 

3100 RETURN 

3110 M1=187-1.6*C2:M2=187-1.6*(C2+1) 

3120 LINE(25,M2)-(34,M1) , PRESET, BF 

3130 RETURN 

3140 M1=187-1.6*C2:M2=187-1.6*(C2-1) 

3150 LINE(25,M1)-(34,M2) ,PSET,BF 

3160 RETURN 

3170 K1=187-1.6*C1:K2=187-1.6*(C1+1) 

3180 LINE(6,K1)-(15,K2) , PRESET, B 

3190 LINE(6,K1)-(15,K1) ,PSET 

3200 RETURN 

3210 REM**VIDEO SCOREBOARD*** 

3220 N2=N1+1 

3230 ON N2 GOSUB 3250,3260,3270,3280,3290,3300,3310,3320,3330,3340 

3240 RETURN 

3250 DRAW"BM"+P$+",16;B;D1;E1;R3;F1;D5;G1;L3;H1;U5":RETURN 

3260 DRAW"BM"+P$+",16;B;R2;B;D1;E1;D7;L1;R2":RETURN 

3270 DRAW"BM"+P$+", 16 ;B;Dl; El ;R3;F1;D1;G5;R5": RETURN 

3280 DRAW"BM"+P$+",16;B;D1;E1;R3;F1;D1;G1;L2;R2;F1;D2;G1;L3;H1":RETURN 

3290 DRAW"BM" +P$+", 16 ;D4;R5;L2;U2;D5": RETURN 

3300 DRAW"BM"+P$+", 16 ;N;R5;D3;R4;Fl;D2;Gl;L3; Hi": RETURN 

3310 DRAW"BM"+P$+",16;B;Dl;D3;El;R3;Fl;D2;Gl;L3;Hl;U5;El;R3;Fl":RETURN 

3320 DRAW"BM"+P$+",16;R5;G1;D1;G1;D1;G1;D1;G1":RETURN 

3330 DRAW"BM"+P$+",16;B;R1;R3;F1;D1;G1;L3;G1;D2;F1;R3;E1;U2;H1;L3;H1;U 

1; El": RETURN 

3340 DRAW"BM"+P$+",16;B;D6;F1;R3;E1;U5;H1;L3;G1;D1;F1;R4":RETURN 

3350 RETURN 

3360 END 



The Captain 80 Book of 1 


BASIC 




ADVENTURES 


EIGHTEEN ADVENTURES: 


□ 


Atlantean Odyssey 


D 


Dog Star 


D 


Thunder Road 


□ 


Deadly Dungeon 


D 


Revenge of Balrog 


□ 


The Fortress at Times-End 


□ 


Temple of the Sun 


! □ 


Lost Ship 


D 


Spider Mountain 


D 


Lost Dutchman's Gold 


□ Journey to the Center of the 




Earth 


□ 


King Tut's Tomb 


□ 


Voyage to Atlantis 


□ 


House of Seven Gables 


□ 


Sorcerer's Castle 


□ 


CIA Adventure 


D 


Arctic Adventure 


a 


Adventureland 



All these program listings plus 
an Adventure Generator not 
available from any other 
source! 

$19.95* 

Although all programs are 
written for TRS-80 Model I & 
III, these programs will easily 
convert to any other machine 
using Microsoft* BASIC. 





Send to : 

80 Northwest Publishing 

3838 South Warner St. 

Tacoma, WA 98409 

(206) 475-2219 



Name — 
Address 
City 



State, Zip 

Visa/MC 

Exp. Date 

*Please add $2.05 for 
Shipping and Handling. 

^329 
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HARDWARE 



Back your way from 4K to 16K. 



Color Computer Upgrade 



Brian Murphy 

41 Chestnut Street 

Hopkinton, MA 01748 



Want to add 16K to your Color Comput- 
er? Does the chance to do Radio 
Shack out of 100 bucks appeal to your 
perverse nature too? 

I found out early with my Color Computer 



that the 4K limit was unacceptable. I need- 
ed 16K, if for no other reason, to get the high 
resolution graphics the system offers. Hav- 
ing upgraded a Model I Level II from 4K to 
16K, I suspected that with the same effort I 
could do it to the Color Computer. I was 
wrong. It was easier! 

Tools You Need 

To upgrade the Color Computer you need 



POWER 
CORD 



SCREW 
HOLE 



/ 



\> 



WARRANTY 
LABEL 



^ 



O^ 



SCREW 
HOLE 



Fig. 1. Bottom View of Color Computer 
102 • 80 Microcomputing, March 1982 



three tools: a Phillips screwdriver, a small 
regular screwdriver (or chip puller), and 
needle nose pliers (or sturdy tweezers). You 
also need a new chip set: eight 16K by one- 
bit dynamic RAM memory chips— 4116, 
416, MM5290N or UPD416. These memory 
chips are all the same, just made by dif- 
ferent manufacturers. 

The best price I've seen is $16.00 for eight 
from Hanley Engineering. (By the way, 
some ads offer these kits with TRS-80 
jumpers for an additional charge. Don't 
bother buying the jumpers. They are for the 
Model I and are not necessary for the Color 
Computer.) 

Of course, you can have Radio Shack up- 
grade your Computer, but it will cost you 
$120. What's the advantage of having them 
do it? I don't want to mislead you. Once you 
open your computer, your warranty will be 
voided. (If you have owned a Color Computer 
for more than 90 days, however, it has ex- 
pired in any case.) 

The decision is up to you. If you have con- 
fidence in your ability, proceed. 

After disconnecting any cables (cas- 
sette, video, joystick) from the computer 
and unplugging it, turn the computer upside 
down on a folded towel to protect the case 
from scratches. Using the Phillips, remove 
all the screws holding the case together. 

Point A in Fig. 1 is not a screw hole, and, if 
you probe a screw driver deeply into it, you 
can damage the internal cable. Point B is a 
screw hole covered by the warranty warning 
sticker. That's how Radio Shack knows if 
you've been inside. Holes C and D on my 



If you liked MICROPROOF, then you'll love SON OF MICROPROOF: 



ELECTRIC WEBSTER 



T.M 



The ultimate spelling checker. 



IMPROVED: 

• One-step proofing and correcting. 

• Lists errors to screen or printer. 

• Can display errors in context. 

• Can display dictionary to locate correct spellings. 

• New precise symbolic dictionary will not miss an error. 

• Remarkably compact (50,000 word dictionary will fit on 
one 5 inch disk). 

• Even FASTER than MICROPROOF (formerly the fastest 
available). 

• Simple Grammatical Checking (Optional Feature). 

• Hyphenates automatically (Optional Feature available for 
some Word Processing programs). 



ENTER CORRECT WORD 
HIT <ENT£R> KEY 

@ 



SELECT APPROPRIATE RESPONSF 

CORRECT MISSPELLED WORD: 
LEAVE WORD "AS IS' 
DISPLAY WORD IN CONTEXT 
DISPLAY DICTIONARY: 
ADD WORD TO DICTIONARY 
EXIT: 

WORD: (Your error) 

RESPONSE: 



EASY TO USE: Prepare your text on any Z-80 based micro- 
computer, using any of a number of popular word process- 
ing programs. When you are finished, enter the appropriate 
command, and ELECTRIC WEBSTER proofreads your 
document, displaying misspellings and typos on the screen. 
Then correcting ELECTRIC WEBSTER can display each 
error separately, requesting you to enter the correct 
spelling for each. You are also given the option of displaying 
errors in context or adding words to ELECTRIC WEB- 
STER'S 50,000 word vocabulary. If you do not .know the 
correct spelling you may also ask ELECTRIC WEBSTER to 
look it up for you and display the dictionary. Finally, 
ELECTRIC WEBSTER corrects your document. All in less 
than a minute. 

LOW PRICES: Standard MICROPROOF is available for 
$69.50 (TRS-80). Standard ELECTRIC WEBSTER is avail- 
able for either $89.50 (TRS-80®Model I or III. Applf) or 
$149.50 (CP/M? TRS-80 Model II and all others). The op- 
tional correcting feature can be added at any time for an 
additional $60. Correction feature can be ordered with 
patch to integrate with your word processing software. For 
each patch, optional Grammatical Checking feature, or 
optional Hyphenation feature, add $35. (Integration patch 
not necessary for Wordstar.™) 



SPEED is the single most important factor in a dictionary 
program. All dictionary programs will find your potential 
errors but if the program is too slow, you are not likely to use 
it. ELECTRIC WEBSTER'S speed is outstanding. It can 
proofread a several page letter in 20 seconds. 

ELECTRIC WEBSTER'S FULL 50,000 WORD VOCAB- 
ULARY saves you time and allows you greater confidence 
in the lists of potential errors that ELECTRIC WEBSTER 
identifies. The mini-dictionary programs, with their 10,000 
and 20,000 word vocabularies, have many correctly spelled 
words omitted from their vocabularies. Consequently, they 
identify as potential "errors" many words that are actually 
spelled correctly; five to ten times as many such words as 
does ELECTRIC WEBSTER. So. when you use ELECTRIC 
WEBSTER, you will have far fewer extra words to evaluate, 
a major time savings. There will be less need to look up 
words in order to verify that they are in fact spelled correct- 
ly. The extra 30.000 words in ELECTRIC WEBSTER's 
vocabulary assures you confidence in the error lists that 
Electric Webster generates. 

HERE'S WHAT THE REVIEWERS HAVE TO SAY 
ABOUT MICROPROOF: 

"I have already found that the use of (MICROPROOF) has 
greatly enhanced the quality of my letters and reports. This is a 
very useful product and should be obtained by anyone who' 
uses a word processor." 

Michael Tannenbaum, CPA 

80 Microcomputing, August 1981 

"The summary review of this program? One word — Excellent. * 
I highly recommend it for anyone using a word processor for 
any need — articles, manuals, reports, and even letters of 
substantial length." 

A. A. Wicks - Program Previews 

Computronics, September 198.1 

In a comparative review of proofreading programs (with small- 
er dictionaries), MICROPROOF was found to be considerably 
faster than all the others, when tested against a 400 word 
sample document. 

Phillip Lemmons 

BYTE Magazine, November 1981 

"(MICROPROOF) operates with good speed and efficiency. A 
1500 word document. took 26 seconds to load, process, and 
proof when the program was run on a TRS-8CrModel II under 

cp/m.*®. : 

"Once the program is integrated, it is very friendly and any 
person able to use a word processing program can master it in • 
moments." m,' *»#» 

Frank Derfler 
Info-World, January 1982 







sSee List ol Advertisers on page 402 



See your local microcomputer dealer or write to: 

CORNUCOPIA SOFTWARE 

I '■ - , * • • » •,,, :.; ' , ... ... - ^-45 

Post Office Box 5028, Walnut Creek, California 94596 • (415) 524-8098 
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"// the dog begins moaning 
in the corner. . . don't panic!" 



unit have no screws. 

After the screws are out, turn the com- 
puter upright again, and lift off the top of 
the case. Lay the top aside, and you are 
faced with something that looks roughly 
like Fig. 2. The metal cover on the right side 
of the computer (keyboard toward you) is to 
cut down RFI (radio frequency interference) 
in compliance with FCC regulations. My 
shield had some pieces of shipping tape 
around the edges. If yours does also, 
remove the strips and put them aside. 

Removing the Chips 

Next, using that small screw driver, go 
around the top edge of the metal box, prying 
it up until you can lift it off. Inside the metal 
walls you'll find, something like Fig. 3. 

First, using tweezers or needle nose 
pliers, remove the plastic jumpers located 
at points A and B in Fig. 3, and replace them 
in the 16K position (Fig. 4). The computer 
now thinks it has a 16K memory! Next, 
locate the eight memory chips (Fig. 3). 

Before you remove the chips, notice that 
each has a notch on the end away from you. 
This orientation is important. The printed 
circuit board beneath the chips' sockets is 
marked similarly. Observe this orientation 
when you install your new chips. 

The memory chip sockets are quite tight, 
so exercise caution in order "not to damage 
anything. If you don't have a chip puller, use 
the small screw driver as I did. Work at one 
end of the chip, then the other, gently prying 
it up out of the socket. Take your time and 
go easy. 

As you remove each chip, place it on the 
metal box lid, pins down, to protect it from 
possible static electricity. After all the 
memory chips are removed, carefully insert 
the new 16K memory chips. Handle them by 
the ends to avoid touching the pins and in- 
sert them making sure the marked end 
faces away from the keyboard, toward the 
rear of the computer. Carefully seat the 
chips in the sockets. When all eight are 
finished, you have a 16K computer. 

Can't wait to see if it works, can you? 

Replace the metal lid and tape strips. 
Make sure the keyboard is seated properly 
before replacing the top of the computer. 
You may want to test the system, as I did, 
before you screw the case down. If you have 
a game cartridge, running it will inspire con- 
fidence in your new system. 

Without a cartridge, type in ?MEM. You 
should be rewarded with the response 
14631. That's the total memory now avail- 
able in Basic. (It's not 16385, because the 
system itself uses some space.) If your test 
runs smoothly, congratulations! Just screw 
the computer back together and go on to 
the next article. 

If, however, when you turn on the power, 
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the dog begins moaning in the corner and 
your children are cowering wth their hands 
over their ears, don't panic! Either one or 
more of the new 4116 chips is defective, in 
which case you send them back and re- 
quest new ones, or one or more of the chips 
is not properly in its socket. To check out 
the latter possibility remove the metal lid 
and make sure the 4116s are properly 
oriented and firmly seated. (If you fouled up 
the placement, you probably destroyed the 



chip. Too bad— be more careful next time.) 
The other possibility is a bent pin under 
one of the 4116s. Before you remove the 
chips visually check them. If the inspection 
does not turn up the culprit, remove each 
chip carefully and check for bent pins. If all 
the chips have straight pins, then the prob- 
lem is with the chips themselves. 

Place the original 4K memory chips back 
in the sockets, observing the proper orienta- 
tion; move those two jumpers back to the 
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Fig. 2. Inside the Color Computer 
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Fig. 3. Color Computer Exposed 



4K position and close up the computer. 
Package the 4116s and return them with a 
request for replacement. 

Handling Memory Chips 

Memory chips are manufactured using 
metal oxide semiconductor (MOS) technol- 
ogy. While most new chips are protected 
against damage by static discharge, it is 
still wise to exercise caution when handling 
such devices. Common sense dictates that 
you don't shuffle across a rug in the dead of 
winter before handling MQS devices, or rub 
a cat on your lap while doing the project. 

I like to place the chips on a conducting 
surface (the metal box lid) while working, 
and to touch the lid before taking the chip 
from it. It doesn't hurt to handle the chips 
from the end to avoid contact with the pins. 

One last suggestion: You may find the 
two rows of pins on the chip are too wide- 
ly spaced to fit into the sockets. I sug- 
gest using needle nose pliers to grasp the 
whole row (eight pins) at once, and gently 
twist them toward the center of the chip to 
form a 90 degree angle. Do this to both rows 
of pins.d 



"Common sense dictates that you don't 
shuffle across a rug. . . or rub a cat. . . " 
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Fig. 4. 4K/16K Jumper Orientation Before and After Repositioning 
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TRADEMARKS: 

IRS 80 and TRSDOS/Ra 
LDOSVLogical S>slems 
Kit Ill/Morgan Product-, 



SAVE $600. 00 
TRS-80® 48K Model III 



Shack/Tand\ Corp 




Limited Supply Now Available 
For The Low-Low Price Of $1895. 00 

Includes all the standard basic features of the TRS-80" 
Model III with 48K of RAM and disk expansion Kit III™ 
with two 40 track double density disk drives. 

Also available — TRS-80" Model III same as above with 
two 80 track disk drives for only s 2145. 00 

If You Own A 16K Model III. 

You can easily expand your capabilities with our low 

cost disk expansion Kit III™ 

Completely compatible with TRSDOS™ -and LDOS, ,M the 

Kit III™ single drive assembly includes: One 40 track 
5'/i" double density disk drive, power supply, floppy 
disk control card, mounting hardware, applicable 

"inSucUons. ONLY $599. 00 

Also available — Kit III™ same as above with 
one 80 track disk drive for only »724. 00 

LDOS™ disk operating system , 99. 95 

Printers available . . . call for more information. 



zniL\ 

MORGAN 



Call TOLL FREE (800)851-4614 

In Illinois Call (618) 233-0018 

We accept: Visa. Mastei (. harge. I eililied Checks (Pctsonal checks 
eeks clearance). Mone> Orders, and C O 



thr 



Morgan Products Incorporated 104 Berkshire Drive Belleville. Illinois 62223 



»-» 127 
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GAME 



Learn graphics and have fun with your Color Computer. 



Subchaser! 



John Steiner 

508 Fourth Avenue NW 

Riverside, ND 58078 



The TRS-80 Color Computer 
uses one of the most power- 
ful microprocessors available, 
and its Extended Color Basic is 
excellent for graphics displays. I 
will explain, using Subchase (an 
animated sub hunt game) some 
of the techniques in animating a 
graphics display. 

Color Animation 

Table 1 lists the order of setting 
up the graphics display screen for 
animation. First, select the cor- 
rect mode and reserve pages of 
graphics memory. Most displays 
require four pages of memory, so 
start with a PCLEAR 4 command. 
Five graphics modes are available 



The Key Box 

Extended Color Basic 
Color Computer 



to the Color Computer. PMODEs 
0-4 are the graphics-only modes; 
Table 2 lists their respective 
resolutions. PMODE determines 
the number of available colors so 
consider the colors you desire, as 
well as resolution. 

PMODE 3 gives the most reso- 
lution, and allows a choice of two 
groups of four colors; I usually 
program games in this mode. You 
select the groups of colors with 
the Screen command. SCREEN 
1,X sets the graphics screen, and 
argument X determines the color 
set. For example, PMODE 3,1: 
SCREEN 1,0 allows the colors 
green, yellow, blue and red; while 
SCREEN 1,1 has the colors buff, 
cyan, magenta, and orange avail- 
able. The initial program listing 
might look like Table 3. 1 have set 
the screen to graphics mode 3, 
with medium resolution and col- 
ors green, blue, yellow and red 
available. 

The color statement deter- 
mines foreground and back- 
ground colors. If no Color state- 
ment is used, the computer uses 
the highest and lowest numbers 
available for foreground and 
background colors. See Table 4 
for the color numbers of the 
available colors. 

Once you choose the colors, a 
PCLS command clears the 
screen to the background color. 



Begin by putting the back- 
ground display on the screen. In 
the submarine game the back- 
ground was simple: a deep blue 
ocean and a yellow sky. A con- 
venient technique for drawing 
displays is to use a very high line 
number for an INKEY$ loop: 



1000A$ = INKEY$: IF. 
1010 LIST 



i = ""THEN 1000 



After drawing the display, the 
computer waits at line 1000 until 
you press any key; it then lists 
the program for you to add more 
lines. In the submarine program, 



after I painted the sky, I drew the 
ship and subs. After you place 
the items to be animated on the 
screen, you can store them in an 
array to be moved later. 

There are two options for put- 
ting objects on the screen. You 
can place them at the point 
where you will first see them in 
the program. This is simplest, 
but sometimes the program dic- 
tates that the object not be im- 
mediately visible. To preserve 
its hidden location, draw a title 
screen showing the objects at 
some usual point in the game, 



1 


Clear correct number of pages 


2 


Set correct graphics mode 


3 


Set screen color set 


4. 


Choose foreground and background col- 




ors from color set chosen 


5. 


Draw background and inanimate objects 


6. 


Draw animated objects on screen 


7. 


Store animated objects in arrays 


8. 


If needed, get background array 


9. 


Initialize display 




Table 1 



PMODE # 


Grid Size 


Color Set 





128 by 96 


two color 


1 


128 by 96 


four color 


2 


128 by 192 


two color 


3 


128 by 192 


four color 


4 


256 by 192 

Table 2 


two color 
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Fig. 1. 



and store the arrays during the 
display. I used this technique in 
the Subchase program. The title 
screen also adds a professional 
look to the program; I use it even 
when there is no particular need 
to hide the first screen locations 
of the objects. 

There is another way to hide 
object placement, using the 
SCREEN command. By calling 
the text screen and then drawing 
objects, the computer displays 
an appropriate message while 
drawing and storing the objects. 
A PCLS clears the hidden ob- 
jects, the opening segments are 
drawn, and the game can begin. 
If you plan to use higher speed 
animation techniques, you may 
also store the appropriate back- 



10PCLEAR4: PMODE 3,1 
20 SCREEN 1,0 
30 COLOR 2,3 

Table 3 



ground arrays at this point in the 
program. 

The Color Computer's Get 
command automatically stores 
an array containing the color in- 
formation of the screen location 
specified. The array is double 
dimensioned, and contains the 
colors of each horizontal and 
vertical coordinate specified. 
Fig. 1 illustrates the submarine 
used in the program, it was con- 
structed on the screen with the 
Circle command. The height, 
width option made the circle in- 
to an ellipse. I used the Draw 
command to put in the tower. 
You can place this array any- 
where on the screen to be stored 
by the Get command. For exam- 
ple, if we locate the circle at lo- 
cation 100,100, the center of the 
circle is at those coordinates. To 
determine the size of the array 
use the Line command. Pick the 
approximate coordinates of the 
upper left corner and lower right 

sSee List of Advertisers on page 402 



corner. Use the Line command 
with the B option to put a box 
around the display. Change the 
size of the box until it exactly 
corresponds to the array to be 
stored (see Fig. 1 .) Use these line 
coordinates to store the array. 

Once you have determined 
the size of the object to be 
stored, dimension the array to 
the proper size. The Line state- 
ment in the example above 
would read: LINE(88,95) - 
(112,104),PSET,B. To calculate 
the array size subtract the lower 
horizontal and vertical elements 
from the higher. In this case that 
would be 1 12 minus 88 equals 24 
and 104 minus 95 equals 9. Next 
dimension the array and give it a 
variable name. In the submarine 
program I used S1. DIM S1(24,8) 
works, but for maximum mem- 
ory economy, I used DIM S1 
(23,7): The Color Computer uses 
a zero element in its arrays. 



Color Numbers 



Black 

1 Green 

2 Yellow 

3 Blue 

4 Red 



5 Buff 

6 Cyan 

7 Magenta 

8 Orange 



Table 4 



Dimension each animated pro- 
gram variable. Each element 
uses five bytes, so the number of 
arrays stored is limited by the 
memory available. Unless you 
have the 32K option, array stor- 
age is limited to about 1400 
points. 

You can easily edit the Line 
command into the Get com- 
mand. GET(88,95)-(112,104),S1 
stores array S1 into its location. 
You can also add Graphics op- 
tion G to the end of the state- 
ment. If you use this option, 
suffix the Put command with the 
appropriate graphics statement. 

After you have stored all ob- 



jects to be animated, you can 
animate your title display, or 
clear the screen to execute the 
main program. I elected to ani- 
mate the title display. After the 
title, I restore the text screen to 
display a request for instruc- 
tions and obtain a difficulty level 
choice. The Color Computer 
cannot store graphics and text 
on the same screen; any print or 
input command restores the 
text screen, so use CLS to clear 
the text screen before display- 
ing text. Initialize any variables 
for animation at this time. I use 
H and V corresponding to hor- 
izontal and vertical with the 
graphics screen. I used H and V 
for the ship H1 and V1 for the 
sub moving right and H2 and V2 
for the sub moving left. You can 
update these variables by the 
keyboard, joysticks, or the com- 
puter depending upon what you 
want to do with the objects. In 
Subchase, you move the ship 
using the right joystick, and 
automatic random loops in the 
computer move the two subs. 

In moving the ship, V remains 
at 46 unless the depth charge is 
dropped. V returns to 46 when 



the drop charge routine finishes. 
H is initially set to 0, incre- 
mented when you move the joy- 
stick right, and decremented 
when you move the joystick left. 
A limiter keeps the computer 
from making H less than or 
more than 213. An increase of H 
to larger than 213 results in a 
rather spectacular graphics 
crash on the right side of the 
screen; a value less than re- 
sults in a function call error. I 
placed the same limiters upon 
the subs. 

The Put command puts an ob- 
ject on the screen. Initialize H to 
and V to 100. PUT(H,V) - 
(H + 24,V + 9),S1 places the ar- 
ray at location 0,100. When we 
make H equal 25 there will be 
two subs on the screen. If we 
continue, the screen fills with 
submarines in a hurry, but there's 
an easy way to remove the orig- 
inal sub. 

Look at Fig. 1 again. At the 
rear of the sub, the array con- 
taining the background color 
stores two rows of information. 
If we limit H to increases of two 
or less and do not require it to go 
backward, the background 
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, Guarantee: Our: checks and ac? 
ty t cessortes are: guaranteed to /'. 
t—r-* please you and guaranteed 
compatible with your bank. In fact, if 
you order a special package and : 
aren't satisfiedforany reason, simply 
return ft for a full refund (including 
postage) and you can keep the 
"chedTOook<heckwriter*' program. 

j— Jt Quality: Color co-ordinated irri- 
V printins on tamper-proof paper, 

*- z — 1 Your choice of blue, green, 
grey, or tan color. MlCR bank en- 
coding guaranteed compatible with 
your bank. 

Now CHECK WITH OS.. .Order a 

special package with moneyback 
guarantee todavT Just enclose a voided 
check for encoding information with your 
. . order. Or send today for our free informa- 
f .•Mii*oo»tss somKEKHWt <b«omi-os>o5)o«36 *' oft P a ckage- We guarantee you'll be 

SyNERGETIC SOLUTIONS pteased • Vis ^ astereard orders •***?*: 
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rrT^rProductr Continuous fan-folded 
jVj checks With dual-windowed 
**" J envelopes, checkbook binder 
and software designed especially 
for computer use in the home- You 
can't get continuous checks like 
these anywhere else in the World. 

fTjwSavjngs > Special package — in* 
{" [ eluding software — to get you 
started. 200 checks, 100 enve- 
lopes and bmder— $49 95. 500 
checks, 300 envelopes and binder— 
$74.95. Both with our versatile 
' checkbook-checkwriter' ' program 
that will have you printing your 
cheeks the day you receive them. 



"tail" removes the old image of 
the sub as it moves. The ship re- 
quires foreward and rearward 
movement; therefore, there are 
rows of background color at both 
ends of the ship. This technique 
requires no extra steps, and pro- 
vides maximum use of the avail- 
able screen. The array redraws 
the background automatically. 

This technique is relatively 
slow. The Subchase program 
does not need high speed ani- 
mation, so the technique works 
well. Space games and other 
high speed games would look 
silly using this method, so we 
need a high speed animation 
technique. One way is to use the 
graphics options available. 
Logical operators place the de- 
vice on the new screen location. 
The AND suffix sets the point in 
the array, if the array point and 
the point in the destination lo- 
cation were set. A logical OR 
sets a given array point when 
either the array point or the new 
location point is set. NOT re- 
verses the point state at the lo- 
cation; PSET and PRESET set 
the location to which the array is 
PUT, to the exact contents of 
the stored array (PSET), or to the 
exact opposite of the array's 
contents (PRESET). The PSET 
option in the sub program sets 
the destination rectangle to the 
colors originally set in the orig- 
ination (Get) rectangle. 

Another high speed technique 
is to store a background array. 
You can take this array from any- 
where containing the appropri- 
ate background colors. A back- 
ground array put at the old loca- 
tion completely removes the ob- 
ject previously put there. It is a 
simple matter to place the object 
at the new position. This position 
may even overlap the background 
rectangle. By alternating object 
and background, high speed mo- 
tion is easily attainable. In many 
cases, you may have to slow 
down this action by external 
loops. This is desirable in pro- 
gramming a variable speed loop. 
Sometimes the person using the 
computer needs time to act upon 
the new display information. 

One of the simplest tech- 
niques to slow motion is with a 
joystick. A joystick reading of 
63, could send the computer to a 
subroutine such as 1000 A = 



JOYSTK(O): IF A = 63 THEN 1000 
ELSE RETURN. This subroutine 
stops all action on the screen as 
long as the joystick is held to its 
extreme end. Moving the stick 
slightly achieves the return, 
whereupon the computer could 
go to a loop such as 90 FOR I = 1 
TO A: NEXT I. This loop takes 
the joystick reading and stops 
execution until it quits counting 
the joystick value. When fin- 
ished, the computer updates the 
values and puts the display at 
the new location. It then re- 
enters the JOYSTK loop to up- 
date the value of A. A smaller 
joystick reading means a 
shorter loop time. By multiply- 
ing or dividing (watch for a 
divide by zero error), you can 
achieve almost any speed delay. 
Another technique is to up- 
date the H or V coordinates or 
both in relation to the joystick. 
This does not slow program exe- 
cution as the other method does. 



100 A = JOYSTK(0)+1 REM ADDING 
ONE ELIMINATES DIVIDE BY 
ERROR 

110 H = H + INT(A/8) REM WILL UP- 
DATE H BY UP TO 8 UNITS FROM 
PREVIOUS 



This technique works well when 
more than one person is involved 
and two joysticks are in use. 

Subchase 

Subchase is an adaptation of 
the familiar program. A ship 
tries to drop depth charges on 
unwary submarines below the 
surface of the water. I have up- 
dated it to modern times: the 
submarines have special under- 
water lasers that fire upon the 
ship. The object of the game is 
to sink submarines while sus- 
taining as little damage as pos- 
sible. The submarine's aim is 
not perfect, but they will inflict 
considerable damage on your 
ship before the game is over. 

You lose the game when both 
submarines reach the opposite 
sides of the screen. You cannot 
drop a charge from the extreme 
left of the screen. This gives the 
sub a safe port and avoids a 
function call error, when the 
sunk sub is being cleaned up. 

There are four difficulty lev- 
els; the hardest is almost impos- 
sible, so there is plenty of chal- 
lenge (one is the most difficult, 



SOFTWARE CONCEPTS 

DALLAS, TEXAS 







SPECIAL PURCHASE! 
SPECIAL PRICES! 

All Equipment 100% RADIO SHACK® 

FULL WARRANTY 
NO foreign memory, NO foreign drives 

RETAIL YOUR PRICE 

TRS-80 COMPUTERS® 

Model II 64K w/ built in 8" drive $3899.00 $3220.00 

Model II 64K with 4 8" drives $6249.00 $5249.00 

Model III 48k w/dual 5 l / 4 drives, 

RS232 $2495.00 $2048.00 

Model III 16K Level 3 Basic $999.00 $850.00 

Color Computer 32K $749.00 $600.00 

PRINTERS 

RS Line Printer V $1860.00 $1549.00 

RS Line Printer VI $1 160.00 $1049.00 

RS Line Printer VII $399.00 $330.00 

RS Line Printer VIII '. $799.00 $649.00 

RS Daisy Wheel II .' $1960.00 $1674.00 

RS Plotter/Printer $1460.00 $1299.00 

DISKETTES (Sold in case lots of 100 only!) 

Memorex 5 l A" single density /single sided $195.00 

Verbatim 514" double density/single sided $215.00 

Memorex 8" double density/single sided $260.00 

Verbatim 8" double density /single sided $325.00 

All orders for above items must be prepaid by 
cashiers check or money order. No COD's or 
personal checks. All orders are shipped freight 
collect. Texas residents add 5% sales tax or photo 
copy of tax permit if dealer. PRICES FOR MAIL 
ORDER ONLY! 

Radio Shack & TRS-80 are registered trademarks of the Tandy Corporation. Software 
Concepts is not affilliated with Tandy or Radio Shack. 

SOFTWARE CONCEPTS 

13534 Preston Rd. Suite 142 

Dallas, Texas 75240 

(214) 458-0330 
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SOFTWARE CONCEPTS 

Dallas, Texas 

COMPUTER PRODUCTS FOR HOME & BUSINESS 



SOFTWARE CONCEPTS 



OTHER FINE SOFTWARE 



Who is Software Concepts? We are the originators 
of Special Delivery wordprocessing software for the 
TRS-80. We are now expanding our product line to 
include items used in our daily business operations. 
We consider these to be better than any other 
product we have tried for its price/performance 
ratio. If we sell it - we use it! 



SPECIAL DELIVERY 



"...If you're presently looking for a mailing list 

processor, this represents the current state of the 

art." 

80 MICROCOMPUTING -- 80 REVIEWS - JULY 1980 

SPECIAL DELIVERY is the best mail list processor 
available for the TRS-80, just ask our customers! 
Use Special Delivery to maintain your mailing list 
with fill-in-the-form ease. You create, edit, sort, 
extract, and otherwise manipulate your mailing list 
with the speed and ease of use possible only in 
100% machine language software. Special Delivery 
will merge data from the mail list into a letter 
created by your own text editor (Scripsit, Electric 
Pencil, etc.) to generate a "personalized form 
letter" to any or all names in the list. Print free 
form mailing labels, envelopes, even legal docu- 
ments! Print any character (including escape 
codes) your printer is capable of printing! Boldface 
and underscore is supported for most printers, now 
including the Daisy Wheel II! 

SPECIAL DELIVERY includes: 
MAILEORM: data entry at its best, just fill in the 
form! Sort, extract, page forward and back, insert/ 
delete, more! 

MAILRITE: print letters, etc. created with your 
editor while inserting text from your MAILEORM list. 
SEVERAL printer drivers (EDAS source code as well 
as /cmd files), and letter and list samples to get 
you started. 

XTRA! SPECIAL DELIVERY includes: 
EVERYTHING in regular SPECIAL DELIVERY. 
Enhanced MAILRITE: with the ability to print varia- 
ble text from a "KEY" file (greatly expanding the 
capacity of each record in your list). 
MAILABEL: 1, 2, 3, or 4 across label printer. 
MAILSORT: will sort by any field, a full 40 track 
double density data diskette (over 1500 names) in 
only48K! 

ZIPSORT: sorts on zip only, but will handle over 
4500 names! 

NOTE TO 
REGISTERED OWNERS 

Registered SPECIAL DELIVERY owners can upgrade 
to XTRA! by returning their ORIGINAL disk with 
$74.00 + $2.00 shipping and handling. 

FOR YOUR MODEL I OR III: 
(requires minimum of 32K, single drive) 

SPECIAL DELIVERY $125 

XTRA SPECIAL DELIVERY $199 

FOR YOUR MODEL II: 
(requires TRSDOS version 2.0 & Scripsit 2.0) 
SPECIAL DELIVERY $199 



ALL NEW ELECTRIC PENCIL!!! 

NOW AVAILABLE FOR THE MOD III! While the original 
PENCIL set a standard that other editors have yet 
to achieve, the NEW ELECTRIC PENCIL reaches even 
greater heights with many exciting new features 
that make it the easiest-to-use text editor available 
for the TRS-80 Mod I or III!! 
Electric Pencil version 2 $84.95 

EDAS 

This is the assembler from Misosys which is used 
for all assemblies of Special Delivery. We had real 
headaches until this came along. A must for any 
assembly language programmer. 
EDAS MOD l/MOD III $75.00 

THE DISASSEMBLER 

This is simply the most advanced disassembler we 
have ever seen. Creates EDAS source code, inserts 
user-defined labels, disassemble disk or memory, 
generates ORGS SEQUates. 
THE Disassembler - Mod I, III $89.00 

RETAIL INVENTORY CONTROL SYSTEM 

Maintains Inventory, Tracks Stock Sold, Tracks 
Backorders, Tracks Reorder Items, Prints Purchase 
Orders, Prints Listings by Vendor, & MUCH MORE! 
This is the one we use in our store. 
Retail Inventory - Mod I, III $129.00 

GAMES! 

The computer was not meant to be ALL business! 
We carry a complete stock of Adventure & Arcade 
style games. Each game has been subjected to 
extensive testing by one of our less productive staff 
members. Call for availability and prices. 



LDOS 

Features previously available only on a 
mainframe. Real powerhouse DOS. Good 
support. 

NEWDOS80V2.0 

See above. Fantastic BASIC enhancements. 
The well equipped software developer will 
own both LDOS & NEWDOS but one or the 
other is a must. 

LDOS $159.00 

NEWDOS V2.0 $145.00 



HARDWARE 



DATA SEPARATOR 

The lifesaver. If you have a MOD I with disk drives 
and no data separator you have problems. Order 
from us or someone else but get a data separator. 
Data Separator $27.95 

DOUBLE* 

Another breakthrough. Add double density to your 

MOD I. Includes built in data separator. 

Doubler $165.95 



DISKETTES 

VERBATIM DATALIFE! Reinforced hub, double density. 
Pkgof 10 - 5% inch $25.00 

GREEN SCREENS 

Not much difference between green screens but 
everybody should have one. If you don't buy ours, 
buy theirs. 

MOD l/MOD III $17.95 

MODII/LEEDEX 100 $22.95 

I JG BOOKS 

Disk Mysteries $21.50 

BASIC Faster & Better $28.95 

BASIC Decoded $28.95 

NEC 8000 Computer 

Z80a compatible, 4MHZ, 64K ram, color supported, 
RS-232, 163.8K per disk, parallel interface, 5 
function keys, numeric keypad 

NEC 8000 keyboard unit $1080.00 

Green phosphor monitor $225.00 

Expansion Interface $720.00 

Disk Drives (2) $1080.00 

Parallel Printer Cable $35.00 

EPSON PRINTERS 

Epson has become the standard by which other low- 
cost printers are measured. Highly recommended! 

MX80 $500.00 

MX80 F/T $650.00 

MX70 $299.00 

MX100 $745.00 

Printer Cable $35.00 

TRS80 Bus Board/Cable $100.00 

GRAPHTRAX80 $80.00 

MX-80 Ribbons $14.00 

Print Heads $38.00 

2K Serial Card $145.0 

PRODUCTS WANTED 

If you have a program that is the best there is, 
contact Software Concepts. We are interested in 
publishing all first rate software. 

OTHER PRODUCTS AVAILABLE. 
Call if you don't see what you need. 

Add 3% Shipping & Handling 
Texas Residents add 5% Sales Tax on 

all hardware items. 
Specify whether MOD I, II, or III when ordering. 

(214) 458-0330 

SOFTWARE CONCEPTS 

13534 Preston Rd. Suite 142 

Dallas, Texas 75240 

or 

visit our new retail store at 

116 Preston Valley 

Shopping Center 

Dallas, Texas 

Dealer enquiries invited. " 43 

TRS-80 & Scripsit are Reg. Trademarks of Tandy Corp. 



COMPUTER AIDED INVESTMENT 

Had you ever missed opportunities to purchase stocks at their low 
points, and/or had hesitated to sell and resulted in financial losses? 

One of the secrets for success in the STOCK-MARKET is timing. 

A computed program, STOCKCHART-I", for usage on the TRS-80* 
models I & III, APPLE II*. & ATARI-800" computer systems, will time the 
stocks in your portfolio for BUY & SELL opportunities. The BUY & SELL 
signals are based on a unique price-trend analysis technique developed 
by Micro-Investment Software. It only requires the weekly high, weekly 
low, and the last trading day of the week's close stock prices. With this 
program, you no longer need to guess or listen to rumors for your invest- 
ment decisions. 

Aside from its ability to assist you on deciding when to BUY & SELL, it 
also will generate a price-chart from the High, Low, and Close stock 
prices. The user has the option to select the price-chart to be generated 
onto the video screen or to the line-printer. And many other useful 
features. . . . 



STOCKCHARTI™ — 



Features: 



• generate BUY/SELL signal 

• generate price-chart from 
High. Low, & Close stock prices 

» data entry in newspaper format 
(accept fractions) 

• SPLIT mode for price data readjust- 
ment on stock split 

• EDIT mode for data changes and/or 
corrections 

• STATUS mode display BUY/SELL 
signal for all stocks on file 

• Fully menu driven, user friendly 

• LIST mode for price data 
print out onto video or line 
printer 



Sample Results: 

• Tandy Corp. -5/19/80 to 9/07/81 

3 BUY/SELL signals 
ROI: 163% 

• Hewlett Packard-5/25/80 to 8/30/81 

4 BUY/SELL signals 
ROI: 42% 

• Adv Micro Dev -5/12'80 to 6/22/81 

3 BUY/SELL signals 
ROI 51% 

• Natl Semi -5/25/80 to 6/22/81 

3 BUY/SELL signals 
ROI: 40% 

• Storage Tech -5/18/80 to 6/22/81 

3 BUY/SELL signals 
ROI 111% 
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An Investment Tool 
for the Serious Investors 



System Requirements: 

• cassette version - min. 16K RAM 

• disk version - min. 32K RAM. 1 disk drive 

• printer optional 

To order, see your local computer/software dealers or send check, 
money order, or C.O.D. to: 



mJjl 



Micro-Investment Software 
9621 Bowie Way 
Stockton, CA 95209 



cassette version $79 per copy 

disk version $99 per copy 

TM - STOCKCHART-I is a trademark of Micro-Investment Software 
■trademare of TANDY CORP., APPLE COMPUTER, & ATARI respectively 
ROI - return on investment 

Dealer Inquiries Invited 

Visa and Mastercard welcome. (209) 952-8833 



Program Listing 



5 REM INITIALIZE 

1 CLEARS : PCLEAR4 : PMODE3 , 1 : CLS3 : SCREEN1 , : COLOR2 , 3 : PCLS 

20 DIM S(41,12) ,S1(28,7) ,S2(28,7) :D=0 

25 REM DRAW SHIP 

30 DRAW"C2;BM0,56R255;":PAINT(0,55) ,2,2 

40 CIRCLE(22,54) ,19 ,4 , .25,0, .5 

50 DRAW"C4BM4,54;R32":PAINT(15,55) ,4,4 

60 DRAW"BM4,54;E4R12U2R2D2R4U3R3D3R3F4":PAINT(8,53) ,1,4 

70 GET(0,46)-(42,59) ,S,G 

75 REM DRAW SUB 1 

80 CIRCLE(80,150) ,12,1 , ,25:PAINT( 82,150) ,1,1 

90 DRAW"C1BM82,148;U3R2D3" 

100 GET(64,145)-(92,153) ,S1,G 

105 REM DRAW SUB 2 

110 CIRCLE (175, 130) ,12,1 , .25:PAINT< 175,130) ,1,1 

120 DRAW"BM171,128;U3R2D3" 

130 GET(161,125)-(189,133) ,S2,G 

135 REM SOUND EFFECTS 

140 H$="01;FEFEFGGGEG 

150 LS= n T25504;AF 

155 REM DRAW TITLE 

160 DRAW"S15C2;BM40,160;BDlDFlR3FlD2GlL3HlBU5ElR3Fl;S8;BD6BM+6,-2;D5F2 

R1E2U5D7 

170 DRAW"BM+6,-12;D12U2F2R2E2U3H2L2G2;BD5BM+12,0;BUlFlR4ElBL7U4E2R4Fl; 

BM+6,-6;D12BR6U5H2L2G2BDl 

180 DRAW"BM+12,0;D3F1R2E2D2U7D2H2L1G2D1;BM+10,+2;BD1F1R1E1U1H3U1E1R1F1 

; BM+6 , +2 ; R7H3L2G3D2F2R3E2 

185 REM LASER DISPLAY ROUTINE 

190 FORI=lTO10:LINE(168,126)-(25+I,70) ,PSET 

200 LINE(168,126) -(25+1,70) ,PRESET:PLAYI,$:NEXT 

205 REM MOVE SHIP DISPLAY 

210 FORH=0TO165STEP2:PUT(H,46) -(H+42,59) ,S,PSET:NEXT 

220 H1=161:V1=125:GOSUB470 

230 CLS(3) :PRINT@13,"SUBCHASE";:PRINT@224,"DO YOU WANT INSTRUCTIONS?"; 

240 A$=INKEY$:IFA$=""THEN240 

250 IFA$="N"THEN320 

260 CLS:PRINT"THE OBJECT OF THIS GAME IS TO" : PRINT"DESTROY AS MANY SUB 

MARINES AS" 

270 PRINT"YOU CAN BEFORE THEY DESTROY YOU . " : PRINT"TO MOVE, USE THE RIG 

HT JOYSTICK 

280 PRINT"TO DROP DEPTHCHARGE, PRESS THE" : PRINT"FIRE BUTTON." 

290 PRINT: PRINT" YOU MUST HIT THE SUB BEFORE IT" :PRINT"REACHES THE OPPO 

SITE SIDE. 

300 PRINT: PRINT'THE SUBS WILL BE USING LASERS 

310 PRINT"TO FIRE UPON YOU. 

320 PRINT0448, "CHOOSE DIFFICULTY LEVEL (1 TO 4) " ; : A$=INKEY$ : IFAS<"l"OR 

AS>"4"THEN320 

3 25 REM X= DIFFICULTY LEVEL: D FLAGS DISPLAY ROUTINE FINISHED 

330 X=VAL(A$) :D=1 

335 REM SET UP DISPLAY SCREEN AND ORIGINAL POSITIONS OF BOATS 

340 PMODE3, 1 : SCREEN1, :COLOR2, 3: PCLS :DRAW"C2;BM0 ,56R255; " : PAINT (0,55) , 

2,2:H=0:V=46:H1=RND(10)+10:H2=RND(10)+215:V2=RND(50)+100:V1=RND(50)+10 



345 REM PUT SHIP AT NEW POSITION 

350 PUT(H,V)-(H+42,V+13) ,S,PSET 

355 REM READ AND UPDATE SHIP POSITION 

360 A=JOYSTK(0) 

370 IFA<25THENH=H-1:IFH<0THENH=0 

380 IFA<3THENH=H-1:IFH<0THENH=0 

390 IFA>50THENH=H+1:IFH>210THENH=210 

400 IFA>60THENH=H+1:IFH>210THENH=210 

410 IFH1=227ANDH2=0THEN720'YOU LOSE 

420 IF RND(5)>X THEN GOSUB660 

430 IF RND(5)>X THENGOSUB600 

435 REM SHIP CANNOT DROP CHARGE AT SCREEN LEFT 

440 IFH<28THEN460 

445 REM CHECKS FIRE BUTTON CLOSURE 

450 P=PEEK(65280) :IFP=254 OR P=126THENGOSUB470 

455 REM RESTORE V TO SHIP LOCATION 

460 V=46:GOTO350 

465 REM DROP DEPTH CHARGE 

470 FORV=58TO170 : IFPPOINT(H ,V+4) <>3THENSC=SC+1 :GOTO520 

475 REM ALLOWS SUB MOVE DURING CHARGE DROP 

480 IFRND(5)>X AND D>0THEN GOSUB600 

490 IFRND(5)>X AND D>0THEN GOSUB660 

495 REM CHARGE DROPPING 

500 LINE(H,V)-(H,V+3) ,PSET: LINE (H+l ,V) - (H+l ,V+3) ,PSET 

510 LINE(H,V-1)-(H,V) , PRESET: LINE (H+l ,V-1) - (H+l ,V) ,PRESET:NEXT 

515 REM CHARGE EXPLODES 

520 PLAYHS 

525 REM CHARGE HIT BOTTOM 

530 IF V>165 THEN 590 

535 REM DESTROY SUB 

540 FORI=1TO50:PSET(RND(5) +H,RND ( 8) +V, 4) :NEXT 

545 REM CLEAN UP REMAINS 

550 FORI=-25T028:FORJ=-1T012:PRESET(H+I,V+J) :NEXTJ,I 

555 REM CHECKS TO SEE IF SUB 2 WAS DESTROYED, IF SO SETS NEW SUB 2 POS 

ITION 

560 IFPPOINT(H2+5,V2+5)=3THEN H2=RND(10) +215:V2=RND(50) +100 

565 REM SETS NEW SUB 1 POSITION 

570 IFPPOINT(H2+5,V2+5)=1THENH1=RND(10)+10:V1=RND(50)+100 

580 RETURN 

585 REM REMOVES CHARGE FROM SCREEN AFTER HITTING BOTTOM 

590 FORI=0TO3:FORJ=0TO3: PRESET (H+I,V+J) :NEXTJ, I : RETURN 

595 REM MOVES SUB 1 TO NEW POSITION 

600 H1=H1+1:IFH1>227THENH1=227 

610 PUT(Hl,Vl)-(Hl+28,Vl+8) ,S1,PSET 

615 REM SUB 1 LASER ROUTINE PPOINT CHECKS FOR LASER HIT 

620 S=RND(20):IF RND(5)=3 THEN GOSUB640:IF PPOINT (H+S, 57) =4 THEN HT=HT 

+1 

630 RETURN 

635 REM FIRES LASER-WON'T FIRE IF SHIP TOO FAR LEFT 

640 IFH<10THENRETURN 

650 LINE(Hl+13,Vl-2)-(H+(S-2) ,57) ,PSET:PLAYL$:LINE (Hl+13 ,Vl-2) -(H+(S-2 

) ,57) , PRESET: RETURN 

655 REM POSITION SUB 2 

660 H2=H2-1:IFH2<0THENH2=0 

670 PUT(H2,V2)-(H2+28,V2+8) ,S2,PSET 

675 REM SUB 2 LASER ROUTINE 

680 S=RND(20):IF RND(5)=3 THEN GOSUB 700: IFPPOINT(H+S,57) =4 THEN HT=HT 

+1 

690 RETURN 

Program continues 
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Program continued 



695 

700 
710 
),57 

715 
720 
730 
740 
750 
760 
770 
775 
780 



REM FIRE SUB 2 LASER 

IFHX10THENRETURN 

LINE<H2+13,V2-2)-(H+(S-2) ,57) ,PSET:PLAYLS:LINE(H2+13 ,V2-2) -(H+(S-2 

) ,PRESET: RETURN 

REM END ROUTINE 

CLS3:PRINT@64,"YOU HAVE DESTROYED ";SC;"SUBSI 

IFSC<10THENPRINT"WHOSE NAVY ARE YOU WITH?" :GOTO750 

PRINT'I CONGRATULATE YOU ON YOUR COOL" :PRINT"UNDER FIREI" 

PRINT'THE SUBS HIT YOU ";HT;" TIMES. 

PRINT'PRESS FIRE BUTTON TO PLAY AGAIN I 

FORI=1TO500:P=PEEK(65280) :IFP=126 OR P=254THENSC=0:HT=0 :GOTO340 

REM RESTORE COMPUTER TO POWER UP STATE 

NEXT:CLEAR200:PMODE0,1:PCLEAR4 



four is the easiest). Your ship 
cannot move while the depth 
charge is being dropped, how- 
ever the subs will move. Be sure 
to drop the charge in front of the 
sub you are aiming at. 

The Program Listing is well re- 
marked, and requires little ex- 
planation. Due to the size of the 
arrays stored, delete all remarks 
before running the program. The 
remarks are in line numbers end- 
ing in five. After listing the pro- 
gram there will be nearly 5K of 
memory available. However, 
after running the program and 
storing the graphics arrays, you 
will find only about 500 bytes of 
memory left. The graphics ar- 
rays for the two subs and the 
ship use over 4K of memory. 



To play again push the fire but- 
ton. At the end of each game I re- 
store all conditions (Pclear, 
string memory, and so on) to 
power-up conditions. This en- 
sures all programs initialize to 
the same level. In the Color Com- 
puter, graphics storage and text 
storage can conflict, causing 
loading or running problems. 

I reserved only 5 bytes for 
string storage; if you do not 
modify the program you cannot 
load an eight character program 
name. ■ 

John Steiner, an electronics 
instructor, has had his Color 
Computer since February 1980. 
Other pastimes include amateur 
radio, writing and photography. 



CHECK OUR LOW PRICES ON 



TRS-80* 



COMPUTERS & 



Accessories 
Software 



NEW -NEW TRS-80* "Model-1 6" 

32 Bit Computer. 128K RAM Std. S12K Max. 1 or 2 
Built-in 1.25 MB Disk Drives. Multi-user capability. 
W/1 Drive S4399.00. W/2 Drives $5099.00. Call for 
low prices on other RS equip. 



CORVUS** 

HARD DISK DRIVES 



Call for prices on 5-10-20 MB Hard Disks. We have 
the new CORDOS operating system which 
enables you to add a Hard Disk to TRS-80* Mod II 
with little or no modifications to your software. 
NEWDOS-80 and OASIS operating systems also 
available. Full service for CORVUS** and 
TRS-80V. 

In business 27 years at the same location 

J&cuoUo \Ro/nch.Sno. 



Call Toll Free 800-435-8310 

"Trademark Tandy Corp. 



Route 3, Radio Ranch Airport 
Polo, Illinois 61064 ^140 

In III. Call 815-946-2371 

Trademark Corvus Systems. Inc. 
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It's your choice: 

do it the hard way, or 
get the information you need from 




6&> 



THE B00K 



VOLUME 
l&ll 



VOLUME I 

The most complete book yet 
on the math routines of the 
BASIC ROM, Models I & III. 
Contains a wealth of detail 
about integer, single and dou- 
ble precision formats, advanc- 
ed math, data manipulation, 
and assembly language inter- 
facing, with examples. In- 
cludes commented listing 
(0708H-1607H), plus a highly 
detailed map of the ROM and 
reserved RAM. 



Comprehensive Guide to TRS-80* Assembly Language Routines 

Each Volume Priced At $14.95 Plus $1.50 Shipping/Handling 
VA residents add 4% tax • Foreign: send U.S. funds, add $4 ea. for overseas delivery 

'Trademark of Tandy Corp. 
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INSIDERS SOFTWARE CONSULTANTS, INC. 

P.O. Box 7086, Dept. SUM3 • Alexandria, VA 22307 

Please send THE BOOK: □ Volume I U Volume II 

Name 

Address . 

City State Zip 

Enclosed is D check U M.O. for $ 

Charge to my LJ VISA G MasterCard Bank Code 

Exp. date: Card No 

Signature 



1 



VOLUME II 

Packed full of useful informa- 
tion on the model I input/ 
output routines, with de- 
tailed listings to illustrate the 
commented source code. 
Learn to control and 
manipulate the keyboard, 
video, printer port, and 
cassette port. Essential for 
assembly language program- 
mers, you can write your own 
routines or use the many pro- 
gramming examples included. 



■See List ot Advertisers on page 402 
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GRAPHICS 



Working some of the mystery out of graphics. 



Mirror Imagining 




Bob Boothe 

4651 Browndeer Lane 

Rolling Hills Estates, CA 90274 

Ever since I started plotting surfaces 
(about as long as I have had a comput- 
er) I have wanted to plot a sphere. Because I 
finally created a decent one, now you can 
plot a sphere on your very own video. Un- 
fortunately, video does not have the resolu- 
tion of the designs in this article, all pro- 
duced on an Epson MX-80 printer with the 
Graftrax 80 graphics ROM update. 

The program in Listing 1 plots a sphere 
on the video. Because the monitor distorts 
shapes, it may look a bit more like an 
ellipsoid. 

How the Program Works 

The program uses three-dimensional Carte- 



Bob Boothe, a freshman at the University 
of California at San Diego, is 19 years old 
and majors in Computer Engineering. 



Fig. 1. Sphere. 



The Key Box 



Basic Level II 

Model I 

16K RAM 

TRSDOS 

2 Disk Drives 

Epson MX-80 printer with GRAFTRAX 



100 REM LOW RESOLUTION SPHERE *** VIDEO *** 

130 DEFINTQ,B 

140 K=1/128:T=1/8192:X=1:Y=1:Z=1:Q=1:S=1:A=1:MY=1 

150 DEFINTL:DIML(127) :CLS 

160 F0RZ=-lT01STEPl/23 

180 B=B+1 

190 MY=SQR(1-Z*Z)-T 

200 Y=-MY 

210 X=SQR(1-Y*Y-Z*Z)+T 

220 A=SQR((1+Y*Y/X/X)*(1+Z*Z/X/X)) 

230 S=l/A/10 

240 IFS<KTHENS=K 

250 Y=Y+S 

260 IFY>MYTHENL(64+MY*63)=1:GOTO290 

270 L(64+Y*63)=l 

280 GOTO210 

290 FORQ=0TO127:IFL(Q)=1THENSET(Q,B) 

300 L(Q)=0:NEXT 
310 NEXTZ 
320 GOTO320 

Program Listing 1. Low Resolution Sphere. 
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Software Breakthrough... 

NEW QUIKPRO Progra 
WRITES Programs For You 

in Minutes. 




Review of QUIKPRO 
by Technical Writer 
Wayne Hepburn 

QUIKPRO by ICR FutureSoft is the 
name given a new breakthrough in 
software. It is written for use on TRS- 
80 Model I Disc System, Model II 
and Model III Disc System. 

Until now, whenever you 
wanted a new program, you either 
had to pay good money for each and 
every new application program or, if 
you are capable, spend hours upon 
hours writing your own. Thanks to a 
marvelous new program, those 
choices are obsolete. 

Now you can do it yourself. 
Anytime you want a new program, 
easily and quickly, you can make 
your own. Anybody who can turn a 
computer on and off can do it with 
Quikpro ..it's that easy and fast. 

This important breakthrough 
is the invention of Joseph Tamargo 
of Florida. His brilliant approach to 
program writing allows you, finally, 
to tap the real power of your com- 
puter in new ways. I located Mr. 
Tamargo and interviewed him about 
the Quikpro. He told me "The best 
part of this program is that it gives 
you a separate BASIC program every 
time you use it. You can List each 
program you create from it, look at 
it, and actually see what makes it 
tick." 

What's more, I found out you 
can modify, alter and enhance, even 
copy, programs you create from 
using Quikpro. I believe there is no 
other program even close to Quik- 
pro for flexibility and ease of 
program generation. This flexibility 
may well make Quikpro superior to 
every other Filing, Data Entry 

^See List ol Advertisers on page 402 



or Data Base Management Program. 

The applications are virtually 
unlimited. Anyone who uses a com- 
puter at home, in business, in schools 
or other educational situations will 
find hundreds of applications. 
Teachers, Students, Hobbiests, Small 
and Large Businesses can all find 
great benefits in using Quikpro in 
any of hundreds of applications like 
these examples: 

Using Quikpro you can 
quickly write programs for Financial 
Records, Stocks, Checking Accounts, 
Receiveables, Inventories, Schedules, 
Personal Records, Statistics, Invoices, 
Catalogues, Reference Banks, Ac- 
counting Data of all kinds, and the 
list just goes on and on, almost 
without limit. 

Quikpro cuts program 
development time dramatically. ...to a 
fraction of what it would take the 
old way (the way you do it now). It 
will generate File and Data Entry 
sequences for mainframes to remote 
or host computers. You can create 
and run a demonstraton program in 
a few minutes. 

Unlike novelty programs you 
play with for a while and grow tired 
of, Quikpro is one you will regard 
like a good right arm. Year after year 
you will use it to create all the new 
Filing and/or Data Entry programs 
you will ever need. You never have 
to buy them again. 

Thanks to this invention, the 
power and speed promised by com- 
puters from the beginning have now 
become a reality. Since I had seen 
announcements about a program to 
be imported from a foreign nation, 
one that supposedly writes programs 
like Quikpro but sells for over six 
times as much money, I asked Mr, 
Tamargo for his comments about 

— Advertisement — ^66 



that. What he told me is "Quikpro is 
so good, anyone can use it im- 
mediately. To prove that point and 
the tremendous capacity it gives the 
user, ICR FutureSoft will send 
QUIKPRO directly to users with an 
absolute moneyback guarantee of 
satisfaction. The user can try it out 
on his/her own computer, writing as 
many programs as desired, for 15 
days after delivery, and if not fully 
satisfied can return the materials. The 
offer is good starting February 1981. 
That's how good Quikpro is." 

I couldn't argue with that. 
When the supplier stands behind the 
product with a 100% refund guaran- 
tee, it has to be as good as they say 
or even better, and I believe it is. 

The best news is you don't 
have to wait to get QUIKPRO from 
ICR FutureSoft or a dealer. You can 
get it right now by writing or calling. 
QUIKPRO will be delivered im- 
mediately by mail with instruction 
manual and full documentation on 
the moneyback guarantee basis. To 
get yours, just write on a plain piece 
of paper your name and address, 
specify if you want QUIKPRO for 
TRS-80 Model I, II, or III. Include 
your check or money order for only 
$89.95 or furnish your Visa or 
Mastercard number and expiration 
date to charge. Mail to ICR 

FutureSoft, 2031 Zeta, P.O. Box 1446, 
Orange Park FL 32073. 

If you prefer to call and get 
immediate delivery, you can phone 
24 hours daily to 1-904-269-1918. 
Please have your credit card number 
and computer model information 
ready. Operator is not qualified to 
answer questions about the program. 
Order your QUIKPRO right now. 
Every day you delay is costing you 
time and money. 
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"For a visual demonstration, 

take a piece of paper, ruler or any parallelogram. 



sian coordinates. The Z-axis runs vertically 
down the screen. The Y-axis runs horizontally, 
and the X-axis, projecting out of the screen, 
connects with the tip of your nose. 

Line 160 controls the number of horizon- 
tal lines the design will use. Z starts at one 
end of the design and moves up or down, 
depending on the step. The total number of 
lines in the design equals the total change 
in Z divided by the step. In this case Z goes 
from minus 1 to 1, a distance of 2. The step 
is 1/23, so 2 times 23 equals 46 lines. 

The equation of a sphere is X 2 + Y 2 + Z 2 
= 1. Line 190 finds the maximum value of Y. 
To change this line, let X equal and solve 
the equation for Y. This produces a trace in 
the Y-Z plane. T stands for tiny; a very small 
number is subtracted to keep the computer 
from getting a divide-by-zero error. 

Line 210 is our equation solved for X in 
terms of Y and Z, with a tiny bit added to ap- 
pease the TP.S-80. 



100 
110 
120 
130 
140 
150 

•160 
170 
180 

•190 
200 
210 
220 
230 
240 
250 
260 
27 
280 
290 
300 
310 
320 
330 
340 
35 
)*4 
360 
370 
3 




REM HIGH RESOLUTION SPHERE 

CLEAR2000 

OPEN "O n ,l ," SPHERE/DAT: 1" 

DEFINTQ,B 

K=1/480:T=1/8192:X=1:Y=1:Z=1:Q=1:S=1:A=1:MY=1:B=0 

DEFINTL:DIML(7,4 80) 

F0RZ=-1T01 STEP #288 -3 

PRINT n Z=";Z, 

B=B+1 

MY=SQR(1+Z*Z)-T 

Y=-MY 

X=SQR(1-Y*Y+Z*Z)+T 

A=SQR( (1+Y*Y/X/X) * (1 + Z*Z/X/X) ) 

S=l/A/44 

IFS<KTHENS=K 

Y=Y+S*3 

IFY>MYTHENL(B,240+MY*^40)=1:GOTO290 

L(B f 240+Y*2i0)=l * 

GOTO210 

IFB=7THENGOSUB340 

NEXTZ 

IFB>0THENGOSUB340 

CLOSE1 

END 

FORQ=1TO4 80 t „ lm . „ 

PRINT#l,CHR$(35+L(l,Q)*64+L(2 f Q)*32+L(3,Q)*16+L(4,Q)*8+L(5,Q 

+L(6,Q)*2+L(7,Q)) ; 
F0RB=1T07 : L ( B , Q) =0 : NEXT 
NEXT:B=0 
RETURN 

Program Listing 2. High Resolution Sphere. 
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Fig. 2. Paraboloid. 
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Line 220 computes the relative area of a 
tiny square of viewing surface. Look at the 
big sphere on your video or in Fig. 1. At the 
very center of this design, a plane tangent 
to the sphere is parallel with the page. Pre- 
tend that we draw a square on this plane. 
Take another plane, tangent to the sphere 
at some point other than the center. The 
plane is no longer parallel with the page. 
Again, pretend to draw a square on the im- 
aginary plane. This time it is not actually a 
square, but a rectangle or a parallelogram 
whose projection onto the page is a square. 

For a visual demonstration, take a piece 
of paper, ruler or any thin parallelogram. No 
matter what its dimensions are, if you look 
at it from a certain angle it approximates a 
square. Closing one eye helps. 

If you rotate this plane so that it is 
parallel to the page, you can see the true 
rectangular shape drawn on it and cal- 
culate its area using the standard formula: 
base times height. 

I use calculus to find the base and the 
height. Without deriving this formula, I will 
give you an equation into which you can 
plug two partial derivatives: 



- - V [" (*>']•[' + (M>1 
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FEATURING 
SPECTACULAR 



D. 



V. 



GRAPHICS 
& SOUND 



"THE BEST ARCADE TYPE GAME 
I'VE SEEN . . . GREAT FIRE 
POWER!" 

ROB McCONNELLI. 
ARCADER 

^"NOTHING MATCHES ELIMINATOR 

* FOR SHEER FUN. I CAN'T STOP 

PLAYING!" 



ARCADER 



Your the pilot of The 

Eliminator, a space fighter 

of the Defender Class. It has 

lighting fast response and |s 

armed to the teetltf with 

awesome firepower. 

< 
But you're outnumbered! And 

your attackers are keen. Your 

only options are victory or a 

grave in space. 






LE VERSION BY JOHN ANDERSON 

80 VERSION BY WAYNE WESTMORELAND & TERRY GILMAN 



INTERNATIONAL 

A DIVISION OH SCO I I AUAMS. INC 

J BOX 3435. LONGWOOD FL 32750 

(305) B62-69 1 7 (OUES I IONS) 

ORDER FROM YOUR FAVORITE DEALER 

oi GAL L .1 OLL F N HEE («00) 32/ 7 1 72 (ORDERS ONLY PLEASE) 

SHIPHNGaS* HANDLING AHE EXIHA. HHICES SUBJECT TO CHANGE WITHOUT NOTICE 
WRITEjFOR O.U'R FREE 150 PROGRAM CATALOG 



APPLE 2 - 48K DISK (DOS 3.3 REQ'D.) 
f|t§-80 ■ 16K TAPE MODEL 1 OR 3 
TRS-80 - 32K DISK MODEL 1 OR 3 






042-0134 
010-0134 
012-0134 



$29.95 
$19.95 
$24.95 



1981 • DON DIXON 



"Of other common 

three dimensional shapes, my favorite 

is the paraboloid." 



This equation is used directly in line 220. 
In the case of the sphere, the partial deriva- 
tive of X with respect to Y (holding Z con- 



stant) is Y/X. The partial derivative of X with 
respect to Z (holding Y constant) is Z/X. 
These derivatives are both plugged into the 



10 


REM LOADER FOR SPHERE DATA 




15 


CLEAR2000 




20 


OPEN n I",l f "SPHERE/DAT :l n 




30 


LPRINTCHR$(27) ;CHR$(65) ;CHR$(7) 




40 


E=255:F0RQ=1T083 




50 


LPRINTCHR$(27) ;CHR$(75) ;CHR$(224) 


;CHR$(1) ; 


60 


FORW=1TO4 80 




70 


IFE=255THENLINEINPUT#1 , S$: E=0 




80 


E=E+1:A=ASC(MID$(S$,E,1) ) -35 




90 


IFPEEK(14312) O63THEN90 




100 POKE14312,A 




110 NEXT :LPRINT: NEXT 




120 CLOSE 1 






Program Listing 3. Loader for Sphere Data. 




Fig. 3. The Eye Killer. 
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equation and it's all set. 

Line 230 computes a value to step across 
the Y-axis to plot the next point. The step is 
inversely proportional to the area. 

Line 240 compares the step to a minimum 
value K, which is equal to half a graphics 
block. If the step is too small, it defaults to 
the value of K. The relative surface area at 
the perimeter of the design is theoretically 
infinite; without K the program would start 
like a snail climbing Mount Everest. 

The rest of the program adds the point to 
an array, tests for the end of a line and then 
prints a line when it is finished. When the 
entire design is drawn on the screen, the 
program enters an endless loop instead of 
printing an ugly Ready over the design. 

Other Shapes 

Of other common three dimensional 
shapes, my favorite is the paraboloid (Fig. 
2.) The equation of the paraboloid is: Z = X 2 
+ Y 2 . A hyperboloid of one sheet is given 
by: X 2 + Y 2 -Z 2 = 1. A hyperboloid of two 
sheets is: X 2 - Y 2 - Z 2 = 1. A quadratic 
cone is: X 2 + Y 2 = Z 2 . If you know any other 
interesting equations (such as a torus) I 
would be glad to see them. 

Listing 2 stores seven lines of data in an 
array, compresses the array, and writes it to 
a disk file before going on. 

There are several advantages to saving 
the data on disk. First, you can print when- 
ever you want. Second, once the disk file is 
created, I can quickly read it in and make as 
many copies of the design as I want. It takes 
about half an hour to read the file in, fairly 
reasonable considering that the disk file is 
156 sectors long. Third, a disk file gave me 
the opportunity to write one more program 
to read in ail data and print it on an Epson 
MX-80 printer with the graphics ROM (See 
Program Listing 3). 

Program Listing 4 generates the design 
shown in Fig. 3. 1 call it the Eye Killer; if you 
stare at it for a while you can guess why. 
This fairly common design is made of a 
bunch of fat sine waves. Listing 4, an at- 
tempt at structured programming, would 
look pretty good if line 290 weren't so long. 

The Epson graphics package uses eight- 
wire printing which requires a bit of extra 
work over seven wire designs. The TRS-80 
cannot output certain numbers to the 
printer. If you send a CHR$(0) to the printer 
the ROM will intercept it and pretend 
nothing happened. To get around this I 
directly POKE my data into the printer's 
memory mapped address 14312. Lines 
1000-1020 check the printer status and out- 




Forbidden Planet 

The First Talking Adventure 

This adventure talks through 
the cassette port. You no 
longer need to have a voice 
synthesizer. This adventure 
takes you to a desolate pla- 
net where only your skill and 
your talking computer will 
help you survive. This is Part 
1 of a multipart talking adven- 
ture. Like no other ad ven- 
ture you have ever played. 
The first five people to solve 
Forbidden Planet will get the 
next adventure FREE. 

* Split Screen 

* Machine Language 

* Talks through Cassette Port 

* Supports Lower Case 

* Written by William Demas 

Price $39.95 

48K Disk Model I & III 



Forbidden City 

A Talking Adventure 

This adventure talks through 
the cassette port. This is a 
continuation of Forbidden 
Planet Adventure, but you do 
not have to have or play it to 
play Forbidden City. 

Once you enter, there is no 
turning back. Only with the 
help of yourtalking computer 
will you be able to defeat the 
city's master computer and 
the robot guards. 

• Talks through Cassette Port 
■*■ Three Different Voices 

• Machine Language 



Price $39.95 
48K Disk Model I & III 



See Your Local Dealer 
— Dealers Inquires Invited— 

FANTASTIC 
SOFTWARE 

P.O. Box 27734 ^36 
Las Vegas, Nevada 891 26 

(702)362-1457 






"Noticing the beauty in this simple binary pattern 
I wrote Listing 5 to count forward. . . " 



100 REM EYE KILLER 

110 LPRINTCHR$(27) ;CHR$(65) ;CHR$(8) 

120 DIM C(100) ,D(20) 

130 FOR Q=0TO90STEP20 



140 
150 
160 



190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 



FORW=1TO10 

C(Q+W)=1 
NEXT 
170 NEXT 
180 FOR L=1TO80 
FOR D=0TO7 

X=X+.l 

S(D)=SIN(X)*35+35 
NEXT D 
LPRINT 

A=27:GOSUB1000 
A=75:GOSUB1000 
A=224:GOSUB1000 
A=1:GOSUB1000 
FORQ=1TO20 

D(Q)=C(Q+S(7))+C(Q+S(6))*2+C(Q+S(5))*4+C(Q+S(4))*8+C(Q+S 



(3))*16+C(Q+S(2))*32+C(Q+S(1))*64+C(Q+S{0))*128 



300 NEXT Q 

310 F0RQ=1T024 

320 FORW=1TO20 

330 A=D(W) 

340 GOSUB1000 

350 NEXT W 

360 NEXT Q 

370 NEXT L 

380 END 

1000 IFPEEK(14312) O63THEN1000 

1010 POKE14312,A 

1020 RETURN 



Program Listing 4. Eye Killer. 



100 REM MIRROR 

110 DIM N(255),R(255) 

120 FORQ=0TO255 

125 PRINTQ; 

130 N(Q)=Q 

140 FORW=0TO7 

150 IF Q AND 2[W THEN R(Q) =R(Q) +2 [ (7-W) 

160 NEXT W 

170 NEXT Q 

180 LPRINTCHR$(27) ;CHR$(65) ;CHR$(8) ; 

190 F0RB=1T08 

200 GOSUB2000 

210 FORQ=255TO0STEP-1:A=N(Q) :GOSUB1000:NEXT 

220 FORQ=0TO255:A=N(Q) :GOSUB1000:NEXT 

230 GOSUB2000 

240 FORQ=0TO255:A=N(Q) :GOSUB1000:NEXT 

250 FORQ=255TO0STEP-1:A=N(Q) :GOSUB1000:NEXT 

260 GOSUB2000 

270 FORQ=0TO255:A=R(Q) :GOSUB1000:NEXT 

280 FORQ=255TO0STEP-1:A=R(Q) :G0SUB1 000: NEXT 

290 GOSUB2000 

300 FORQ=255TO0STEP-1:A=R(Q) :GOSUB1000:NEXT 

310 FORQ=0TO255:A=R(Q) :GOSUB1000:NEXT 

320 NEXT B 

330 LPRINT: END 

1000 IFPEEK(14312)O63THEN1000 

1010 POKE14312,A 

1020 RETURN 

2000 LPRINT 

2005 A=27:GOSUB1000 

2010 A=76:GOSUB1000 

2020 A=0:GOSUB1000 

2030 A=2:GOSUB1000 

2040 RETURN 

Program Listing 5. The Mirror. 



put a byte. A USR call might have been 
faster, but I wanted to avoid assembly 
language. 

To convert these programs to another 
printer such as the Base 2 or the Paper 
Tiger, keep in mind that the print wires are 
upside down on the MX-80. In other words, 
wire one is at the bottom and wire eight is at 
the top. 

I will briefly describe converting the Eye 
Killer to work on a Base 2 printer. The Base 2 
uses seven wires, so line 190 should read 
FOR D = 0TO6. Since the Base 2 has wire 1 at 
the top, line 290 should have the subscripts 
7,6,5,4,3,2,1,0 reversed to 0,1,2,3,4,5,6 with 
the last term omitted. The control codes in 
lines 240-270 are changed to 27, 99 (only 
two are needed). But the control codes in 
line 1 10 need to be 27, 49, 27, 98, 14. With a 
little string packing this program could real- 
ly go fast on the Base 2 (seven minutes). On 
the MX-80 it took 23 minutes, slow because 
of my POKEing method. The column align- 
ment is where the MX-80 has its great ad- 
vantage in graphics. 

Program Listing 5 produces Fig. 4, which 
I call the Mirror. I produced this design by 
accident when testing the printer to see 
what codes make it past the ROM. I typed in 
a one-line For...Next loop to output num- 
bers from to 255; it made a pattern just like 
the first half of the second line. Noticing the 
beauty in this simple binary pattern, I wrote 
Listing 5 to count forward, backward and 
upside down. It prints these different pat- 
terns in groups of eight for eight repetitions. 
The entire design only takes twelve minutes 
from start to finish. ■ 
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Fig. 4. The Mirror. 

Reader Service for facing page ^47~ 



NEW HIGHER PRINTING SPEED, 
NEW LOWER PRINTER PRICE 



High-speed printer 

The Heath/Zenith 25 Printer is a heavy-duty, high-speed 
dot matrix printer that gives you sharp, clear printouts. It 
prints crisp, clear copy at speeds over 150 characters per 
second with quiet smoothness. 
Baud rates from 1 10 to 9600 are user-selectable. 

Versatile printer 

The 25 prints the entire 95-character ASCII set in upper 
case and lower case with descenders, in a 9x9 matrix. Also, 
33 block graphic characters - which are compatible with 
the Heath/Zenith 89 All-in-One Computer and the 19 Smart 
Video Terminal - let you create graphs and charts. All func- 
tions and timing are microprocessor-controlled. 
Plug-in ribbon cartridges make ribbon replacement a 
no-mess snap. 

The 25 works with most computers and terminals - 
using an RS-232C Serial Interface or a 20 mA 
current loop with handshaking control signals. 



Low-priced printer 

The 25 has all the features you've been looking for in a high 
quality, high-speed dot matrix printer - for only $1095 in kit 
form, or for only $1595 assembled and tested. 

Free demonstration awaits you at 
your Heathkit Electronic Center t 

Pick the store nearest you from the list below. And stop in 
today for a demonstration of the new Heath/Zenith 25 Printer. 
If you can't get to a store, send $1 .00 for the latest Zenith 
Data Systems Catalog of assembled commercial computers. 
We'll also send you a free copy of the latest Heathkit® 
catalog. Write to Heath Company, Dept. 035-874, Benton 
Harbor, Ml 49022. 



HEATH/ZENITH 



Your strong partner 







*1 50 characters per second 



Visit your Heathkit Electronic Centert 

Where Heath/Zenith Products are displayed, sold and serviced. 



PHOENIX. AZ 

2727 W.Indian School Rd. 

602-279-6247 

ANAHEIM. CA 

330 E. Ball Rd. 

714-776-9420 

CAMPBELL. CA 

2350 S.Bascom Ave. 

408-377-8920 

EL CERRIT0, CA 

6000 Potrero Ave. 

415-236-8870 

LA MESA, CA 

8363 Center Dr. 

714-461-0110 

LOS ANGELES, CA 

2309 S. Flower St. 

213-749-0261 

POMONA, CA 

1555 N. Orange Grove Ave 

714-623-3543 

REDWOOD CITY, CA 

2001 Middled eld Rd. 

415-365-8155 



SACRAMENTO, CA 

1860 Fulton Ave. 
916-486-1575 
WOODLAND HILLS, CA 

22504 Ventura Blvd. 
213-883-0531 

DENVER. CO 

5940 W. 38th Ave. 
303-422-3408 

AV0N.CT 

395 W. Main St. (Rt. 44) 
203-678-0323 

HIALEAH, FL 

4705 W. 16th Ave. 
305-823-2280 
PLANTATION, FL 

7173 W.Broward Blvd. 
305-791-7300 

TAMPA. FL 

4019 W.Hillsborough Ave. 
813-886-2541 



ATLANTA, GA 

5285RoswellRd. 
404-252-4341 

CHICAG0.IL 

3462-66 W.Devon Ave. 

312-583-3920 

DOWNERSGROVE.IL 

224 0gdenAve. 

312-852-1304 

INDIANAPOLIS. IN 

2112 E. 62nd St. 

317-257-4321 

MISSION, KS 

5960 Lamar Ave. 

913-362-4486 

LOUISVILLE, KY 

12401 ShelbyvilleRd. 

502-245-7811 

KENNER.LA 

1900 Veterans Mem. Hwy. 

504-467-6321 



BALTIMORE, MD 

1713E. JoppaRd. 

301-861-4446 

ROCKVILLE, MD 

5542 Nicholson Lane 

301-881-5420 

PEAB00Y.MA 

242AndoverSt.(Rt.114) 

617-531-9330 

WELLESLEY, MA 

165WorcesterAve.(Rt.9) 

617-237-1510 

DETROIT, Ml 

18645 W. Eight Mile Rd. 

313-535-6480 

EAST DETROIT, Ml 

18149 E. Eight Mile Rd. 

313-772-0416 

HOPKINS, MN 

101 Shady Oak Rd. 

612-938-6371 



ST. PAUL, MN 

1645 White Bear Ave. 

612-778-1211 

BRIDGET0N.M0 

3794McKelveyRd. 

314-291-1850 

OMAHA, NE 

9207 Maple St. 
402-391-2071 
ASBURYPARK.NJ 
1013 State Hwy. 35 
201-775-1231 
FAIR LAWN, NJ 
35-07 Broadway (Rt. 4) 
201-791-6935 
AMHERST, NY 
3476 Sheridan Dr. 
716-835-3090 
JERICHO, LI, NY 
15 Jericho Turnpike 
516-334-8181 



ROCHESTER, NY 

937 Jefferson Rd. 

716-424-2560 

N. WHITE PLAINS, NY 

7 Reservoir Rd. 

914-761-7690 

CLEVELAND, OH 

28100 Chagrin Blvd. 

216-292-7553 

COLUMBUS. OH 

2500 Morse Rd. 
614-475-7200 

TOLEDO. OH 

48 S. Byrne Rd. 
419-537-1887 

WO00LAWN, OH 

10133 Springfield Pike 
513-771-8850 

OKLAHOMA CITY, OK 

2727 N.W. Expressway 
405-848-7593 



FRAZER, PA 

630 Lancaster Pk. (Rt. 30) 
215-647-5555 

PHILADELPHIA, PA 

6318 Roosevelt Blvd. 
215-288-0180 
PITTSBURGH, PA 
3482 Wm.Penn Hwy. 
412-824-3564 

WARWICK. Rl 

558 Greenwich Ave. 
401-738-5150 
DALLAS. TX 
2715 Ross Ave. 
214-826-4053 
FORT WORTH, TX 
6825-A Green Oaks Rd. 
817-737-8822 

HOUSTON, TX 

1704 W. Loop N. 
713-869-5263 



tHeathkit is a registered trademark of Heath Company. Heath Company and Veritechnology Electronics Corporation 
are wholly-owned subsidiaries of Zenith Radio Corporation. Heathkit Electronic Centers are operated by Veritechnology Electronics Corporation. 



SAN ANTONIO, TX 

7111 Blanco Rd. 

512-341-8876 

MIDVALE.UT 

58 East 7200 South 

801-566-4626 

ALEXANDRIA. VA 

6201 Richmond Hwy. 

703-765-5515 

VIRGINIA BEACH, VA 

1055 Independence Blvd. 
804-460-6997 

SEATTLE, WA 

505 8th Ave. N. 
206-682-2172 

TUKWILA. WA 

15439 53rd Ave. S. 
206-246-5358 
VANCOUVER, WA 
516S. E.ChaklovDr. #1 
206-254-4441 
MILWAUKEE. Wl 
5215 W. Fond du Lac 
414-873-8250 

CP-208 



UTILITY 



The Key Box 

Disk Basic 
Model I 
32K RAM 
TRSDOS 



This graphics utility will make your screen artful 



Back to the Drawing Board 



Irwin Rappaport 

24 Hemlock Hill Road 

Upper Saddle River, NJ 07458 

Many of you may find pro- 
gramming graphics to be 
among the most tedious, boring 



and frustrating aspects of com- 
puters. You love designing 
those fancy displays and have 
some creative ideas in graphic 
layout, but getting them from 
the drawing board into a pro- 
gram is always a problem. From 



??18 DATA 



DATA 
DATA 



DATA 
DATA 



DATA 
DATA 



DATA 
DATA 



DATA 
DATA 



DATA 
DATA 



DATA 
DATA 



DATA 
DATA 



95 DATA 
188 DATA 



Program Listing 



Program continues 



this time forth, you can design 
your creations directly on the 
screen. Use the keyboard to en- 
ter each masterful stroke, se- 
lected from among the graphic 
blocks and ASCII characters 
available. And then, when you 
are satisfied with your display, 
the computer will create a pro- 
gram segment that will recreate 
the screen graphics on demand. 

Your first reaction to the pro- 
gram listing may be one of con- 
cern that the printer missed your 
issue in a few places. Actually, 
lines 10 through 165 are the data 
lines that will become the basis 
of your graphics program. They 
are blank, waiting for the creat- 
ing program to be run, when 
they will be filled with the ASCII 
codes corresponding to what 
was on the screen. 

Program action begins at line 
1000. From that point to the 
listing's end is the complete rou- 
tine for working on the screen. 
The segment from line 300 to 
line 410 is the routine that will 
create your graphics program. 
Beyond the last blank data line 
at 165, the remaining lines form 
the routine that will turn the 
gathered data into graphics. 

Rules for Entering the Program 

All lines through line 165 must 
be typed exactly as shown. 



• Type line number 10. 

• Type the word data. 

• Type three spaces. 

• Type one comma. 

• Type three spaces. 

• Type another comma. 

• Continue in this manner until 
exactly 56 groups of three 
spaces and 56 commas have 
been typed. 

• Note that after the last com- 
ma there are no spaces. The line 
ends with a comma. 

• Press enter and then type line 
number 15. 

• Do exactly the same for line 
15, except that only eight groups 
of three spaces and eight com- 
mas will be typed. 

• Now repeat the procedure 
right through line 165— a 56- 
unit line followed by an eight- 
unit line. 

As you can see, each two pro- 
gram lines represent 64 charac- 
ters or one complete screen line, 
and there are 16 screen lines. 



Directions for Use 

With the program loaded, us- 
er entry is at line 1000, so run 
1000. A twinkling asterisk will 
appear at position zero (3C00H) 
on your screen. That's the cur- 
sor, which can be moved for- 
ward or backward by pressing 
the right or left arrow keys. To 
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PRICE BREAKTHROUGH 



K 




Super Sale on DISK DRIVES 



CO § w 



Please charge to my Visa MC Name 

Card # Exp. Date 



Address 



Enclosed is a check (or $ 

(Please allow 2 weeks for personal checks. 



City State Zip 



D Model I Drive 12 3 Signature 

□ Model III Drive 2 3 



D 2 Drive Cable D 4 Drive Cable FOB Framingham Mass. residents add 5% sales tax 



SOFTWARE SUPPORT 
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| was $§98^5 • now only $199.95 complete!! | 
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move the cursor more than one 
position at a time, type the re- 
quired number of spaces and 
press the arrow for the direction 
desired. 

As you enter a quantity for a 
move, you will see the numbers 
appearing at the lower right of 
the screen. Any value from one 
to 1023 may be entered. If you 
should overdo it and ask the cur- 
sor to go beyond the screen lim- 
its, it will simply move to the end 
of the screen. That holds for 
both forward and backward 
moves, with the cursor going to 
(Print®) positions 1023 or zero 
respectively. To move exactly 



complished by P and space. The 
spaces may be printed one at a 
time or in a series of up to 255. 
When you have patterned the 
screen with a magnificent 
graphics structure and are 
ready to record it, press the up- 
arrow. Now you will see each 
ASCII value appearing in the 
lower right of the screen show- 
ing you that the characters are 
being programmed into the 
blank data statements at the be- 
ginning of the program. It will 
take a few minutes to work. The 
screen will then be cleared and 
your graphics will roll back ex- 
actly as they were designed. 



"Spaces are always present by default 

since the screen is filled 

with them at the start" 



one line up or down, enter 64 and 
the appropriate arrow or 128 for 
a two line move, and so on. 

To print a keyboard character 
at the cursor position, enter P. 
The cursor will stop twinkling. 
Then enter the character and it 
will appear, with the cursor mov- 
ing over one space. 

To print a graphics character 
block, enter G. Again, the cursor 
will be motionless. Now enter 
the graphic block desired: 

• For graphics characters 129- 
154, press keys A-Z in alpha- 
betical order. 

• For characters 155-188, press 
A-Z with the shift key down. 

• For characters 181-189, press 
numbers 1-9. 

• For character 190 press 0, and 
for character 191 press the colon. 

Should you want to print a se- 
ries of the same character, enter 
the amount you want (just as 
you would to move the cursor), 
enter P or G and then the charac- 
ter. You may print up to 255 re- 
peated characters at one time. If 
you should inadvertently ask for 
more than 255, your request will 
be ignored. 

Spaces are always present by 
default, since the screen is filled 
with them at the start. The 
space bar, however, will cause a 
space to be printed at the cursor 
position, and so deletion is ac- 
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You may now delete all pro- 
gram lines from 300 to the end 
and be left with a program for 
printing your screen format. The 
program may be used as is or 
applied as needed for another 
program. If you have a disk sys- 
tem, the graphics program can 
be renumbered to fit into a host 
program, saved with the A op- 
tion (ASCII), and merged into the 
host. You can, of course, adapt 
the program to feed graphics to 
the screen one line at a time or 
in any other way that suits the 
need. Because of the easy-to- 
see structure of the data state- 
ments, it is relatively simple to 
vary the print to screen method. 

DOS Versus Level II 

Look at the program-creating 
segment (lines 300-410). At line 
310, S is initialized at one less 
than the first screen address, 
and PR is set at 27176 (6A28H). 
The 6A28H address is for disk 
systems, and the user must en- 
ter at the file's question. Level 
II Basic users must substitute 
17133 (42EDH) in place of 27176. 

The program PEEKs the 
screen one location at a time at 
line 340. The value of P is the 
ASCII value of the character 
found but expressed as a binary 
(or hex) number. The value P is 
then printed at screen location 
1015. At line 350, the number dis- 
played at 1015 is PEEKed. digit 

1982 



Program continued 
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140 



145 
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165 DATA 

170 CLS 

180 FOR X»l TO 16 

190 FOR Y=l TO 64:READ A: PRINT CHRS(A) ; :NEXT Y 

200 NEXT X 

210 GOTO 210 

300 REM *** END OF CREATED GRAPHICS PROGRAM ... BEGINNING OF CRE 

ATING PROGRAM **• 

310 S-15359:PR=17133 

320 FOR L-l TO 16 

330 FOR X-l TO 64:S-S+1 

340 P=PEEK(S):PRINT91015,» ■ ; :PRINTQ1015,P; 

350 P1-PEEK(16376> :P2-PEEK(16377) :P3-PEEK<1637 8) 

360 PR-PR+l.-POKE PR,Pl:PR«PR+l:POKE PR,P2:PR»PR*l:POKE PR,P3:PR- 

PR+1 

373 IF X«56 THEM PR-PR+6:ELSE IF X=64 THEN PR-PR+6 

380 NEXT X 

390 NEXT L 

400 CLS 

410 GOTO 10 

1000 REM ••• BEGINNING OF SCREEN WORKING PROGRAM «*• 

1010 CLEAR 3000 

1020 CLS :C»0 

1030 C1S»STRINGS(255,"'") :C2S"STRINGS(255,' ") :C3S-STRINGS(2S5,* 

■):C4$"STRINGS(255,' ') 
1040 PRINTQ0,C1S;C2S;C3S;C4S?:C«C+A1:IF c>1014 THEN C-1014-.ELSE 
IF C<0 THEN C=0 
1050 P«PEEK(15360+C):A1-0 
1060 PRINT0C,***; 

1870 AS-INKEYS :IF AS-" THEN FOR X-l TO 5:NEXT X:POKE 15360+C,P 
:FOR X-l TO 5: NEXT X:GOTO 1060 

1080 A0-ASC(A$):IF A0O48 AND VAL(AS)-0 THEN 1200 
1090 A-VAL(A$):IF Al-0 THEN Al-A:GOTO 1110 
1100 A1-(A1-18)+A 
1110 PRINTQ1015,A1;:GOTO 1070 
1200 REM •*» INSTRUCTION TO BE FOLLOWED ••• 
1218 IF Al-8 THEN Al-1 

1220 IP AO-9 THEN 1300 :ELSE IF A0»8 THEN 1260 :ELSE IF AO-91 TH 
EN 310 

1230 IF Al>255 THEN PRINTQ101S,' \- :A-0:A1-0:GOTO 1040 
1240 IP A0-80 TUEN 1400 :ELSE IF A0-71 THEN 1500 
1250 Al-0:PRINTei020,' ■;:GOTO 1040 
1260 IF C-AK0THEN Al-C 
1270 Al—Al 

1300 PRINTei020,' *j:GOTO 1040 
1400 REM *** PRINT KEYBOARD CHARACTER **» 
1410 AS-INKEYS :IF AS-" THEN 1410 :ELSE A0-ASC(AS) 
1420 IF A0<32 OR A0>90 THEN 1418 
1430 CS-STRINGS(A1,AS) 
1440 G0SU3 1600 :GOTO 1040 

1500 REM *«* PRINT GRAPHICS CHARACTER *** 
1510 AS-INKEYS:IP AS-"* THEN 1510 :ELSE AO-ASC(AS) 
1520 IF A0>64 AND A0<91 THEN A0-A0+64 
1530 IF A0>96 AND A0<123 THEN A0-A0+58 
1540 IF A0>48 AND A0<58 THEN A0-A0+132 
1550 IF A0-48 THEN A0-A0+142 
1560 IF A0-58 THEN A0-A8+133 
1570 IF A0<129 THEN 1510 
1580 CS-STRINGS(A1,CHRS(A0)) 
1590 GOSUB 1600 :GOTO 1048 

1600 REM ■«• MANIPULATE STRINGS FOR SCREEN FORMAT *"* 
1610 IF C>254 THEN 1640 
1620 C0-C:IP CO+AK-255 THEN C0S=C1S:GOSUB 1710 : C1S-C0S: RETURN 

1630 

URN 

1640 

1650 

URN 

1660 

URN 

1670 

1680 

URN 

1690 

URN 

1695 

1700 

1719 



1720 
1730 



C0S-C1S:GOSUB 1720 :C1S-C0S:COS-C2$:GOSUB 1730 :C2S=C0S:RET 

IF O509 THEN 1670 

C0«C-255:IF CO+AK-255 THEN C0S-C2$:GOSUB 1710 :C2S-C0S:RET 

C0S=C2S:GOSUB 1720 :C2S-C0S:C0S-C3S:GOSUB 1730 :C3S-C0S:RET 

IF C>764 THEN 1695 

C0-C-510:IF CO+AK-255 THEN C0S=C3S:GOSUB 1710 :C3S-C0S:RET 

C8S-C3S:GOSUB 1720 :C3S-C0S:COS-C4S:GOSUB 1730 :C4S-C0S:RET 

C0«C-765:IP C0+A1>255 THEN A1-255-C0 
C0-C-765:C0S=C4S:GOSUB 1710 :C4S-C0S: RETURN 
C0S-LEFTS(C0$,C0)+LEFT$(C$,A1)+RIGHT$(C0S,25S-C0-A1):RETURN 

C0$»LEFT$(C0$,C0)+LEFTS(CS,255-C0) .RETURN 
C0S«RIGHTS(CS,Al+C0-255)+RIGHT$(COS,25S-Al-CO+255):RETURN 



Mow there's a revo- 
lutionary new data 

base manager 
and operating system 
with an easy to use 
conversational 
business language. 

This is the first truly 
relational system with 
full conversational 
JOIN capabilities so 
that you can inter- 
actively establish 
hierarchical or net- 
work structures. 

Available on the 
TRS/80 Model II or 
DEC 11/23. Data Ace 
includes its own 
operating system. 

EASY TO USE con- 
versational commands 
to set up Data Relations 
and Fields which may 
be CHANGEd without 
altering application work. 

ENGLISH-LIKE 
LANGUAGE to ADD, 
CHANGE, DELETE, LIST, or 
JOIN relations or data 
on the fly generating 
analytical or exception 
reports immediately. 

AMAZING PER- 
FORMANCE and 
response because of 
the memory resident 
DATA DICTIONARY 
which provides rapid 
access to the Relations 
you want. 

COMPREHENSIVE 
ERROR TRAPPING with 
powerful HELP messages 



m 

The SMART Data Base Management 
System 



you may request accord- 
ing to the context of your 
commands resulting in a 
system which is virtually 
self- teaching. 

FULL TEXT 
PROCESSING EDITOR 
which helps you store, 
write, and change pro- 
grams (written in the 
specially provided Data 
Manipulation Lan- 
guage), helps you store 
or change those COM- 
MANDS you may wish 
to use later or simply 
store and correct text 
for letters or memos. 

USER VIEWS pro- 
vided by PROCEDURE 
with complete control 
at the FIELD level. 



MULTI TERMINAL USE 

supported on DEC 11/23 
with CONCURRENT use of 
records within a database 
and full INTERLOCK 
handling- warm restart with 
TRANSACTION LOGGING, 
control of synchronization 
points and PASSWORDS. 

BRING MAINFRAME 
POWER TO YOUR MICRO- 
PROCESSOR 

This is the first appli- 
cation development tool 
to be provided on 8 bit 
and 16 bit computers with 
a full range of ENGLISH-like 
conversational power 
normally only available 
on large mainframes 
which demand mega- 
bytes of memory. 



THE 

SMART 

DATABASE 

MANAGER 

YES! Show me how smart you are. 

D Send me a FREE copy of the DATA ACE information 
leaflet. 

nSend me the DATA ACE User Manual covering the Rela- 
tional Data Base Manager, the Editor, the conversational 
data retrieval and command facilities and the interac- 
tive data definition language. My check for $75.00 is 
enclosed. Mail to: Aregon Systems, Inc. 1911 Wright Circle 
Anaheim, Ca. 92806, (714) 634-9012 



5 mc 



Name 

Company 
Address _ 

City 

Phone 



Title. 
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COMPUTER INTERFACES 
& PERIPHERALS 



*ANNOUNCING: POS 800/1600 UNIVERSAL TAPE DRIVE CONTROLLER * 
This "black box" controller/formatter is designed as a standalone interface 
between industry standard NRZ1 (800 BPI) and PE (1600 BPI) tape drives and a 
parallel or RS-232 serial port of an 8-bit ASCII computer. Serial interface emulates 
a terminal vis-a-vis your system software; parallel interface emulates a reader/punch 
and responds to CPM-style PIP commands from your computer. Tape speeds 12. S, 
25 and 37.5 ips. Interface is microprocessor-controlled, includes power supply and 
4K or 16K buffer memory. Prices and details available upon request. 

• POS-100 NRZ1 TAPE DRIVE CONTROLLER/FORMATTER - Now your 
micro can read and write IBM/ANSI compatible NRZ1 format 9-track magnetic 

tapes. The POS-100 consists of S-100 bus card, 6' ribbon cable, tape drive controller 
card, cable to Pcrtcc-Standard NRZ1 Tape drive, plus documentation and 2-80 or 
8080 software (specifiy). Power is derived from tape drive and S-100 bus. Ship Wt.: 
10 lbs. Suggested Retail Price $995.00 

• POS DAISY-WHEEL PRINTER INTERFACE for TRS-80 Will drive Diablo 
HyTypC I. HyTypc II. and Qumc and Sprint 3 printers. Includes IK user- 

available memory lor custom print routines (such as graphics, bidirectional print- 
ing, etc.). Programmed to respond to print commands from BASIC ELECTRIC 
PENCILJM and SCRIPSII " M soltware. Draws its power Irom printer. Ship wt.: 

5 lbs. Price $250.00 

Cables, each (Specify HyTvpc I.HyType II, orQume) $ 25.00 

• POS ASCII INTERFACE for IBM I/O SELECTRIC 1 his Centronics-style 
parallel printer interlace will drive an IBM Model 731 or 735 I/O typewriter 

(I- BCD jnd Correspondence codes). No soltware needed. I caturcs on-board EPROM 
which holds up to 8 ASCIItolBM code tables lot dillcrcnt type spheres. Closed- 
loop operation runs ai maximum printer speed; stops and stalls on a single character 
without loss Ol data. Requires H2VDC and 'SVDC power source. Ship wt.: 

5 lbs. Price $249,95 

Power Supply (-5VDC, +I2VOC. *24VOC 'or Solenoid-, ori Primer) . . '. .$ 49.9S 

• CONVERT OFFICE SELECTRIC TO I/O TYPEWRITER Kit includes 
assembled solenoids, switches, wire harness, magnet driver PC'.B plus instructions 

:oi installation and mCPU interlace. Price $150.00 

• "FORMALINER" Variable Width Forms Tractor lor 15" Selcctrics . . . $95.00 

• GTE Model 560 ASCII SELECTRIC I/O Terminal Willi RS-232 Serial Interlace 
and digital Cassette deck loi use as memory typewriter. Ship wt.: 100 lbs. 

Price, tested and adjusted $| 1 95, (JO 

• POS ASCII IBM SELECTRIC PRINTER 15 SclCclfic irom GTE terminal 
cleaned and adjusted with POS Centronics-style ASCII printer interface. UC/LC. 

carbon and fabric ribbons. Compatible with TRS-SQ, Apple, SOL and other CPU 
parallel printer pons. Ship wt.: 75 lbs. Piice . . • $895.00 

PACIFIC OFFICE SYSTEMS -164 

2265 Old Middlefield Way • Mountain View, CA 94043 • (415)493-7455 



by digit. Finally, line 360 POKEs 
each digit into the program loca- 
tions set up by the blank data 
statements. In that way, the bi- 
nary-expressed ASCII is con- 
verted to ASCII-expressed 
ASCII, which is required by Ba- 
sic in data statements. 

In the created program, note 
line 190 reads DATA and prints it 
as a sequence of CHR$s. The 
printing is slow. You can revise 
line 190 as follows: 

DIM AS(16):FOR Y = 1 TO 64:READ 
A:AS(X) = AS(X) + CHRS(A):NEXT Y 

That will fill 16 strings, each 
representing a line on the 
screen. It takes time to initialize 
strings but once they have been, 
they are always available during 
a program run. To print the 
graphics, simply print the com- 
plete set of strings: 

(FOR X = 1 TO 16:PRINT AS(X);:NEXT X) 

print any string in any order. 
Printing previously evaluated 
strings is a faster procedure, as 



you will notice by experimenting 
with both the method in the pro- 
gram listing and this alternate 
one. 

The routine for creating the 
screen graphics is merely a 
string manipulation process. 
Four strings hold all the screen 
information (C1$,C2$,C3$,C4$). 
These strings are cut and past- 
ed as demanded by the user"s 
cursor and printing orders. The 
programming is fairly ordinary 
and can be followed if you have 
some background in manipula- 
tion of string segments. Line 
1600 to the end performs the 
routines to keep track of the 
screen. The user instruction is 
checked to determine the make- 
up of the four C strings, and the 
appropriate strings are evalu- 
ated as needed. At 1500 through 
1590, the graphics ASCII value is 
created by adding the required 
amount to the keyboard ASCII. 

One final point: The last half 
of the last screen line is used as 
a work area, so you have to add 
any data values (ugh!) manual- 
ly.! 
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WHAT DOES 

80 lYIKROCOIYIPUTIMG 

DO FOR YOU? 

| ¥• provides you with more information on your TRS-80* than any other single source 

• gives you 20-30 new programs to use each month 

• reviews equipment and software so you know what or what not to buy 

• gives you the truth about the TRS-80 — its good points and its limitations 
{80 Microcomputing is not affiliated with Tandy) 

• lets you save money — lots of it — by comparison shopping within the ad pages 

• clues you in on how other TRS-80 owners are using and updating their systems 

• lets you in on what is really happening in the industry 

• brings you Wayne Green's outspoken 
and often controversial editorials every 
month 

• and best of all it gives you a no risk 
subscription offer— __ 

Subscribe today— if you are not satisfied with 
the first issue— write "cancel" across your in- 
voice and send it back.The 80 Microcomputing 
is yours to keep. 




Canadian 1 year only/US funds $27.97 Foreign Surface 1 year only/US funds $44.97(Rxeign Air. please inquire.) 

80 Microcomputing • PO Box 981 • Farmingdale, N.Y. 11737 

*TRS-80 is a trademark of Tandy 



80 Microcomputing, March 1982 • 125 



HARDWARE 



Expand your color machine's memory by doing-it-yourself. 



Smarten Up, Color Computer! 



Richard Esposito 
62 Meadow Road 
Frostburg, MD 21532 

Bertram A. Thiel 
159 West Main Street 
Frostburg, MD 21532 

The day I ordered my 16K Level II TRS-80 
Color Computer I also ordered eight 16K 
dynamic RAMs. The additional memory in- 
stallation was amazingly simple. 

Unplug the machine, turn it upside down 
and loosen the five screws holding the case 
together. The fifth screw is under the black 
warranty label. Place a piece of masking 
tape over each hole with the screw still in it, 
so they will not fall out. 

With the computer right-side-up, remove 
the top cover. Unplug the keyboard and put 
it aside to avoid damaging the cable con- 
necting it to the PC board. After clipping 
two plastic cable ties, remove the metal 
shield covering the section of the board that 
contains the Central Processing Unit (CPU), 
Synchronous Address Multiplexer (SAM), 
Peripheral Interface Adapters (PIA's) and 
memory. 

Place all parts on a sheet of aluminum 
foil to avoid static electricity damage. Make 
an electrical contact with the computer 
Radio Frequency (RF) shield and the solder- 
ing iron to ensure that no static electricity 



The Key Box 

Install additional 
16K RAM on a 
16K Level II TRS-80 
Color Computer 



causes a burnout (see Photo 2). Remove the 
RAMs, plug in the God bout memory, and re- 
connect the keyboard and power connec- 
tions to test the chips (leave the shield off 
for this test only). With the top cover off, 
power up, and type ?MEM to receive the 
8487 OK message. 

Checking It Out 

At this point, I loaded and ran a large 
graphics program that uses all available 
memory. It worked fine; my new chips were 
probably all right. 

After removing the Godbout memory 
chips, carefully bend them (except pin 4) in- 
ward a little so they hug the Radio Shack 



memory chips. Bend pin 4 out at a 45 degree 
angle for later attachment. With all the 
memories now outside of the machine 
place the new memory chips piggyback 
over each of the Radio Shack memory chips 
(notched ends together) and solder them in 
place (except for pin 4). After all chips are 
soldered and carefully checked for solder 
bridges and cold solder joints, wire the 
eight pin 4s together in daisy-chain fashion, 
and solder them to ensure connection. 
Leave a wire loop between each one for 
easy installaton. Leave a 10-inch piece of 
wire on the last chip for later attachment to 
the SAM chip. 

Reinsert the modified memory chips into 
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Photo 1. Open TRS-80 Color Computer shows IC layout, original memory chips are re- 
moved, ready for piggyback operation. Aluminum foil prevents static electricity damage. 

Reader Service for facing page .-506— 







1983 

NATIONAL 
COMPUTER 
CONFERENCE 



JUNE 7-10 • ASTROHALL • HOUSTON, TEXAS 



^506 



#v 



^Dia/VCI/VG PROFESSIONALISM 



)) 



Register now for the most prestigious 
computer conference in the world. 

♦ The conference that has progressed in 
quality each year since its inception. 

♦ The conference that continues its dedication 
to Advancing Professionalism — through an 
intensified emphasis on excellence in: 

Plenaries and technical sessions 
Professional Development Seminars 
Sendees to international visitors 
Exhibits of the latest technological advances 



♦ The conference that this year honors the 
developers of FORTRAN, the pioneer computer 
language. 

To pre-register, just clip and mail this coupon. 
You'll save money on full conference registra- 
tion. And you'll avoid time-consuming registra- 
tion lines at the 1982 National Computer 
Conference. 

* The one computer conference you can't 
afford to miss. 



♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦•••♦♦••••••••••••••••••••it*********** **^ 



Yes, I want to pre-register for NCC '82. 
Please send me information. 



Name. 



Title. 



Company- 
Address 




Citv- 



. State. 



Zip. 



Mail to: NCC '82 
AFIPS 
Box 9658 
Arlington, VA 22209 



F S J 

* 

* 
* 

* 
* 
* 

* 



"The graphics program 

could now access 

three times as much memory. 



their sockets, making sure the notches are 
aligned properly (see Photo 2). Cut the 
10-inch wire to the proper length and solder 
it to pin 35 of the SAM chip (the number on 
the chip is 6883). 

The Final Connection 

Reconnect the keyboard, power and 
antenna and turn it on. In answer to the 
memory question the computer will print 
24871, an increase of 16K (16,384) over the 
original 8487. Reassemble the computer, 
making sure to replace the metal RF shield. 

I ran the graphics program as before, but 
now it could access three times as much 
memory. 

I was relieved that my machine contained 
a genuine Motorola 6809E; it was rumored 
that early versions of the TRS-80C had 
stripped-down Tandy chips. Some early 
models of the TRS-80C machines came 
without IC U16, and the 32K modification 
may not work unless this chip is installed. 
My machine, serial number 0000991, had 
the chip; make sure yours can support 32K 
before ordering extra memory. 




Photo 2. 32K memory array installed and wire soldered to pin 35. 

damage, so be 



Remember, you are working with metal- 
oxide type semiconductors (MOS). Static 



electricity can do irreparable < 
careful !■ 
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BUSINESS 
COMPUTING 



TM 



THE NEW PUBLICATION 

FOR SERIOUS SMALL BUSINESS 

COMPUTER USERS 



LEARN HOW TO REALLY USE YOUR COMPUTER 



THE TRUTH ABOUT SOFTWARE 
b NEW COMPUTERS b RELATED PRODUCTS 



PUBLISHED BY -minPUTHQWICSr 



188$ 




m 



Sn 



3W 



m 
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LimUd Otfefc 



TIRED OF GAMES?... Don't understand your computer?. 
Can't understand the difference between RAM and ROM?. 
Are Computer Magazines and Manuals over your head? 



SUBSCRIBE TO 



BUSINESS 
COMPUTING 



Make your computer work for you in your business. ..Choose 
the right computer... Learn the limits of your computer.. The 
truth about Business Software. 



•cqmpljtrqnics; 



50 N. PASCACK ROAD 
SPRING VALLEY. NEW YORK 10977 



••• ADDS12/YEAR "• 
(Canada & Mexico) 

•'• ADD S24/YEAR "* 
(To All Other Countries) 



SUBSCRIBE TO 



BUSINESS 
COMPUTING 



NOW! 



And receive the next 12 Issues at less than half our regu- 
lar subscription price. 

1 YEAR (12 Issues) $48. 00 ($120 - Regular Price) 

2 YEARS (24 Issues) $72. 00 ($240 - Regular Price) 



ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGES- 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY STATE) 

(800) 431-2818 



t« 24 



HOUR 



LINE 



; (914) 425-1535 



THE ORIGINAL MAGAZINE FOR 
OWNERS OF THE TRS-80™* MICROCOMPUTER 



* TRS-80'" IS A TRADEMARK OF TANDY CORP 



SOFTWARE 

FOR TRS-80'" 

OWNERS 



H 



CQMPLITRQNICS 



MONTHLY 

NEWSMAGAZINE 

FOR TRS-80'" 

OWNERS 



MONTHLY NEWSMAGAZINE 

Practical Support For Model I, II, III & Color 



• PRACTICAL APPLICATIONS 

• NEW EXPANDED BUSINESS 
SECTION 

• GAMBLING • GAMES 

• EDUCATION 

• PERSONAL FINANCE 

• BEGINNER'S CORNER 

• NEW PRODUCTS 

• SOFTWARE EXCHANGE 

• MARKET PLACE 

• QUESTIONS AND ANSWERS 

• PROGRAM PRINTOUTS 
AND MORE 

ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE 



NOW IN OUR 5th YEAR 



PROGRAMS AND ARTICLES PUBLISHED IN RECENT ISSUES 
INCLUDE THE FOLLOWING: 

• FINCALC • A COMPLETE FINANCIAL APPLICATIONS PACKAGE 

• INFORMATION SYSTEM REVIEW 

• STATISTICAL COMBINATIONS 

• PASCAL'S TRIANGLE 

• ASSEMBLY LANGUAGE FOR BEGINNERS 

• DISK FILES 

• MOD III REVIEW 

• KEYBOARD THUNDER AND LIGHTING EXPLAINED 

• DOS COMMANDS IN LEVEL II 

• PROBABILITY CURVE GENERATOR 

• CALCULATOR SIMULATIONS 

• THE MEGABYTE GAP 

• STOCKS AND BONDS 

• BUDGET ANALYSIS (FOR BUSINESS AND HOME) 

• NEWDOS 80 REVIEW 

• HUTCHING THE HORSE SYSTEM THAT CAN'T LOSE 

• A SIMULATED GOLF GAME 

• CONTINUOUS FORM SOURCES 

• TAX SAVER REVIEW 
AND MORE 



fttf* 



FINCALC 



A Complete Financial Analysis Package Used 



rtgCft* To Calculate Markup, Margin, Annuities, Compound Interest, Nominal 
S^" o^- And Effective Rates, Sinking Funds, Mortgage Calculations, Future Value, 
*4£^ Savings and Insurance, Percentage Difference Between Two Numbers, 
Amortization Schedule and More 



*s* 



SEND FOR OUR NEW 64 PAGE SOFTWARE CATALOG (INCLUDING LISTINGS OF HUNDREDS OF TRS-80" PROGRAMS AVAILABLE ON 
CASSETTE AND DISKETTE). $2.00 OR FREE WITH EACH SUBSCRIPTIONS OR SAMPLE ISSUE 



All programs are supplied on cassette (add $3 (or Diskette Version - add $5 for modified Mod-II Version). 



•CQMPLITRQNXCSi 

50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

ONE YEAR SUBSCRIPTION $24 '. 1 

TWO YEAR SUBSCRIPTION $48 

SAMPLE OF LATEST ISSUE $ 4 

START MY SUBSCRIPTION WITH ISSUE 

(#1 - July 1978 • a 12 - June 1979 • *24 July 1980 
NEW SUBSCRIPTION RENEWAL 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N.Y. STATE) 

(800) 431-2818 



NEW!!! 

MOD-II NEWSLETTER 

$1 8/year Cor 1Z issues) 



»30 January 1981) 




__ fl HOUR /dBJjjfc 
24 ORDER (VQ, 



LINE 



|IM(914) 425-1535 



CREDIT CARD NUMBER 

SIGNATURE, 

ADDRESS 



EXP. DATE. 



NAME 



_CITY. 



.STATE . 



ZIP 



ADD $12 YEAR (CANADA, MEXICO) - ADD $24 YEAR AIR MAIL - OUTSIDE OF U.S.A., CANADA & MEXICO ** 



^9 
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jm ft m ffc Department of the Treasury — Internal Revenue Service 

I 040 U.S. Individual Income Tax Return 



81 



For Privacy Act Notice, SW MM 3 Of Instructions | For the yeir January 1-December 31, 1979, Of other t«x yeir beginning 



, 1979, ending 



. 19 



Use 
IRS 
label. 
Other- 
wise, 
please 
print 
or type. 



Your first name and initial (if joint return, also give spouse's name and initial) 



Present home address (Number and street, including apartment number, or rural route) 



Your social security number 



Spouse's social security no. 



City, town or post office, State and ZIP code 



Presidential 
Election 
Campaign Fund 



► 



Do you want $1 to go to this fund? 

If joint return, does your spouse want $1 to go to this fund? 



Your occupation 



Spouse's occupation ► 



Yes 
Yes 



No 



Note: Checking "Yes" will 
not increase your tax or 



No reduce your refund. 



IPl 



micromatic TCS-8C* Owners do your own 

PROGRAMMING 
COMPANY 



Taxes Like An Expert With TAX/SAVER™ 



TRS-80 is a tr.nlcni.irk of the Radio Shack Division oi Tandy Corp, 



PCC MODEL I or MODEL III 



J\[C4W 



6)i[iih/ 



•::'3"itic Pror»"»i n l Co | 


I9 I'M H/H 

I 4512 59 


ll Mm etc 11 FICA »'N 

3l5» V 1975 K 




13 FlCe Htw » FlC* ti»i 




rrm 



TAX/SAVER" — The tax help program for the layman, the professional accountant or tax preparer. 

New and expanded. TAX/SAVER'" oilers a different approach to preparing a tax return Like the original, the new version has the tax regulations programmed in so it is more than 

Designed for non-accountants. TAX'SAVER'" asks you questions, jusl as an accountant does. Based on your answers it leads you through the tax maze to your lowest legal tax 

how to fill in your return, line by line, or it will output to a printer 

TAX/SAVER" also has speed features for those doing more than one return Optional program instruction and tax text make TAX/ 

SAVER" the practical system for professional preparers as well TAX SAVER'" has full disk storage of data files (with optional 

password protection). 

The manual includes information on special tax areas, lists of possible deductions and a tax glossary 

TAX/SAVER" compares itemized deductions to national averages; automatically computes certain limitations - for example, on 

medical deductions and contributions: checks for excess FICA: helps determmedependents Yet. TAX SAVER"*offers the privacy 

and convenience of home use 

ays in 



The user-oriented design with special screen formatting makes data entry, verification and correction easy Yet you are a 
control You can skip any help features or parts ol the program that you don't need 

TAX/SAVER" II completes long and short forms including 

• Itemized Deductions - Schedule A 

• Interest & Dividends - Schedule e 

• Tax Calculation - Tables. Rates 

• Tax Saving Methods - Income Averaging. Maximum Tax. Alternative Tax 

• Business Income - Schedules C & SE 

• Capital Gams - Schedule D 

• Allows you the privacy of your own home 

• Lets you help friends and relatives with their taxes 

• Has built-in aids Answers specific questions like Is my father my dependent?' and Are my deductions reasonable'' 

• Tax deductible 

• Manual includes 1981 tax forms, information on special tax areas lists of possible deductions, and glossary of tax terms 

• Completes long and short forms including itemized deductions, excess riCA. earned income credit, community property, 
tax calculation (comparing all possible filing statuses in one runl 

• Tax regulations are programmed in by our team of accountants 
Just type in your figures and you've done your own tax return 

• Helps you find the lowest tax 

• Discount on yearly updates 

• Prints out on standard IRS forms overlays or plain tractor feed paper 



lust a calculator. 
Then it tells you 



7 State M/H I MIMHMHMMIMHHI 

I | Is Will correct 



■-2 «ftSf. t T(V STUNT I 1 H M I H I HH I IMHHH I 



TAX/SAVER'" is like having a personal accountant helping you do your own return 






REVIEWS: 

"...well designed and easy to use' - D Lubar. Creative Comput 
" TAX'SAVER' - may very well live up to its n 
M Tannenbaum CPA 



ame - 

Microcomput 



ng 1/81 
ng 2/81 



FROM OUR CUSTOMERS: 

" ..best tax program for the layman I've seen 
"I would (and have) highly recommended it " 
Bravo 



TAX FORECASTER'", the quick tax estimator (with printout) for both 1981 and 1982 lets you revise its estimate by merely changing one or more lines Use it as a tax planner either together 
TAX SAVER'" or by itself TAX/FORECASTER'" lels you quickly ask all of your WHAT IF? Questions and instantly recalculates your taxes A great tax preparation aid for both the layman and 
fessional 

• Both TAX SAVER'" and TAX FORECASTER'" are tax-deductible • Discounts are given on yearly updates • Free tax newsletter is issued annually 
With the combined package. TAX-SAVER'" and TAXFORECASTER'". you can now have, at an affordable price, the power to predict control and reduce your tax liability 



with 

pro- 



•CQMPJTRQNICS: 



50 N PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

TO ORDER: 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE: OF NY STATE) 

(800) 431-2818 



Please enroll me in free member's service and send: 

□ TAX/SAVER" II @ $119.95 - Manual included. 

□ TAX/FORECASTER" @ $49.95 (with either TAX/SAVER'" $29.95) 

□ Tax Form Overlays @ $19.95 



□ Check D Master Charge D Visa □ American Express 

Card No. 

Name ! 



Please check your model: 

□ TRS-80" Model I, 32K with 2 disk drives 

□ TRS-80' Model III. 32K with 2 disk drives 



HOUR ^^ 
\ 24 ORDER J^ 
LINE 



Exp Date 




(914) 425-1535 



Address 
City 



^State_ 



Zip 



*** ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE* 



* ADD $3.00 FOR SHIPPING IN UPS AREAS 

* ADD S4.00 FOR COD. OR NON-UPS AREAS ^9 

* ADD $5.00 TO CANADA AND MEXICO 

* ADD PROPER POSTAGE OUTSIDE U.S., CANADA & MEXICO 



-See Lisf ol Advertisers on page 402 
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EVERYTHING FOR YOUR TRS-80™ • ATARI'" • APPLE'" • PET'" • CP/M'" • XEROX" • IBM™ • • 

TRS-80 is a trademark of the Radio Shack Division of Tandy Corp. - • ATARI is a trademark of Atari Inc. - • APPLE is a trademark of Apple Corp. - * PET is a trademark of Commodore 
• CP/M is a trademark of Digital Research - "XEROX is a trademark of Xerox Corp. - • IBM is a trademark of IBM Corp. 



BUSINESS PAC 100 




* 30-Day money ° 
Software 



100 Ready-To-Run 
Business Programs 



(ON CASSETTE OR DISKETTE) Includes 128 Page Users Manual 

Inventory Control Payroll Bookkeeping System Stock Calculations. 

Checkbook Maintenance Accounts Receivable Accounts Payable 



BUSINESS 100 PROGRAM LIST 



NAME DESCRIPTION 

1 RCILE78 Interest Apportionment by Rule of the 78s 

2 ANNU1 Annuity computation program 

3 DATE Time between dates 

4 DAYYEAR Day of year a particular date falls on 

5 LEASEINT Interest rate on lease 

6 BREAKEVN Breakeven analysis 

7 DEPRSL Straightline depreciation 

8 DEPRSY Sum of the digits depreciation 

9 DEPRDB Declining balance depreciation 

10 DEPRDDB Double declining balance depreciation 

1 1 TAXDEP Cash flow vs. depreciation tables 

12 CHECK2 Prints NEBS checks along with dairy register 

13 CHECKBK1 Checkbook maintenance program 

14 MORTGAGE/A Mortgage amortization table 

15 MtlLTMON Computes time needed for money to double, triple, 

1 6 SALVAGE Determines salvage value of an investment 

17 RRVARIN Rate of return on investment with variable inflows 

18 RRCONST Rate of return on investment with constant inflows 

1 9 EFFECT Effective interest rate of a loan 

20 FVAL Future value of an investment (compound interest) 

21 FVAL Present value of a future amount 

22 LOANPAY Amount of payment on a loan 

23 REGWTTH Equal withdrawals from investment to leave over 

24 SIMPDISK Simple discount analysis 

25 DATEVAL Equivalent & nonequivalent dated values for oblig. 

26 ANNQDEF Present value of deferred annuities 

27 MARKUP * Markup analysis for items 

28 SINKFUND Sinking fund amortization program 

29 BONDVAL Value of a bond 

30 DEPLETE Depletion analysis 

31 BLACKSH Black Scholes options analysis 

32 STOCVAL1 Expected return on stock via discounts dividends 

33 WARVAL Value of a warrant 

34 BONDVAL2 Value of a bond 

35 EPSEST Estimate of future earnings per share for company 

36 BETAALPH Computes alpha and beta variables for stock 

37 SHARPE1 Portfolio selection model-i.e. what stocks to hold 

38 OPTWRITE Option writing computations 

39 RTVAL Value of a right 

40 EXPVAL Expected value analysis 

41 BAYES Bayesian decisions 

42 VALPRINF Value of perfect information 

43 VALADINF Value of additional information 

44 (JTIUTY Derives utility function 

45 SIMPLEX Linear programming solution by simplex method 

46 TRANS Transportation method for linear programming 

47 EOQ Economic order quantity inventory model 

48 QUEUE! Single server queueing (waiting line) model 

49 CVP Cost-volume-profit analysis 

50 CONDPROF Conditional profit tables 

51 OPTLOSS Opportunity loss tables 

52 FQUOQ Fixed quantity economic order quantity model 

53 FQEOWSH As above but with shortages permitted 

54 FQEOQPB As above but with quantity price breaks 

55 QUEUECB Cost-benefit waiting line analysis 

56 NCFANAL Net cash-flow analysis for simple investment 

57 PROF1ND Profitability index of a project 

58 CAP1 Cap. Asset Pr. Model analysis of project 
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59 WACC Weighted average cost of capital 

60 COMPBAL True rate on loan with compensating bal. required 

6 1 DISCBAL True rate on discounted loan 

62 MERGANAL Merger analysis computations 

63 FINRAT Financial ratios for a firm 

64 NPV Net present value of project 

65 PRINDLAS Laspeyres price index 

66 PRINDPA Paasche price index 

67 SEASIND Constructs seasonal quantity indices for company 

68 T1METR Time series analysis linear trend 

69 T1MEMOV Time series analysis moving average trend 

70 FUPRINF Future price estimation with inflation 

71 MAILPAC Mailing list system 

72 LETWRT Letter writing system-links with MAILPAC 

73 SORT3 Sorts list of names 

74 LABEL1 Shipping label maker 

75 LABEL2 Name label maker 

76 BUSBUD DOME business bookkeeping system 

77 T1MECLCK Computes weeks total hours from timeclock info. 

78 ACCTPAY In memory accounts payable system-storage permitted 

79 INVOICE Generate invoice on screen and print on printer 

80 INVENT2 In memory inventory control system 

81 TELDIR Computerized telephone directory 

82 TIMUSAN Time use analysis 

83 ASSIGN Use of assignment algorithm for optimal job assign. 

84 ACCTREC In memory accounts receivable system-storage ok 

85 TERMSPAY Compares 3 methods of repayment of loans 

86 PAYNET Computes gross pay required for given net 

87 SELLPR Computes selling price for given after tax amount 

88 ARBCOMP Arbitrage computations 

89 DEPRSF Sinking fund depreciation 

90 UPSZONE Finds UPS zones from zip code 

91 ENVELOPE Types envelope including return address 

92 AUTOEXP Automobile expense analysis 

93 INSF1LE Insurance policy file 

94 PAYROLL2 In memory payroll system 

95 DILANAL Dilution analysis 

96 LOANAFFD Loan amount a borrower can afford 

97 RENTPRCH Purchase price for rental property 

98 SALELEAS Sale-leaseback analysis 

99 RRCONVBD Investor's rate of return on convertable bond 
100 PORTVAL9 Stock market portfolio storage-valuation program 



D CASSETTE VERSION 

□ DISKETTE VERSION 

□ TRS-80* MODEL R VERSION 



$99 

$99 

$149 



ADD $3.00 FOR SHIPPING IN UPS AREAS 
ADD $4.00 FOR CO.D. OR NON-GPS AREAS 
ADD $5.00 TO CANADA AND MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U.S., 
CANADA AND MEXICO 

•CQIYIPLITRQMCS. 



^/\AT>-&v^A-rlC-^».- 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



ASK FOR OUR 64-PAGE CATALOG 




*** ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE*" 
l 



!Z 0)43 ^Ts 



^^ HOUR ^^ 
O A ORDER ^ 

\* H LINE 

•\ 91 4) 425-1535 



^9 



Tired Of Your 

GENERAL LEDGER? 




• THE ULTIMATE PERSONAL CHECK REGISTER 

• A PROFESSIONAL ACCOUNTING SYSTEM 

• A PERSONAL FINANCIAL MANAGER 

• A SMALL BUSINESS ACCOUNTING SYSTEM 

• A COMPLETE GENERAL LEDGER 



m • sum 



\MM • m 



H©W IT WORKS 

VERSALEDGER is a complete accounting system that grows as you or your business grows. To 
start, your VERSALEDGER acts as a simple method of keeping track of your checkbook. Just 
enter your check number, date and to whom the check is made out to. As you or your business 
grows, you may add more details to your transactions .... account number, detailed account 
explanations, etc. 



VERSALEDGER 



• VERSALEDGER can give you an instant cash 
balance at anytime. (IF YOU WANT IT TO) 

• VERSALEDGER can be used as a small per- 
sonal checkbook register. (IF YOU WANT IT 
TO) 

• VERSALEDGER can be used to run your 
million dollar corporation. (IF YOU WANT IT 
TO) 

• VERSALEDGER printschecks. (IF YOU WANT 
IT TO) 

• VERSALEDGER stores all check information 
forever. (IF YOU WANT IT TO) 

• VERSALEDGER can handle more than one 
checkbook. (IF YOU WANT IT TO) 

• VERSALEDGER can be used to replace a 
general ledger (IF YOU WANT IT TO) 

• VERSALEDGER HAS AN ALMOST UNLIMITED CAPACITY 

(300 checks per month on single density 5Va" disk drives such as the TRS-80 Model-I) 

(500 checks per month on the Apple II) 

(2400 checks per month on the TRS-80 Model III) 

(6000 checks per month on the TRS-80 Model II) 

(3000 checks per month on single density 8" CP/M) 

• VERSALEDGER will soon have an add-on payroll package. (IF YOU NEED IT) 

— CAN BE USED WITH 1 or MORE DISK DRIVES — 




INTRODUCTORY PRICE 
$99.95 



VERSALEDGER HAS BEEN CREATED 
WITH THE FIRST TIME COMPUTER USER IN MIND 



ICQMPLJTRQNICS 



NAATV^sAAT c 



SO N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



* ADD $3.00 FOR SHIPPING IN UPS AREAS 

* ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 

* ADD $5.00 TO CANADA AND MEXICO 

* ADD PROPER POSTAGE OUTSIDE U.S., CANADA & MEXICO 



*m^\ ~ HOUR 
SI^24 ORDER 
LINE 

(914) 425-1535 




NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 



ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE 



^9 



sSee List of Advertisers on page 402 



80 Microcomputing, March 1982 • 133 



CQMRJTRQNXCS 



N 
C. 



• • EVERYTHING FOR YOUR TRS-80™ MODEL I, II or III • • 
APPLE AND ALL COMPUTERS USING MICROSOFT BASIC 



trademark ol Tandy Corp. 



BUSINESS/80 



presents 



' All orders processed within 24 Hours. 
• 30-Day money back guarantee 
• Add S3 00 for shipping in UPS Areas 
• Add $4 00 for COD or NON-UPS Areas 
• Add $5 00 to Canada or Mexico 
• Add exact postage to all other countries 




Professional 



usiness 
Systems yfe 




• Each Module Can Be Operated Individually Or As A Completely Coordinated System. 

• Turn-Key Error Catching Operation For Beginners. 

• Each Module Is Accompanied By More Than 100 Pages Of Step-By-Step Documentation. 

• Manuals Available Separately. ($50 each) • Complete Sample Report Listings ($10) 

$195 (Model I Or Model III TRSDOS Version) 

$250 Apple Version (From Peachtree Requires CP/M) 

$295 (Model II TRSDOS Version) 

$495 (Model II Peachtree CP/M Version) 

BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 * BUSINESS/80 



GENERAL LEDGER 

Processes 

* Flexible design allows system to be easily adapted to both small business- 
es and also to firms performing client writeup services 

* Add. change or delete records within the Chart of Accounts (Master) File. 

* List the Chart of Accounts File 

* Key in transactions into the Transactions (Journal Entries) File 

* List the Transactions File 

* If other Peachtree Software packages are present, pass summary trans- 
actions from these packages to the General Ledger at the end of the 
accounting period 

* At the end of an accounting period, print out the mapr reports 

(1) Trial Balance (Detail Report) 

(2) Transaction Registers 

(3) Balance Sheet 

(4) Prior Year Comparative Balance Sheet 

(5) Income Statement 

(6) Prior Year Comparative Income Statement 

(7) Department Income Statements 



File Information 

There are two main computer files maintained within the General Ledger 
System 

(1) The of Accounts File 

Account Number 

Description 

Account Type 

Balance Sheet Column Code 

Current Amount 

Year-To-Date Amount 

Budget Amount 

Prior Year Monthly Amounts 

(2) The Transactions File 

Account Number 

Description 

Source Code 

Reference 

Date 

Amount 



ACCOUNTS RECEIVABLE 

Processes 

* Add. change or delete records within the Customer File. 

* List the entire Customer File, or any Customer within the File 

* Enter invoices, payments, credits and ad|ustments 

* Prepare invoices and statements 

* Produce the following reports: 

(1) Aged Accounts Receivable 

(2) Invoice Register 

(3) Payment. Credit and Adjustment Register 

(4) Customer Account Status Report 

* At the end of a month, post the following items to the General Ledger 

(1) Invoiced Sales 

(2) Freight Charges 

(3) Sales Tax 

(4) Service Charge Income 

(5) Cash Payments 

(6) Discounts Allowed 

(7) Returns-'Credits 

(8) Income Adjustments 

(9) Accounts Receivable 

File Information 

Tnere are three mam computer files maintained within the Accounts Receiva- 
ble System, tne Customer File, the Invoice File, and the Transaction File 
CUSTOMER FILE 

Customer Account Number 

Customer Name 

Address 

Phone 

Type of Account 

Credit Terms 

Credit Limit 

Tax Rate 

Discount Rate 

Date of Last Credit 

Date of Last Debit 

Amount of Last Credit 

Amount of Last Debit 

Current Balance 

High Balance 

Year-To-Date Sales 

Year-To-Date Payments 

Automatic Billing Amount 



INVOICE FILE 

Invoice Number 
Invoice Date 
Invoice Amount 
Credit Terms 

TRANSACTION FILE 
Transaction Type 
Transaction Date 
Transaction Amount 
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ACCOUNTS PAYABLE 

Processes 

* Add, change or delete records within the Vendor File. 

* List the Vendor File. 

* Enter vouchers. 

* Automatically determine which vouchers to pay. 

* Print checks and a Check Register. 

* Produce the following reports: 

(1) Open Voucher Report. 

(2) Accounts Payable Ageing Report. 

(3) Cash Requirements. 

* At the end of a month, prepare the General Ledger Transfer File, passing 
the following information for each debit or credit transaction: 

(1) Account Number 

(2) Description 

(3) Source Code 

(4) Date 

(5) Amount 

File Information 

There are two main computer files maintained within the Accounts Payable 
System, the Vendor File and the Voucher File. 
VENDOR FILE 

Vendor Code 

Vendor Name 

Address 

Phone 

Year-To-Date Purchases 

Year-To-Date Payments 

Current Balance 

Last Payment 

Date of Last Payment 

Monthly Entry Flag 

Due Date of Month 

Debit Account Number 

Amount (Debit) 

Month Last Paid 
This file may also contain information to enable generation of automatic 
vouchers for those items such as rent or bank payments that are paid every month. 

VOUCHER FILE 

Voucher Code 
Voucher Date 
Amount Due 
Date Due 
Discount Percent 
Discount Amount 

Discount Date _ 

Invoice Number 
Invoice Date 
Status 
Plus up to six account number-amount fields for General Ledger account 
numbers to which the amount due is to be distributed. 



PAYROLL 

Processes 

* Add, change or delete records within the Employee File. 

* List the Employee File. 

* Modify the Tax Information Files. 

* At the end of a pay period - 

(1) Calculate Pay 

(2) Print Checks 

(3) Print Payroll Register 

* At the end of a month - 

(1) Print the monthly summary 

(2) Print the Unemployment Tax Report 

(3) Prepare the General Ledger Transfer File, passing the following 
information: 

Net Pay (Cash) 

Employee FICA Withheld 

Federal Tax Withheld 

Insurance Deductions 

Miscellaneous Dedutions 

State Tax Withheld 

Local Tax Withheld 
The gross pay for up to twenty payroll departments may also be 
passed to the General Ledger. 

* At the end of a quarter, print the 941A report information. 

* At the end of a year, print the W-2 forms. 

File Information 

There are two main computer files maintained within the Payroll System, the 
Employee Master File and the Tax File. 
EMPLOYEE MASTER FILE 
Name 
Address 
Local Code 
State Code 
Marital Status 
Exemptions, Federal 
Exemptions, State 
Social Security Number 
Pay Period 
Pay Type 
Pay Rate 

Insurance Deduction 
Miscellaneous Deduction 
Date Employed 
Date Terminated 
Last Check Information 



Payroll (con't) 

And current, month-to-date, quarter-to-date and year-to-date totals for: 
Regular Earnings 
Overtime Hours/Earnings 
Other Hours Rate/Earnings 
Commission Earnings 
Miscellaneous Income 
FICA Deductions 
Federal Deductions . 
State Deductions 
Local Deductions 
Insurance Deductions 
Miscellaneous Deductions 

TAX FILE 

(for single and married persons) 

Federal Tax Information Tables 

State Tax Information Tables 

Local Withholding Tax Information Tables 



An Overview of the Inventory System 

Inventory is probably the most speculative of all of a company's assets. A true 
measure of the effectiveness of management is the ability with which it supervises 
the inventory control function. 

The Peachtree Software'" Inventory Management System is designed to (1) 
give you better merchandise control, (2) allow you to lower your dollar investment 
in inventory, and (3) improve customer service and response. 

The System maintains detailed information on each inventory item including 
the part number, description, unit of measure, vendor and reorder data, item 
activity, and complete information on current item costs, pricing, and sales. 
Transactions effecting inventory (sales, receipts, adjustments) may be applied at 
any time to insure the inventory data is always up to date and accurate. 

As with all Peachtree products, the system is interactive, simple to operate, 
and provides reports that are up to date and comprehensive. 

Particular features of the Peachtree Software'" Inventory Management 
System include: 

• Interactive, menu-driven programs 

• Self-instructing user documentation 

• Long item number - up to 15 characters 

• Departmentalizing of items 

• Multiple pricing levels 

• Processes items on reserve (committed but still in stock) 

• Online item query at any time 

• Comprehensive management reporting 

• Automatic month end file backup 

• Recovery routines for hardware failures 

• Sample data for demonstration and training 

How the System is Designed 

The Inventory Management System operates with an Inventory Master File 
which allows for the creation of each inventory item and for the recording of 
transactions (sales, receipts, returns, reserves, and adjustments) to each inven- 
tory item 

The Inventory Master File contains the item number, description and various 
other data on item costs, prices, reorder levels, vendor refereence, and activity.The 
items within the Master File are entered, changed, deleted, and queried through 
the Inventory Master File Maintenance program. All data on all items may be listed 
by using the Detail Inventory Report program 

Transactions may be applied at any time to the Master File through the Enter 
Inventory Transactions program. An Update Report automatically prints during 
this entry process to provide an audit trail of all inventory acitivity. 

Several reports are available for the maintaining of stock, analysis, and fore- 
casting. These reports include the Physical Inventory Worksheet, Inventory Price 
List, Departmental Summary Report, Inventory Status Report, the Reorder Report 
and the Period-to-Date and Year-to-Date reports. 

At the end of an accounting period (usually a month), and then again at the 
end of a year, the End of Period Processing program is run to update current 
balances and clear previous balances. 
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LINE 



(914) 425-1535 
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(OUTSIDE OF NY. STATE) 

(800) 431-2818 
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FOR THE TRS-80 MODEL I AND MODEL HI 




System Diagnostic 



nen t OfJtetH-^* 2 — For Cassette or Disk 



IS YOUR COMPUTER WORKING? 



**w* ac? ARE YOU SURE? 

^■■■jj *r zlt ROM: chefksum !est 

^^m^^m% *^ RAM: four separate tests including every address and data value. 

*" ™ vawn nicpi a v. character generator, video RAM, and video signal. 

every key contact tested, 
character test, 
read/write/verify data. 

connector fault, data transmission, framing, data loop, baud rate generator, 
disk controller, drive select and restore, track seek and verify data, read/write/verify all tracks and 
sectors with or without erasing, sector formatting, disk drive timer, disk head cleaner. 

— Individual tests of each device with operator monitoring and intervention. 

— Continuous sysem tests run continually for hours testing each component, with diagnostic reports optionally written on line printer. 

— One program adapts to any system configuration and hardware. 

— Complete instructions and documentation. 



ROM: 

RAM: 

VIDEO DISPLAY: 

KEYBOARD: 

LINE PRINTER: 

CASSETTE RECORDER: 

RS-232-C INTERFACE: 

DISK DRIVES: 



MON-3 and MON-4 

The TRS-80 Monitor Programs #3 and #4 are powerful utility programs 
enabling you to interact directly with the TRS-80 in Machine Language. 
They are as useful for beginners as for advanced programmers. 

• BEGINNERS can learn to interact directly with the computer in 
Machine Language. 

• 40-PAGE MANUAL provided with each program. 

• SIMPLE commands, easy to use. 

The Features Of The Monitor Pro g rams Enable You To The Followin g 

• DISPLAY memory in different ways. 

• DISASSEMBLE memory to see Machine Language commands. 

• MOVE and COMPARE memory areas. 

• SEARCH through memory to find specific values. 

• MODIFY memory in various ways. 

• RELOCATE object programs. 

• PRINT output on video display or line printer. 

• READ and WRITE object tapes in SYSTEM Format. 

• UNLOAD programs using low RAM on disk. 

• SAVE and READ disk files (MON-4 Only). 

• INPUT and OUTPUT of disk sectors (MON-4 Only). 

• SEND and RECEIVE data over RS-232-C Interface (MON-4 Only). 

• Create SYMBOLIC Tapes (MON-3) or Files (MON-4) of Disassem- 
bled output for Editor/Assembler program. 

MON-3 (For Cassette Systems) $39.95 
MON-4 (For Disk Systems) $49.9$ 



SMART TERMINAL 

Enables your TRS-80 to be used as a remote terminal to a time sharing 
computer system. Supports upper/lower case and full range of control 
keys, including control key mapping into any ASCII character. Automatic 
transmission of files between TRS-80 and host computer. Files can be read 
from or written to cassette tape or disk. Incoming data can be printed on 
line printer or stored in memory for subsequent save to cassette or disk. 
Disk and tape files are fully compatible with the ELECTRIC PENCIL pro- 
gram. Baud rate and RS-232-C sense switches can be reset without open- 
ing Expansion Interface. Requires RS-232-C interface and modem. 

Cassette or Disk Version $69.9$ 



FASTSORT 

A series of machine-language subroutines (for 16K, 32K and 48K Sys- 
tems) to sort data from BASIC programs. Data may be alphabetic (string) 
or numeric (integer only). Works equally well with Level II or Disk Basic. 
Complete instructions and examples provided for interfacing with your 
BASIC programs. 

Cassette or Disk Version $9-95 



MAILING LIST 

Maintains mailing lists of over 1000 names. Commands allow adding, 
changing, deleting, and finding names. Sorting is done by machine lan- 
guage according to the information in any field (i.e., name, address, zip 
code). Labels printed in 1, 2, or 3 columns, in master Ibt on one line, or on 
video display. 

Disk Version Only $69.9$ 



HOME BUDGET 

Combines the maintenance of your checkbook with analysis of your 
income, expenses, and monthly bills. Handles data including bills, in- 
cluding bills, income, deposits, checks and debits to your checking ac- 
count, and cash expenses. Computes checkbook balance, list of unpaid 
bills, monthly and year-to-date summaries of income and expenses show- 
ing income tax deductions. All output printed on video display or line 
printer at user's option. Complete instructions for customizing to suit 
your own budget. 

Disk Version Only $49.9$ 



SMALL BUSINESS ACCOUNTING 

Based on Dome Bookkeeping Record #612, this program keeps track of 
income, expenditures, and payroll for a small business of up to 16 employ- 
ees. Income and expenditures can be entered on a daily, weekly, or 
monthly basis, and the program computes monthly, through last month, 
and year-to-date summaries. Payroll section keeps record of individual 
employees and their paychecks with up to six categories of payroll de- 
ductions. Employee payroll record and year-to-date payroll totals can be 
computed. Manual contains complete instructions for customizing to suit 
your business. 

Disk Version $49.9$ 
Cassette Version $19.9$ 
(Cassette Version does not contain payroll) 
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50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 
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NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 




HOUR 
24 ORDER 
LINE 

(914) 425-1535 



' All orders processed within 24 Hours 
• 30-Day money back guarantee 
• Add $3.00 for shipping in UPS Areas 
• Add $4.00 for COD. or NON-UPS Areas 
• Add $5.00 to Canada or Mexico 
• Add exact postage to all other countries 
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CQMPUTRQNICS 

• • • EVERYTHING FOR YOUR TRS-80™ • < 
And All Microsoft BASIC Computers 



N 
C. 



• TRS-80 is a trademark of Ihe Radio Shack Division of Tandy Corp. 




■W DCS RANDOM ACCESS 
& BASIC FILE HANDLING 



Written For TRS— 80 and All Computers Using MICROSOFT basic 

FINALLY IT IS HERE. At last someone wrote a book on disk random 
aooess and file handling. A book written for the ncn-prcfirammer. 
Written for the businesman and professional who need to solve and 
write special programs for in house business problems. 

Written for the hobbyist who wants to go beyond the cassette recorder and into disk storage and file 

manipulation. 

This book handles a subject of reasonable complexity, so simple and down to earth, that anyone 

with some Level II experience can cope with the material. 

This book is written using a simple program as a starting point. The programs grow in ability and 
complexity as the book progresses into the various aspects of file handling and record manipula- 
tion. Extensive effort has been made to keep the material coherent and every program line is 
explained in detail. 

The programming material presented in this 150 page self-instruction tutorial will provide any non- 
programmer with the ability to write special programs for inventories, mailing list, work scheduling, 
record keeping, research project data manipulation, etc. The subjects covered in this edition are as 



follows 



(A) The writing of a Menu to summarize program functions. 

(B) The writing of a screen format to accept record data. 

(C) The creation of the basic record. 

(D) The Fielding and LSET routines for buffer preparation. 

(E) The writing of the record to disk in a Random Access mode. 

(F) The retrieval of a record from disk in a Random Access mode. 

(G) The ability to change or edit a record. 

(H) The LPRINT capability from disk using three different formats 
(I) Deleting a record from a Random file. 
(J) Sorting the Random file. 

(K) Searching the Random file by name or other keyfield. 
(L) The ability to search in a "NEXT or PRIOR" fashion. 
(M) The ability to purge a disk file from deleted records. 
(N) The ability to calculate with data from a disk file 
(O) The provision for future expansion of the data fields. 
(P) The use of flags to prevent program crashes. 
(Q) Date setting, printer on-line, and many other routines that 
make a program run like a commercial written program. 

D.S.C., Publishing, Div. of, DEALERS— CALL D.S.C. PUBLISHING DIRECTLY FOR 
DSC, INCORPORATED. D.S.C. PUBLISHING, P.O. Box 769, Danbury, 



ass®*- 



DEALER PRICING— (203) 748-3231 or write to 
CT 068100769 



•CQIYIPJTHQMICS! 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

* ADD $3.00 FOR SHIPPING IN UPS AREAS 

* ADD $4.00 FOR C.O.D. OR NON-UPS AREAS 

* ADD $5.00 TO CANADA AND MEXICO 

* ADD PROPER POSTAGE OUTSIDE U.S., CANADA & MEXICO 

*** ALL PRICES & SPECIFICATIONS SUBJECT TO CHANGE *** 




DOS RANDOM ACCESS 

& BASIC FILE HANDLING $29.95 



-- j b /P^ _ HOUR 
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NEW TOLL-FREE 
ORDER LINE 

(OUTSIDE OF NY. STATE) 
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GRAPHICS 



LOAD 80 



Someday your 80 will design your new house. 



3-D Graphics 



Eric Fogelin 

42K Southwood Apts. 

Amherst, MA 01002 




Fig. 1. 3-D View. 



Photo 1 
138 • 80 Microcomputing, March 1982 



Even the most serious people doodle 
cubes, pyramids and other geometrical 
figures on scraps of paper. With this short 
Basic program you can create universes 
of geometrical solids floating on your 
TRS-80's screen. The program will run in 
Level II 4K machines and up. With more 
memory you can display a greater number 
of objects, limited only by Basic's lack of 
speed compared to machine language. The 
program does not display objects instan- 
taneously but it will create them in a 
reasonably short time. The three objects in 
the photographs took 10 seconds to com- 
pute and 40 seconds to draw. If you have 
machine language programs to draw lines 
connecting two points use them instead of 
my slower Basic routine. This program does 
not produce real-time 3-D graphics, but it 
may provide a start for a machine language 
program. 

Low graphics resolution is another limita- 
tion. Square instead of rectangular pixels on 
the TRS-80 would improve the display. 

The Problem's Geometry 

The problem involves right triangles. Fig. 
1 shows the basic idea behind the problem: 




Xo.Yo.Zo Observer's coordinate 

x v ,yv.Zv Viewing point 

Kg Distance of observer from screen 



} 



center screen coordinates 



Table 1. Knowns. 



The three axes in Fig. 1 are X, Y and Z. R is 
the origin of this system, while O, P and V 
are the observer's coordinates, a point in 
space and the point in the center of view, 
respectively. The point V along with O deter- 
mine the viewing vector, or the direction of 
sight. We will project point P with respect to 
our observing position. This point could be 
a vertex of a geometric figure. 

The program works with end points, draw- 
ing lines after calculating the projection ef- 
fect. When drawing railroad tracks, for exam- 
ple, you need notice just four points: two 
nearby and two on the horizon. Once you pro- 
ject these four points correctly, you can draw 
the lines connecting them. 

Points P and V are in the same plane in 




Photo 2 



The Key Box 

Basic Level II 
Model I or III 
4KRAM 



"This routine allows you to view 
objects at any angle in any quadrant." 



Fig. 1, but they need not be. OV is always 
perpendicular to the middle of the screen at 
point V. OP intersects the screen at P', 
whose screen's X,Y components we want to 
find. If the observing position is moved 
closer to point V, the distance between P' 
and V increases. This produces the projec- 
tion effect. 

Fig. 2 shows the projection of Fig. 1 on 
the X,Y plane. You see the same lines as in 
Fig. 1. Use this representation to calculate 
the various angles and distances. (Table 2 
shows the equations I use. Remember this 
problem involves right triangles.) Ourtask is 
tof ind the values of P , ©a and the distance 
AR. You can calculate A and P quickly be- 
cause you know the X,Y coordinates of P 
and V (see Table 1). Find the distance RP by 
using the Pythagorean theorem, and also 
the angle between A and P . Using these 
quantities it is possible to find distance AR. 

Fig. 3 shows a view perpendicular to the 




Fig. 2. XY Plane. 




plane ORV. The task is to find the values of 
H , y , S y and DS where S is in back of P'. 
First, calculate H : You can calculate the 
distance RV, and you know OR (the Y-com- 
ponent of point O). Find y using AR and 
OR. K s is the distance of the observer from 
the screen. You can now find S y , the 
screen's Y-component of point P'. Calculate 
S y by using K s and the angle between H 
and y . To calculate DS, first calculate OS 
using the Pythagorean theorem with sides 
K s and S y . Since you know 0y, use trigo- 
nometry to find DS. DS and OS are hard to 
see because Figs. 3 and 4 project points on 
top of one another. 

Finally, you can find the X component of 
P'. In Fig. 4 you are again looking per- 
pendicular to the XjY plane with the screen 
surface, OV and OP projected against the 
plane. Since you have calculated DS, and 
you already know the angle between A and 
P , you can find S x . You now have the 
screen's X and Y components of P'. Use this 
same procedure for any other point. 

Program Description 

I declare certain variables integers to 
make the program run faster. The dimen- 
sioned variable holds the X,Y components 
of the projected figures. It can store fifty 



points, but you can raise this to your 
memory limit. 

The first statement (OUT254.1) speeds up 
computers with Dennis Kitsz's speed-up 
modification (80 Microcomputing, February 
1980). You can remove this but it should 
cause no problem if you do not have the mod. 

The next routine requires the observer's 
position and a point in the center of vision. 
This routine prints the old (X,Y,Z) com- 
ponents for O and V so you can enter new 
viewpoints. To enter new coordinates type 
over the old ones, separating components 
with commas. Enter leaves the old data 
alone. 

The routine in lines 160-220, the heart of 
the program, performs calculations. The pro- 
gram projects the vertices of the geometrical 
figures using data in lines 1000-1220. 

After all the points have been projected 
properly, they are connected using the sec- 
ond block of data (lines 2000-2120). This 
routine gives the X,Y coordinates of the be- 
ginning and ending of the line, and calls the 
line drawing routine. 

The next routine, called when computing 
the arc tangent, returns the angle in the cor- 
rect quadrant. This routine allows you to 
view objects at any angle in any quadrant. 

The line-drawing routine uses the equa- 
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Program Listing 

___ * 

THREE DIMENSIONAL GRAPHICS * 

* WRITTEN BY - E. FOGELIN, 42K SOUTHWOOD APTS., AMHERST, * 
' MA. 01002. COPYRIGHTED MARCH 1981. * 
> * 



INITIALIZATION OF VARIABLES. 



Fig. 3. ORV Plane. 



100 OUT254,1:CLEAR300:CLS:DEFINTC,I,J,S,B,X-Z:DIMC(100) :ONERRORG 

OTO510 

110 CX=63:CY=23:KS=500:PI=3. 1415927 :P2=PI/2iG0T0125 

115 ' 

INPUT OBSERVER'S POSITION AND POINT TO BE OBSERVED 
TO ESTABLISH THE VIEWING VECTOR. 

120 RESTORE:A$="":FORI=15424TO15550:A$=A$+CHR$(PEEK(I)) :NEXT 
125 PRINT§4,XOCHR$(8)YOCHR$(8)ZO;:PRINT@0,;:INPUT"O";XO,YO,ZOiPR 
INTLEFT$(A$,63) ; 

130 PRINT668 ,XVCHR$ ( 8) YVCHR$ ( 8) ZV; : PRINT@64 , ; : INPUT"V" ;XV,YV, ZV 
140 PRINTRIGHT$(A$,63) ; : ID=1:AX=XV-XO:AY=YV-YO:GOSUB300:TA=AV 
150 AY=SQR(AX[2+AY[2) :AX=ZO-ZV:GOSUB300:TH=AV 

155 ' 

ROUTINE THAT COMPUTES THE X-Y SCREEN COORDINATES 
WITH THE PROPER PROJECTION. 

160 READXP,YP,ZP:IFZP=-999CLS:GOTO230 

170 XP=XP-XO:YP=YP-YO:Z=ZO-ZP 

180 AY=YP:AX=XP:GOSUB300:T1=TA-AV:AR=COS(T1)*SQR(XP[2+YP[2) 

185 AX=Z:IFZ>0THENAY=ABS(AR) :GOSUB300:TX=AV*SGN(AR) ELSEAY=AR»GOS 

UB300:TX=AV 

190 T2-TH-TX:IFABS(T2) >=P2THENSX=936:GOTO220 

200 SY-KS*TAN(T2):DS=SIN(TX)*SQR(SY[2+KS[2) 

210 IPDSOBTHENSX=DS*TAN (Tl) ELSESX-KS/COS (TH) *SQR(XP [ 2+YP [ 2) /Z*S 

GN ( Tl ) » IPABS ( Tl ) >P2THENSX— SX 

220 C ( ID) -SX+CX : C ( ID+1) -SY* . 41+CY : ID=ID+2 : GOTO160 

Program continues 
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"If you desire curves, approximate 

them with a number of smaller segments. 



Program continued 

225 ' 

ROUTINE THAT DETERMINES WHICH POINTS SHOULD BE 
CONNECTED WITH LINES. 

230 READIP:IFIP=0THEN120 

240 I1=C(IP*2-1) :I2=C(IP*2) :READIN 

250 F0RII=1T0IN:READJ:I3=C(J*2-1) :I4=C(J*2) : IFI10999ANDI30999G 

OSUB400 

260 NEXT:GOTO230 

290 ' 

ROUTINE TO PLACE ANGLES IN CORRECT QUADRANTS. 

300 IFAX=0THEN340 

310 AV=ATN (AY/AX) : IFAX>0ANDAY>=0RETURN 

320 IFAX>0ANDAY<0THENAV=AV+2*PI: RETURN 

330 AV=AV+PI : RETURN 

340 IFAY>-0THENAV=P2ELSEAV=3*P2 

350 RETURN 

390 • 

ROUTINE THAT CONNECTS TWO POINTS WITH A LINE. 

400 IF (I1<0ANDI3<0)OR(I1>127ANDI3>127) RETURN 

410 IF (I2<0ANDI4<0)OR(I2>47ANDI4>47) RETURN 

420 15=13-11: 16=14-12 :IFI5=0THEN470ELSEA=I6/I5:IFI6=0THEN480 

425 B1=I2-A*I1:B2=A*127+B1:IFA=0THEN440ELSEB3=-B1/A:B4=(47-B1)/A 

43 IF(BK0ORB1>47) AND(B2<0ORB2>47) AND(B3<0ORB3>127) AND(B4<0ORB4 

>1 27) RETURN 

450 IFFIX(A) =0FORX=I1TOI3STEPSGN(I5) :Y=(X-I1) *A+I2+. 5 :SET(X, Y) :N 

EXT: RETURN 

460 F0RY=I2T0I4STEPSGN(I6) :X= (Y-I2) /A+I1+.5 : SET(X,Y) :NEXT:RETURN 

470 F0RY=I2T0I4STEPSGN(I6) :SET(I1,Y) :NEXT:RETURN 
480 F0RX=I1T0I3STEPSGN(I5) :SET(X,I2) :NEXT:RETURN 
500 ' 

ERROR TRAP TO ALLOW SETTING POINTS OFF THE SCREEN. 

510 RESUMENEXT 
1000 ' 

X, Y AND Z COORDINATES OF POLYGON VERTICES. 



1010 


DATA 


10,40 r 


1020 


DATA 


30,40,0 


1030 


DATA 


20,49,0 


1040 


DATA 


20,31,0 


1050 


DATA 


20,40,40 


1060 


DATA 


20,10,0 


1070 


DATA 


20,30,0 


1080 


DATA 


40,10,0 


1090 


DATA 


40,30,0 


1100 


DATA 


20,10,20 


1110 


DATA 


20,30,20 


1120 


DATA 


40,10,20 


1130 


DATA 


40,30,20 


1140 


DATA 


0,0,0 


1150 


DATA 


0,10,0 


1160 


DATA 


10,0,0 


1170 


DATA 


10,10,0 


1180 


DATA 


0,0,30 


1190 


DATA 


0,10,30 


1200 


DATA 


10,0,30 


1210 


DATA 


10,10,30 


1220 
2000 


DATA 


-999,-999,-999 



POINT TO POINT LINE DATA. 

2010 DATA 1,2,3,4 
2020 DATA 2,2,3,4 
2030 DATA 5,4,1,3,2,4 
2040 DATA 6,3,7,8,10 
2050 DATA 9,3,7,8,13 
2060 DATA 12,3,8,10,13 
2070 DATA 11,3,7,13,10 
2080 DATA 14,3,15,16,18 
2090 DATA 17,3,15,16,21 
2100 DATA 20,3,16,18,21 
2110 DATA 19,3,15,21,18 
2120 DATA 



tion y = mx + b to compute intercepts and 
slopes. The routine does not draw lines that 
do not intersect the screen area. However, 
the routine draws all lines that appear even 
partially on the screen. 

Because FC errors halt any program try- 
ing to set points off the screen, I used an On 
Error GOTO.. .Resume Next statement. The 
computer ignores the error arising from 
points set off-screen. 

The data statements in lines 1000-1220 
contain the vertices of the three geomet- 
rical figures in the photographs. Each point 
is on its own line. 

When drawing geometrical figures, one 
point can be connected to more than one 
other point. Lines 2000-2120 describe 
which point should be connected to what 
other points. The first data statement says 
that point one (the vertex in line 1010) 
should be connected to 2 points: three and 
four (lines 1030 and 1040). The first number 
is the main point, the second is the numbe- 



e A = tan- [(y v -y >/(x v - x )J 

0p = tan-' [ <y p - y )/(x p - x )J 

&H = tan- [v(x v -x ) 2 + (y v -yo) j/ ( z o ~zv)j 

AR = cos (0. - ©^(xp-xo^-Myp-yo) 5 

6 y = tan- [aR/(z - zp)J 
Sy = K s tan (0H - 0y) + Cy 



DS = sin (0y)\A(S y ) 2 + (K s ) 2 
S x = DS tan (0a - 0p) + C x 

Table 2. Equations. 




Photo 3 
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of points to be connected with lines, and 
the following numbers are the points to be 
connected. As with the first block of data 
statements, there should be one data state- 
ment for each group of line descriptions. 

The first block of data ends with -999, 
-999,-999 to signal the end of the vertices. 
The second block of data must end with a 
zero for the same reason. 

When you type in this program you can 
leave out the remark statements. Do not put 
the On Error GOTO statement in until you 
discover every typing error. 

Limitations 

Since the program draws an entire line 
even if the line has only a small section in 
the screen area, a lot of time is wasted 
drawing invisible lines. Alleviate this by 
breaking up long lines into smaller sec- 
tions. If you desire curves, approximate 
them with a number of smaller segments. 

Keep graph paper within arm's reach 
when you are placing objects in a de- 
veloping universe. Determining vertices and 
their connection is a snap. 

By increasing K s , you produce a tele- 
photo lens of any power. Experiment with 
this variable to yield interesting views. De- 
creasing K s produces severe projection as 
in fish-eye lens views. 

Remember you can observe objects from 
any position. All objects can be coplanar or 
floating in different areas of space. 

Where do we go from here? 3-D graphic 
representation is a fascinating area of com- 
puter science. More sophisticated pro- 
grams block objects behind others as the 
position of the observer changes. Real-time 
graphics make games exciting; engineers 
use them to study the design of buildings, 
airplanes and cars. ■ 

Eric Fogelin is an undergraduate at the 
University of Massachusetts where he ma- 
jors in Astronomy and Computer Science. 





Fig. 4.XY Plane. 



#23 SOFTWARE 



ULTIMATE SOFTWARE PLAN 



We'll match any advertised price on any 
item that we carry. And if you find a lower 
price on what you bought within 30 days of 
buying it, just show us the ad and we'll 
refund the difference. 
It's that simple. 



DISK WITH i 
MANUAL/ 

ARTIFICIAL INTELLIGENCE' 

Medical(PAS-3) $849/$40 

Dental (PAS-3) $849/$40 

ASYST DESIGN® 
Prof Time Accounting. $549/$40 
General Subroutine. . $269/$40 
Application Utilities ... $439/$40 

COMPLETE BUS. SYSTEMS* 

Creator $269/$25 

Reporter $169/$20 

Both $399/$45 

COMPUTER CONTROL® 

Fabs IB-tree) $159/$20 

UltraSortll $159/$25 

COMPUTER PATHWAYS* 

Pearl (level 1) $ 99/S25 

Pearl (level 2) $299/$40 

Pearl (level 3) $549/$ 50 

DIGITAL RESEARCH® 
CP/M 2.2 

NorthStar $149/$25 

TRS-80 Model II 
(P+T) $159/$35 

Micropolis $169/$25 

PL/l-80 $459/$35 

BT-80 $179/$30 

Mac $ 85/$15 

Sid $ 65/$15 

Z-Sid $ 90/$ 15 

Tex $ 90/$15 

DeSpool $ 50/$ 10 

CB-80 $459/535 

CBasic-2 $ 98/$20 

D.M.A. 

Ascom $149/$15 

Formula $539/$45 

GRAHAM-DORIAN* 

General Ledger $729/$40 

Acct Receivable $729/$40 

Acct Payable $729/$40 

Job Costing $729/$40 

Payroll II $729/$40 

Inventory II $729/$40 

Payroll $493/$40 



MANUAL 
ONLY 



Combine our price protection with the 
availability of full professional support and 
our automatic update service and you have 
the Ultimate Software Plan. 

It's a convenient, uncomplicated, logical 
way to get your software. 

i/* (New items or new prices) 

CP/M users: 

specify disk systems and formats. Most formats available. 



DON'T SAY UNCLE!' 
SAY "MICROTAX" TODAYI 

Individual $ 250/$na 

Professional $1000/$na 

Partnership $ 750/$na 

Package $1500/$na 

ACRS, depreciation, batch 
computing/printing of over 
30 forms/schedules, and 
much more. 



Inventory. 
Cash Register. 
Apartment Mgt. 
MICRO-AP* 

S-Basic 

Selector IV 

Selector V 



$493/$40 
$493/$40 
$493/$40 

$269/$25 
$295/$35 
$495/$50 



ORGANIC SOFTWARE* 

TextWriterlll $1H/$25 

DateBookll $269/$25 

Milestone $269/$30 

OSBORNE® 

General Ledger $ 59/$20 

Acct Rec/Acct Pay $ 59/$ 20 

Payroll w/Cost $ 59/$20 

All 3 $129/S60 

All 3 + CBASIC-2 $199/$75 

Enhanced Osborne. . . $269/$60 
PEACHTREE* 

General Ledger $399/$40 

Acct Receivable $399/$40 

Acct Payable $399/$40 

Payroll $399/$40 

Inventory $399/$40 

Surveyor $399/$40 

Property Mgt $799/$40 

CPA Client Write-up. $799/$40 

Mlg Address $349 

P5 Version Add $129 

• MagiCalc $269/$25 

• Other less 10% 

SOFTWARE WORKS* 

Adapt (CDOStoCP/M).$ 69/$na 

Ratfor $ 86/$na 

SOHO GROUP® 

MatchMaker $ 97/$20 

Worksheet $177/$20 

STRUCTURED SYSTEMS® 

• Business Packages, 
Call for Price 
SORCIM* 

• SuperCalc $269/$na 

• Trans 86 $115 

• Act $157 

TCS® 

GLorARorAPorPay. .$ 79/$25 

All 4 $269/$99 

Compiled each $ 99/$25 

Inventory $ 99/$25 

SUPERSOFT* 

Diagnostic I $ 49/$20 

Diagnostic II $ 84/$20 

Disk Doctor $ 84/$20 

Forth ( 8080 or Z80) .... $ 1 49/$ 30 
Fortran $219/$30 



DATA BASE" 

FMS-80 $649/$45 

dBASEII $595/$50 

Condor II $899/$50 

Access 80 Level 1 $249 

Access 80 Level 2 $429 

Access 80 Level 3 $679 

Optimum $749/$50 

"WORD PROCESSING" 

WordSearch $ 1 79/$50 

SpellGuard $229/$25 

VTS/80 $259/$65 

Magic Wand $289/$45 

• Magic Spell $269/$25 

Spell Binder $349/$45 

Select $495/$na 

"OTHER GOODIES" 

Micro Plan $419/$na 

Plan 80 $269/$30 

Target $189/$30 



$149/$na 
$149/$na 
$ 89/$ 50 
$229/$50 
$179/$25 
$224/$25 



BSTAM . 

BSTMS 

Tiny "C" 

Tiny "C" Compiler 
• Nevada Cobol .... 

MicroStat 

Vedit $130/$15 

MiniModel $449/$50 

StatPak $449/$40 

Micro B+ $229/$20 

Raid $224/$35 

String/80 $ 84/$20 

String/80 (source) $279/$na 

ISIS CP/M Utility $199/$50 

Lynx $199/$20 



INFO UNLIMITED® 

EasyWriter $199 

Datadex $249 

EasyMailer $128 

Other less 15% 

MICROSOFT® 

Softcard (Z-80 CP/M). $298 

Fortran $179 

Cobol $499 



Fortran w/Ratfor. 

C Compiler 

Star Edit 

Other 



$289/$35 
$174/$ 20 
$189/$ 30 
. less 1 0% 



MICRO DATA BASE SYSTEMS* 

HDBS $269/$35 

MDBS $795/$40 

DRSorQRSorRTI $269/$10 

MDBSPKG $1295/$60 

MICROPRO* 

WordStar $319/$60 

Customization Notes. $429/$na 

Mail-Merge $109/$25 

WordStar/ Mail-Merge . $4 1 9/$85 

DataStar $249/$60 

WordMaster $119/$40 

SuperSort I $199/$40 

Spell Star $175/$40 

CalcStar $259/$na 

MICROSOFT* 

BasiC-80 $298 

Basic Compiler $329 

Fortran-80 $349 

Cobol-80 $629 

M-Sort $124 

Macro-80 $144 

Macro-86 $259 

Edit-80 $ 84 

MuSimp/MuMath $224 

MuLisp-80 $174 

MultiPlan Call 

Manager Series Call 

ORDERS ONLY-CALL TOLL FREE VISA 



Tasc. 
MICROPRO* 

Wordstar 

MailMerge 

Wordstar/MailMerge . 

SuperSort I 

Spellstar 



$139 

$269 
$ 99 

$349 
$159 
$129 



PERSONAL SOFTWARE 1 ' 



$159 
$159 
$129 
$159 
$149 
$229 
$199 



$149,'$25 



UNICORN* 

Mince 

Scribble $149/$25 

Both $249/$50 

WHITESMITHS* 

"C" Compiler $600/$30 

Pascal (incl "C") $850/$45 

"PASCAL" 

Pascal/MT+ Pkg $429/$30 



Compiler 

Sp Prog 

Pascal/Z 

• Pascal/UCSD4.0. 
Pascal/M 



$315 

$175 

$349/$30 

$670/$50 

$355/$20 



Visicalc3.3 

Desktop/Plan II... 

Visiterm 

Visidex 

Visiplot 

Visitrend/Visiplot. 

Visifile 

PEACHTREE* 
• G/L, A/R.A/R Payor 

Inventory (each) $224/$40 

"OTHER GOODIES' 
VU#3R 

(usew/Visicalc) $ 79 

Context Connector 

(usew/Visicalc) $129 

Micro Courier $219 

Super-Text II $127 

Data Factory $134 

DB Master $184 

Charles Mann less 15% 

STC less 15% 



IBM PC SOFTWARE 



• Business/Med/WP 
Call for Price 



MASTERCHARGE 



1-800-854-2003 ext. 823 • Calif. 1-800-522-1500 ext. 823 

Outside Continental U.S.— add $10 plus Air Parcel Post • Add $3.50 postage and handling per each item 
• California residents add 6% sales tax • Allow 2 weeks on checks, CO D. $3.00 extra • Prices subject to change 
without notice. All items subject to availability • ® — Mfgs. Trademark. Blue Label $3.00 additional per item. 

THE DISCOUNT SOFTWARE GROUP 

6520 Selma Ave. Suite 309 • Los Angeles, Ca. 90028 • (213) 837-5141 "* 101 

Int'l TELEX 499-0446 DISCSOFT LSA • USA TELEX 194-634 (Attn: 499-0446) 
TWX 910-321-3597 (Attn: 499-0446) 
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GRAPHICS 



Advanced graphics translated for the Color Computer. 



Is a Rose in Color Still a Rose? 



Roy Green 
Box 2248 
Athens, GA 30602 



I recently bought a Color Computer and 
have been busy translating graphics pro- 
grams. Bob Boothe's article "Advanced 



Program Listing 1 

1 'CONVERSION FOR TRS-80 COLOR COMPUTER OF A SERIES OF GRAPHICS 

2 'PROGRAMS FROM THE ARTICLE 'ADVANCED GRAPHICS TECHNIQUES — PART 
ll'r 

3 

4 
5 
6 
7 



'WRITTEN BY BOB BOOTHE AND PUBLISHED IN THE MAY 1981 ISSUE OF 

•80 -MICROCOMPUTING, PP. 119-142. 

'ARTICLE AND ORIGINAL PROGRAMS (C) 1981, 1001001 INC. 



'COLOR COMPUTER VERSION (C) 1981, ROY GREEN. 

8 '(16K extended basic required) 

9 • 

10 'initialize and present menu 
20 PI=3. 14159 

30 CLS 

40 PRINT"TRS-80 ARTIST" :PRINTSTRING$ (32 ,"-") ; 

50 PRINT" CHOOSE ONE OF THE FOLLOWING:" 

60 PRINTTAB(4) "1 — DIAG. OF N-SIDED POLYGON" 

70 PRINTTAB(4) "2— THE EYE1" 

80 PRINTTAB(4) "3 — MOIRE INTERFERENCE" 

90 PRINTTAB(4) "4 — THE TUNNEL" 

100 PRINTTAB(4) "5--THE IRIS" 

110 PRINTTAB(4) "6— THE ABYSS" 

120 PRINTTAB(4) "7 — FOUR LEAF ROSE" 

130 PRINTTAB(4) "8— THE PILLOW" 

140 PRINTTAB(4) "9 — EIGHT LEAF ROSE" 

150 PRINTTAB(3) "10 — ARCHEMEDES'S SPIRAL I" 

160 PRINTTAB(3) "11 — ARCHIE'S SPIRAL II" 

170 INPUT"WHICH ONE";A 

180 IFA<1 OR A>11 THEN170 

190 CLS:ON A GOTO1000 ,2000 ,3000 , 4000 ,5000 ,6000 ,7000 , 8000 , 9000 ,10 

000,11000 

200 ' 

210 'set up graphics screen 

220 PM0DE4,1:PCLS1:SCREEN1 ,0 

Program Listing 1 Continues 



Graphics Techniques— Part II" (80 Micro- 
computing, May 1981) quickly caught my 
eye. Program Listing 1 is the Color Com- 
puter conversion of the figures in his article 
combined in a menu program. Note that 
using RUN instead of GOT01 avoids a re- 
dimensioned array error with designs one 
and two. 

I also could not resist Part III of Bob 
Boothe's graphics articles (80 Microcom- 
puting, June 1981). Program Listing 2 pro- 
duces a hat with visor, rotated on demand. 

Program Listing 3 is a conversion of 
Howard Batie's "Supermaze" (80 Micro- 
computing, June 1981). This program, run 
on a 16K Extended Basic machine, comes 
within a few bytes of the stack area. To add 
new statements, remove remarks or com- 
bine lines. 

Some machines may have problems with 
the POKE 65495,0 statement. If yours does, 
remove the statement. 

I'd like to hear from people who have de- 
signed mazes or drawn new objects for the 
3-D program. ■ 



The Key Box 

Extended Color Basic 
Color Computer 
16K RAM 
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Program Listing 1 Continued 



230 RETURN 

300 ' 

310 "draw line 

320 LINE(X1,Y1)-(X2,Y2) , PRESET 

330 RETURN 

1000 ' 

1010 'design one 

1020 INPUr n NUMBER OP POINTS" ;N 

1030 DIMA(N) ,B(N) 

1040 FORT=0TO2*PI-.001STEP2*PI/N 

1050 Z=Z+1 

106 A(Z) =COS(T) *95+127:B(Z) =SIN(T) * 95+96 

1070 NEXTT 

1080 GOSUB200 

1090 FORS=lTO N-l:FORD=S+lTO N 

1100 X1=FIX(A(S)) :Y1=FIX(B(S) ) 

1110 X2=FIX(A(D) ) :Y2=FIX(B(D) ) 

1120 GOSUB300 

1130 NEXTD,S 

1140 FORI=1TO4000:NEXTI:RUN 

2000 ' 

2010 'design two 

2020 INPUT"NUMBER OF POINTS" ;N 

2030 GOSUB200 

2040 DIMA(N) ,B(N) 

2050 FORQ=0TO191STEP6 

2060 X1=0:Y1=Q:X2=Q:Y2=191 

2070 GOSUB300 

2080 Xl-Q+3:Yl-0:X2=191:Y2-Q+3 

2090 GOSUB300 

2100 NEXTQ 

2110 FORT=0TO2*Pi-.001STEP2*PI/N 

2120 Z=Z+1 

2130 A(Z)=COS(T)*50t96:B(Z)=SIN(T)*50+96 

2140 NEXTT:GOTO1090 

3000 ' 

3010 'design three 

3020 GOSUB200 

3030 FORT=0TO PI/2 STEPPI/90 

3040 Xl=FIX(COS(T)*45) : Y1=FIX ( SIN(T) *45) 

3050 X2=FIX(COS(T) *191) :Y2=FIX(SIN(T) *191) 

3060 GOSUB300 

3070 X1=191-X1:Y1=191-Y1 

3080 X2=191-X2:Y2=191-Y2 

3090 GOSUB300 

3100 NEXTT 

3110 FORI=1TO4000:NEXTI:RUN 

4000 ' 

4010 'design four 

4020 GOSUB200 

4030 X1=120:Y1=120 

4040 F0RQ=1T032 

4050 X2=X1+5*Q+3:Y2=Y1 

4060 GOSUB300 

4070 Xl=X2:Yl=Y2+5*Q+3 

4080 GOSUB300 

4090 X2=X1-5*Q-6:Y2=Y1 

4100 GOSUB300 

4110 Xl=X2:Yl=Y2-5*Q-6 

4120 GOSUB300 

4130 NEXTQ 

4140 FORI=1TO4000:NEXTI:RUN 

5000 ' 

5010 'design five 

5020 GOSUB200 

5030 FORT=0TO2*PI STEPPI/40 

5040 Xl=FIX(COS(T)*95+127) :Y1=FIX(SIN(T) *95+96) 

5050 A=T+3*PI/4 

5060 X2=FIX(COS(A)*95+127) : Y2=FIX(SIN(A) *95+96) 

5070 GOSUB300 

5080 NEXTT 

5090 FORI=1TO4000:NEXTI:RUN 

6000 ■ 

6010 'design six 

6020 GOSUB200 

6030 FORT=0TO8.5*PI STEPPI/15 

6040 Xl=FIX(COS(T)*4*T+127) :Y1=FIX(SIN(T) *4*T+96) 



Program Listing 1 Continues 



Smartmodem 




$249 

• Auto-Answer • Auto-Oial • Repeat 

• Programmable-Use Any Language 

• Touch-Tone and Pulse Dialing 

• Audio Monitor-Listen to Connection 

• FCC-Approved Direct-Connect 

• Full or Half Duplex, 0-300 Baud 

• RS-232C Interface • 7 Status LED's 

• Two Year Limited Warranty 

ACE SOFTWARE 
$39 with purchase 

FOR 32K/48K MODEL l/'llf COMPUTERS 

• Switch from HOST to TERMINAL mode 
» Dial another computer system 

• Redial if busy or no answer 

• When the computer answers log on 

• Send an ASCII file from your disk 

• Terminate from system when finished 

• Switch from TERMINAL to HOST mode 

• When a TERMINAL calls ask for a 
password 

• Receive an ASCII file to your disk 

• Terminate caller when finished 

• Wait for an incoming call and check 
time 

• At preset time make an outgoing call 

RC€ COMPUT€R PRODUCTS 
of Florida Inc. 

1640 N.W. 3rd St. 
DEERFIELD BEACH, FL 33441 

VOICE (305) 427-1257/DATA (305) 427-6300 

Master Charge and Visa accepted 



Bit— TRS-80- Model III.'IHBH 

WOBOS™ I 

w o 

Basic Operating System 

Who needs it? Everyone who writes or uses programs in BASIC. 
For Tape systems it's like having a DOS without the hardware! 
For Disk systems it provides the structure that DOS doesn't! 
When you CLOAO this magnificent System you get ovef 30 pow- 
erful programs, routines and subroutines at your direct com - 
mand of from a 9 -choice Menu that can very easily be dou- 
bled and customized to your needs. Designed to be used as 
'stock for ALL BASIC programs. 

Simply add your program to ft! 



WOSOS 1 ft* Modtl 


1! BASIC 


03/ftt/JB «"34tS8 


PB OS BAM 


MENU 


tit m r is*'-- 


i ■ row Pragma A 




n 'BumiM ■ 


a-.;-;'. ; , . . a 




aa-sert 


S- '•. . , . i . . c 




M-»n«ai*»t 


*-•-...,.,. B 




44- v*ps»and . 


9 -..„•...„. . « 




SS-Co>» Evmp 


e ~ Graphics SynUne 




w-mmsm^t fcfcw 


? ■ Sp4Ci'*i cita:3ctore -31 


ft'; -.-,.». '9k» ■ 


8-..-. . 


-*NHfc 


88-pioa'mi uki . . 


9- .:,, , .,.-„.. ,.. 


. 192-3SS 


*9-B»*tc« I/O 



* It will add mu I ti frequency SOUND to your TRS 80 

* It will standardize your writing and save you many 
of debugging and rewriting utility functions. 

* It will help you structure YOUR OWN programs. 



'One 



ed it. 



•II 



write 



another program without itf 



Model 1 


Model III 


LEVEL II 


DISK 


MODEL III 


DISK 


CC1022A 


CD 1032 A 


CC1021B 


CD 1031 A 



ON QUALITY CASSETTE & MANUAL 



cso3J e49-.4»ae 



<35 



SEND CHECK. MONEY ORDER OR NUMBER AND 
EXPIRATION DATE OF YOUR CREDIT CARD TO 

Wa-'I v 0.- : ~. -J-..":" >M " 179 

6640 SW 173 AVENUE. BEAVERTON. OREGON 97007 

•T8S-K It a IB «l HUD e»»>. ^^ 



■See List of Advertisers on page 402 
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Program Listing 1 Continued 

6050 A=T+2*PI/3 

6060 X2=FIX(COS(A)*4*A+127) :Y2=FIX(SIN(A) *4*A+96) 

6070 GOSUB300 

6080 NEXTT 

6090 FORI =1TO4000:NEXTI: RUN 

7000 ' 

7010 'design seven 

7020 GOSUB200 

7030 M=3:F=2 

7040 FORT=0TO2*PI STEPPI/60 

7050 R=COS(F*T)*95 

7060 Xl=FIX(COS(T)*R+127) :Y1=FIX(SIN(T) *R+96) 

7070 A=T+PI/M 

7080 R2=COS(F*A)*95 

7090 X2=FIX(COS(A)*R2+127) :Y2=FIX(SIN(A) *R2+96) 

7100 GOSUB300 

7110 NEXTT 

7120 FORI=1TO4000:NEXTI:RUN 

8000 ' 

8010 'design eight 

8020 GOSUB200 

8030 M=2:F=2:GOTO7040 

9000 ' 

9010 'design nine 

9020 GOSUB200 

9030 M=4:F=4:GOTO7040 

10000 ' 

10010 'design ten 

10020 GOSUB200 

10030 FORT=0TO2*PI STEPPI/15 

10040 R=T*17 

10050 GOSUB12000 

10060 NEXTT 

10070 FORI=1TO4000:NEXTI:RUN 

11000 ' 

11010 



'design eleven 
11020 GOSUB200 
11030 R=l 



11040 
11050 
11060 
11070 
11080 
12000 
12010 
12020 
12030 
12040 
12050 
12060 
12070 
12080 
12090 
12100 
12110 
12120 
13000 
13010 
13020 
13030 
13040 
13050 
13060 
13070 
13080 
13090 



FORT=0TO3 . 24STEPPI/28 

R=R*1.17557 

GOSUB12000 

NEXTT 

FORI=1TO4000 :NEXTI :RUN 
• 

'sub for ten and eleven 

X1=FIX(C0S(T) *R+127) :Y1=FIX(SIN(T) *R+96) 

X3=X1:Y3=Y1 

A=T+2*PI/3 

X2=FIX(C0S(A) *R+127) :Y2=FIX(SIN(A) *R+96) 

GOSUB300' 

B=T+4*PI/3 

X1=FIX(C0S(B) *R+127) :Y1=FIX(SIN(B) *R+96) 

GOSUB300 

X2=X3:Y2=Y3 

GOSUB300 

RETURN 

'to add a touch of "color", 
•change line 220 to read 

' "220 SCREENl f l" 

■ 

'to speed things up a bit, 

'type this before running 

'POKE 65495,0 

'to slow back down, type — 

'POKE 65494,0 



Program Listing 2 



5 CLS:POKE6549! 

10 PRINT -.PRINT "THREE DIMENSIONAL GRAPHICS FOR 



)5,0 



THE TRS-80 COLOR 

Program Listing 2 Continues 



COOSOL DISCOUNTS 



PRINTERS 




EPSON MX70 CALL 

EPSON MX80 CALL 

EPSON MX80 F/T CALL 

EPSON MX 100 CALL 

NEC PC-8023A-C $555 

ANACOM ANC150P OR S $1195 

ANACOM ANC160P OR S $1465 

TALLY MT-1602 OR 5 $1495 

TALLY MT-1802 OR 5 $1795 

NEC 3510-1, 3515-1, 3530-1 .... $1795 
NEC 7710-1,7715-1, 7730-1 ....$2495 

NEC 7720-1 , 7725-1 $2995 

C.ITOH FP 1500 25PU, 

H, OR Q $1350 

C.ITOH FP 1500 25RU $1450 

C.ITOH FP 1500 45PU OR Q . . . $1795 

C.ITOH FP 1500 45RU $1995 

HP-PRINTERS $ CALL 



HEWLETT PACKARD 




• HP-125 Microcomputer $2995 

• HP-85A Microcomputer $2195 

• HP-83A Microcomputer $1595 

• HP 85/83 16K Memory Module . . $169 

• HP7225B Graphics Plotter $1959 

• HP-5 Va" Dual Disk Drive $1995 

• HP-5 Va Single Disk Drive $1249 

• HP 8" Dual Disk Drive $5395 

• HP-Other Mass Storage Units . . CALL 

• HP-9111 A Graphics Tablet $1595 

• HP Firmware CALL 

• HP Software Packages CALL 

• HP I nterf aces CALL 

OTHER COMPUTERS 

• ALTOS MTU/Floppy/Harddisk . CALL 

• ADDS Computer Systems CALL 

• ATARI Computer and 
Accessories CALL 



NEC COMPUTER 




• NEC Computer PC-8001A . . . . 

• NEC I/O UnitPC-8012A 

• NEC I/O Port PC-8033A 

• NEC Disk Drive PC-8031A . . . 

• NEC Disk Drive PC-8032A . . . 

• NEC Dot Printer PC-8023A-C 

• NEC GR Monitor JB-1201 . . . . 

• NEC COL Monitor JC-1202 . . 

• NEC Accessories & Software . 

TELEVIDEO TERMINALS 

• 910C $595 

• 920C $750 

• 91 2C $705 

• 950C $959 

• ADDS Viewpoint WB21 01 

or WB2102 



. $795 
. $539 
. $152 
. $795 
. $695 
. $550 
. $199 
. $769 
CALL 



$595 



COOSOL, INC. 



Calif. (7I4) 545-22I6 (800) 854-8498 

P.O. BOX 743, ANAHEIM, CALIFORNIA 92805-0743 
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TRS-80 INFORMATION SERIES - VOLUME IV 



Lewis* Rosenfitlder 

BASIC FASTER 
AND BETTER 



«fc OTHER MYSTERIES 




BASIC is not 
nearly as slow as most 
programmers think it is. BASIC Faster 
and Better shows you how to super- 
charge your BASIC, with 300 pages 
of fast, functions and subroutines. 

You won't find any trivial 'check- 
book-balancing' programs in this 
book- it's packed with useful 
programs. 

Tutorial for the beginner, instruc- 
tive for the advanced, and invaluable 



for the professional, this 
book doesn't just talk ... it 
shows how! All of the routines are 




1260 W. Foothill Blvd. 
Upland, California 91786 

(714)946-5805 



also available on disk, so that you 
can save hours of keyboarding and 
debugging. 

BASIC Faster & Better and Other 
Mysteries is $29.95, and the two 
program disks are $19.95 each. The 
# 1 disk BFBDEM contains all the 
demonstration programs, and #2 
BFBLIB has all the library functions. 

Get the book and/ or disks from 
your local IJG dealer and B. Dalton 
bookstores. 




Fill this space with a GRAFTRAX graphic 
and win a trip to Japan. 

The Epson 
"Softwear" Sweepstakes. 



We're looking for the Picasso of programming. So we 
drew up an art contest for people who don't know a 
painting pallet from a PROM. 

If you've got an Epson printer, a computer and a little 
imagination, you could win a week-long trip for two to 
Japan. Or our top-of-the-line 136-column MX-100 
printer. Or his and hers Seiko Quartz Watches. Or a 
whole lot of honorable mention prizes. And you'll get a 
T-shirt with the winning graphic just for entering. 

All you have to do is program a GRAFTRAX graphic 
— abstract, landscape, still life, whatever — using an 
Epson MX-70, MX-80, MX-80 F/T or MX-100 printer. 
We'll not only put it on our T-shirts, we'll be displaying 
the winning entries for all to see in June at the National 
Computer Conference in Houston. 

Why, you may ask, are we being so generous? It's 
simply because GRAFTRAX is the most incredible 
graphics capability made for micros. And we want to 
see it used to its full potential. 



All entries will be judged on originality, creativity 
and best use of computer equipment. They must be 
postmarked no later than May 1, 1982, and be accom- 
panied by the software program, so we can recreate the 
winning entries for verification. Make sure the graphic 
is no larger than 8" x 10" and no smaller than 4" x 6". 
And remember, if you digitize art or a photograph, it 
must have been originally created by you. 

So get busy and enter. 
You might be a winner. 
And your software 
could be your "soft- 
wear." 




EPSON 

EPSON AMERICA, INC. 



3415 Kashiwa Street • Torrance, California 90505 




EPSON 

"SOFTWEAR" 

SWEEPSTAKES 

RULES 

1) Any computer equipment may be used to format the entry, 
but the graphics output must have been printed on an Epson 
MX-70, MX-80, MX-80 F/T or MX-100 printer with either 
built-in or optional GRAFrRAX. Winning entries will be re- 
created by Epson for verification. 

2) Each entry must be accompanied by the software program 
used to create it. All en tries and software and the rights to use 
them become the property of Epson America, Inc. 

3) All entries must be at least 6"x 4" and no larger than 8"x 10" 
in size. 

4) Art or photographs, if used, must have been created by the 
entrant. 

5) All entries will be judged by an independent panel of 
judges on their creative merit, originality and best use of com- 
puter equipment. Decision of the judges is final. 

6) This contest is valid from January 1, 1982 until May 1, 1982. 
Entries must be postmarked no later than May 1, 1^82. 

7) Participation in the Epson "Softwear" Sweepstakes is open 
to any except the following: employees of Epson America, 
Inc., its service agencies, or their families. 

8) Winners will be notified by mail no later than June 1, 1982. 
A list of winners will be made'available by sending a stamped, 
self-addressed envelope to Epson America, Inc., 3415 Kashiwa 
Street, Torrance, CA 90505. 

9) Entries will be maintained on file at Epson America, Inc. 
until January 1, 1983. 

10) Prizes are as follows: First prize includes round-trip 
economy air transportation for two to Tokyo, from the airport 
nearest the winner's place of residence, and six nights stan- 
dard hotel accommodations, double occupancy. Trip does not 
include airport departure taxes, hotel service charges, cost of 
transportation or other expenses incurred before leaving the 
airport of initial departure, returning to Tokyo airport and re- 
turning home from the airport of initial departure; nor does it 
include meals or gratuities. Second prize consists of one 
Epson MX-100 Printer. Third prize consists of his and hers 
Seiko Quartz Watches. Additional prizes include 25 Micro- 
Nine Printheads, 50 Epson Digital Watches, and 100 Epson 
Ribbon Cartridges. 

11) You may enter more than once, but each entry must be 
accompanied by the official entry coupon below. 

12) Void where prohibited by law. 



Attach this form firmly to the back of each graphic you enter. 



NAME_ 
STREET 



CITY 



ZIP 



STATE 

PHONE ( ) 

COMPUTER EQUIPMENT USED 



PRINTER MODEL AND SERIAL NUMBER 



T-SHIRT SIZE 



_M 



I. 



XL 



Mail entries to: 

"SOFTWEAR" SWEEPSTAKES 

Epson America, Inc. 

3415 Kashiwa Street 

Torrance, California 90505 ^97 



EPSON 

EPSON AMERICA, INC. 
-See USt ol Advertisers on page 402 



Program Listing 2 Continued 

COMPUTER" :PRINTSTRING$( 32, "-") ; 

15 PRINT: PRINT "ORIGINAL PROGRAM BY BOB BOOTHE" : PRINT :PRINT"C0L0R 

COMPUTER VERSION BY ROY GREEN 1981" 
20 SCREEN0,1 
25 FORI=1TO2000:NEXT 

30 PRINT: PRINT "READING DATA" : SCREEN0 , 1 
40 PI=3. 1415926 

50 DIMX(100,2) ,Y(100,2) ,Z(100,2) 
60 N=l 

70 READX(N,1) ,Y(N,1) ,Z(N,1) ,X(N,2) ,Y(N,2) ,Z(N,2) 
80 IFX(N,1) <>1000THENN=N+1:GOTO70 
90 N=N-1 

100 CLS:PRINTN"DATA LINES WERE READ" 
110 PRINT:PRINTTAB(3) "1 — ROTATE AROUND X AXIS" 
120 PRINTTAB(3) "2--ROTATE AROUND Y AXIS" 
130 PRINTTAB(3) "3 — ROTATE AROUND Z AXIS" 

140 PRINTTAB(3) "4 — STRETCH OR SHRINK" : PRINTTAB(3) "5 — DISPLAY" 
150 PRINTTAB(3) "6 — END PROGRAM" 
160 PRINT: INPUT" ENTER FUNCTION NUMBER" ;F 
170 IFF<1 OR F>6THEN160 
180 ON F GOTO190, 190, 190, 500, 600,800 

190 INPUT"ENTER THE NUMBER OF DEGREES TO ROTATE" ;D:PRINT"CALCUL 
ATING..." 

200 FORQ=1TON:FORB=1TO2:IFX(Q,B)=0OR Y(Q,B) =0ORZ (Q,B) =0THEN900:N 
EXT: NEXT 

210 ON F GOTO220,300,380 
220 F0RQ=1T0N:F0RB=1T02 
230 T=ATN(Z(Q,B)/Y(Q,B) )+D*PI/180 
240 IFY(Q,B)<0THENT=T+PI 
250 R=SQR(Z(Q,B) [2+Y(Q,B) [2) 
260 Y(Q,B)=COS(T)*R 
270 Z(Q,B)=SIN(T)*R 
280 NEXT: NEXT 
290 CLS:GOTO110 
300 FORQ=lTON:FORB=lT02 
310 T=ATN(Z(Q,B)/X(Q,B) )+D*PI/180 
320 IFX (Q ,B) <0THENT=T+PI 
330 R=SQR(Z(Q,B) [2+X(Q,B) [2) 
340 X(Q,B)=COS(T)*R 
350 Z(Q,B)=SIN(T)*R 
360 NEXT: NEXT 
370 CLS:GOTO110 
380 FORQ=lTON:FORB=lT02 
390 T=ATN(Y(Q,B)/X(Q,B) )+D*PI/180 
400 IFX(Q,B)<0THENT=T+PI 
410 R=SQR(Y(Q / B) [2+X(Q,B) [2) 
420 X(Q,B)=COS(T)*R 
430 Y(Q,B)=SIN(T)*R 
440 NEXT:NEXT 
450 CLS:GOTO110 

500 INPUT" (ENTER A FACTOR FOR X, Y, AND Z IN THAT ORDER" ;X,Y,Z 
510 IFX=0ORY=0ORZ=0THENPRINT"ZERO IS INVALID. TRY AGAIN. "ELSEPRI 
NT"CALCULATING. . . " 
520 FORQ=lTON:FORB=lT02 
530 X(Q,B)=X(Q,B)*X:Y(Q,B)=Y(Q,B)*Y:Z(Q,B)=Z(Q,B)*Z:NEXT:NEXT 

540 CLS:GOTO110 

600 CLS:PMODE4,1:PCLS1:SCREEN1,0 

610 HY=Y(1,1) :LY=HY:HZ=Z(1,1) :LZ=HZ 

620 FORQ=lTON:FORB=lT02 

630 IFY(Q,B)>HY THENHY=Y(Q,B) 

640 IFY(Q,B)<LY THENLY=Y(Q,B) 

650 IFZ(Q,B)>HZ THENHZ=Z (Q,B) 

660 IFZ(Q,B)<LZ THENLZ=Z (Q,B) 

670 NEXT: NEXT 

6 80 W=HY-LY:IFHZ-LZ>W THENW=HZ-LZ 

690 SY=-(HY+LY)/2:SZ=-(HZ+LZ)/2 

700 FORQ=lTON 

710 X1=INT(127.5+(Y(Q,1)+SY)/W*209) :Yl=INT(95.5- (Z (Q,l) +SZ)/W*19 

0) 

720 X2=INT(127.5+(Y(Q,2)+SY)/W*209) :Y2=INT( 95 .5-(Z (Q,2) +SZ)/W*19 

0) 

730 LINE(X1,Y1)-(X2,Y2) , PRESET 

740 NEXT 

750 Z$=INKEY$:IFZ$=""THEN750 

760 IFZ$="M"THENCLS:GOTO110:ELSE750 

800 POKE65494,0:END 

900 S=.001:FORQ=1TON:FORB=1TO2:X(Q,B)=X(Q,B)+S:Y(Q,B)=Y(Q,B)+S:Z 

(Q, B)=Z(Q,B)+S: NEXT: NEXT :GOTO200 

3000 'data 

3010 DATA0, 100, 10, 0,0,0 

3020 DATA87,50,10,0,0,0 

3030 DATA87,-50,10,0,0,0 

3040 DATA0, -100, 10, 0,0,0 

3050 DATA-87,-50,10,0,0,0 

3060 DATA-87,50,10,0,0,0 

3070 DATA0, 100, 10, 0,125, 100 

3080 DATA87,50,10,108,63,100 

Program Listing 2 Continues 
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First in 

Its Class 

and 

Looking 

for 

Work. 



TRS-80 Model I, II, III 

Five multiple regression procedures 
(including stepwise, backward elimination, all 
subset, and ridge), 24 transformations, com- 
prehensive data base manager (with search 
and sort), descriptive statistics, hypothesis 
testing (7 tests), time series analysis (7 
models), random variate generation, discrete 
probability distributions, sampling distribu- 
tions, nonparametrics (5 tests), and com- 
plete documentation. 

Complete package with manual — $125 

To order, send payment plus $2.00 shipping 
and handling to: 



Quant Systems 

P.O. Box 628 

Charleston, S.C. 29402 

803-571-2825 

S.C. residents add 4% sales tax 

Overseas orders add $7 for shipping 



194 



The 

Lawyer's 

Microcomputer™ 

A Newsletter for Lawyers 

Using the TRS-80* 

• Articles for Lawyers 

• Law Office Applications 

• Lawyer Information 
Exchange 

• Software Reviews 

• Hardware Reviews 

• Advertisements Directed 
to Lawyer Users 

• Technical Tips 

• Letters and Suggestions 

• And Much More 

A New Monthly Newsletter 
For Lawyers 

Send $28 For A 
One Year Subscription 

The Lawyer's Microcomputer™ 
Post Office Box 1046A 
Lexington, S.C. 29072 



--191 



FM Tandy Corp 



Program Listing 2 Continued 

-50,10,108,-63,10 

100,10,0,-125,100 

,-50,10,-108,-63, 

,50,10,-108,63,10 

00,10,87,50,10 

50,10,87,-50,10 

-50,10,0,-100,10 

100,10,-87,-50,10 

,-50,10,-87,50,10 

,50,10,0,100,10 

25,100,108,63,100 

,63,100,125,0,100 

,0,100,108,-63,10 

,-63,100,0,-125,1 

125,100,-108,-63, 

8,-63,100,-108,63 

8,63,100,0,125,10 



3090 


DATA87 , 


3100 


DATA0 , - 


3110 


DATA- 87 


3120 


DATA- 87 


3130 


DATA0 , 1 


3140 


DATA87, 


3150 


DATA87 , 


3160 


DATA0 , - 


3170 


DATA- 8 7 


3180 


DATA- 8 7 


3190 


DATA0 , 1 


3200 


DATA108 


3210 


DATA125 


3220 


DATA108 


3230 


DATA0 , - 


3240 


DATA- 10 


3250 


DATA- 10 



3260 
3270 
3280 
3290 
3300 
3310 
3320 
3330 
3340 
3350 
3360 
3370 
3380 
3390 
3400 
3410 
3999 



DATA59,9 
DATA200, 
DATA225, 
DATA200, 
DATA89,4 
DATA103, 
DATA103, 
DATA89,- 
DATA92,3 
DATA92,1 
DATA101, 
DATA101, 
DATA92,- 
DATA92,- 
DATA101, 
DATA101, 
DATA1000 



4,1 
63, 
0,1 
-63 
0,2 
40, 
-40 
40, 
0,3 
0,3 
30, 
10, 
10, 
30, 
-30 
-10 



00,200,63,115 

115,225,0,110 

10,200,-63,115 

,115,59,-94,101 

0,103,40,80 

80,103,-40,80 

,80,89,-40,20 

20,89,40,20 

0,92,10,30 

0,101,30,70 

70,101,10,70 

70,92,30,30 

30,92,-30,30 

30,101,-30,70 

,70,101,-10,70 

,70,92,-10,30 



,,,,,, 
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Program Listing 3 

10 CLEAR100:CLS:PRINT"SUPERMAZE":PRINTSTRING$(32,"-") ; 

20 PRINT "COPYRIGHT 1980" 

3 PRINT "BY HOWARD BAT IE" 

40 PRINT"HERNDON, VA" 

50 PRINT: PRINT "COLOR COMPUTER VERSION 

60 PRINT"COPYRIGHT 1981" 

70 PRINT "BY ROY GREEN" 

80 PRINT" ATHENS, GA" :SCREEN0 , 1 

90 FORI=1TO2000:NEXT 

100 CLEAR:DIMA(104) ,D(23) 

110 FORI=0TO23:READD(I) :NEXT 

120 CLS:PRINT"WHICH MAZE DO YOU WANT" 

130 LL=0:FORI=0TO5:PRINT@64+I*64,"MAZE #"D(4*I+LL) "IS"D( 4*I+LL+1 

) "BY"D(4*I+LL+2) , "MINIMUM # OF MOVES IS"D( 4*I+LL+3) 

140 LL=0:NEXT 

150 PRINT@22, n "; tINPUTMN 

160 IFMN>60RMN<1THENPRINT@22," ";:GOTO150 

170 CLS:IFMN=1THEN190 

180 FORI=0TO(105*(MN-1) ) -1 :READAA:NEXT 

190 FORI=0TO104:READA(I) :NEXT 

200 E=0:X=A(100) :D=2 

210 CLS:PRINT@32,"YOU ARE IN A"A(103) "BY"A(104) "MAZE WITH" 

220 PRINT"ELECTRIFIED WALLS. FIND YOUR WAY OUT IN THE LEAST N 

UMBER OF MOVES . " 

230 PRINT"MINIMUM NO. OF MOVES IS"A(102) "FOR" 

240 PRINT"THIS MAZE." 

250 PRINT: PRINT "MOVE FORWARD BY TYPING 'F'," 

26 PRINT"TURN RIGHT BY TYPING 'R'" 

270 PRINT"OR TURN LEFT BY TYPING 'L'." 

280 PRINT: PRINT "TURNS TO THE RIGHT OR LEFT DO NOT COUNT AS MOV 

ES." 

290 PRINT: INPUT"PRESS enter TO START", -Z 

300 GOSUB1600 

310 CLS : PLAY "T5 005 ABC" ' :PRINT@202, "MOVES: "Q; . 

320 'FORI=1TO500:NEXT 

328 ' 

329 'set up graphics screen 

330 PMODE4,1:PCLS1:SCREEN1,0 

340 ON E+l GOTO 350,400,450,500,550 

348 ' 

349 'draw left wall or hall 

350 IFVAL(MID$(B$,4,1) )=0THEN390 
360 LINE(208, 5)-(208, 180) , PRESET 
370 LINE(208,5)-(215,0) , PRESET 

380 LINE(208,180)-(215,191) ,PRESET:GOTO690 

390 LINE(208,5)-(255,180) , PRESET, B:GOTO690 

400 IFVAL(MID$(B$,4,1) ) =0THEN440 

410 LINE(188,20)-(188,148) , PRESET 

420 LINE(188, 20)-(208, 5) , PRESET 

430 LINE(188,148)-(208,180) ,PRESET:GOTO690 

440 LINE(188,20)-(208,148) , PRESET, B:GOTO690 

450 IFVAL(MID$(B$,4,1))=0THEN490 

460 LINE(171,32)-(171,121) , PRESET 

470 LINE(171, 32)-(188, 20) , PRESET 

480 LINE(171,121)-(188,148) ,PRESET:GOTO690 

490 LINE(171,32)-(188,121) , PRESET, B:GOT06 90 

500 IFVAL(MID$(B$,4,1) )=0THEN540 

510 LINE(156, 43)-(156, 97) , PRESET 

520 LINE(156, 43)-(171, 32) , PRESET 

530 LINE(156,97)-(171,121) , PRESET :GOT06 90 

540 LINE(156,43)-(171,97) , PRESET, B:GOTO690 

550 IFVAL(MID$(B$,4,1))=0THEN590 

560 LINE(145, 51)-(145, 80) , PRESET 

Program Listing 3 Continues 



Program Listing 3 Continued 

570 LINE(145, 51)-(156, 43) , PRESET 

580 LINE(145,80)-(156,97) , PRESET :G0T06 90 

590 LINE(145,51)-(156,80) , PRESET, B 

688 ' 

689 'draw right wall or hall 

690 ON E+l GOTO700,750,800,850,900 
700 IFVAL(MID$(B$,6,1) )=0THEN740 
710 LINE(47, 5)-(47, 180) , PRESET 
720 LINE(47,5)-(40,0) , PRESET 

730 LINE (47, 180) -(40,191) , PRESET: GOTO950 

740 LINE(47,5)-(0,180) , PRESET, B:GOTO950 

750 IFVAL(MID$(B$,6,1) )=0THEN790 

760 LINE(69, 20)-(69, 148) , PRESET 

770 LINE(69, 20)-(47, 5) , PRESET 

780 LINE(69,148)-(47,180) ,PRESET:GOTO950 

790 LINE(69,20)-(47,148) , PRESET, B:GOTO950 

800 IFVAL(MID$(B$,6,1))=0THEN840 

810 LINE(87, 32)-(87, 121) , PRESET 

820 LINE(87, 32)-(69, 20) , PRESET 

830 LINE(87,121)-(69,148) ,PRESET:GOTO950 

840 LINE(87,32)-(69,121) , PRESET, B:GOTO950 

850 IFVAL(MID$(B$,6,1))=0THEN890 

860 LINE(103, 43)-(103, 97) , PRESET 

870 LINE(103, 43)-(87, 32) , PRESET 

880 LINE (103, 97) -(87,121) , PRESET :GOTO950 

890 LINE(103,43)-(87,97) , PRESET, B:GOTO950 

900 IFVAL(MID$(B$,6,1) )=0THEN940 

910 LINE(114, 51)-(114, 80) , PRESET 

920 LINE(114, 51)-(103, 43) , PRESET 

930 LINE(114,80)-(103,97) , PRESET :GOTO950 

940 LINE(114,51)-(103,80) , PRESET, B:GOTO950 

950 IFQ=0THEN970 

960 IF( (X+(E*Y)=A(100) )*(D=4) ) +( (X+(E*Y) =A(101) )*(D=2) ) THEN1100 

968 ' 

969 'if wall ahead then draw and stop for move 

970 IFVAL(MID$(B$,3,1))=1THEN990 
980 GOTO1050 

990 ON E+l GOTO 1000,1010,1020,1030,1040 
1000 LINE(47,5)-(208,180) , PRESET, B:GOTO1100 
1010 LINE(69,20)-(188,148) ,PRESET,B:GOTO1100 
1020 LINE(87,32)-(171,121) , PRESET, B:GOTO1100 
1030 LINE(103,43)-(156,97) ,PRESET,B:GOTO1100 
1040 LINE(114,51)-(145,80) , PRESET, B:GOTO1100 
1050 E=E+1:IFE>4THEN1100 
1060 GOSUB1600 
1070 GOTO340 

1098 ' 

1099 'check for move or turn 

1100 M$=INKEY$:IFM$=""THEN1100 
1110 E=0:IFM$="F"THEN1150 
1120 IFM$= n R n THEN1220 

1130 IFM$="L"THEN1260 

1140 GOTO1100 

1149 'move forward 

1150 IF(X=A(100) )*(D=4)THEN1300 
1160 IF(X=A(101) )*(D=2)THEN1350 
1170 GOSUB1640 

1180 IFVAL(MID$(B$,3,1) )=1THEN1310 
1190 Q=Q+1:X=X+Y 
1200 GOSUB1600 
1210 GOTO310 

1219 'turn right 

1220 D=D+1:IFD<5THEN1240 
1230 D=l 

1240 GOSUB1600:PLAY n ADB" 

1250 GOTO330 

1259 'turn left 

1260 D=D-1:IFD>0THEN1280 
1270 D=4 

1280 GOSUB1600:PLAY"DAC" 
1290 GOTO330 

1298 ' 

1299 'ending messages 

1300 CLS:PRINT@204,"YOU LOSE" :PLA""01GL2C" :PRINT@232 , "OUT AT ENT 
RANCE1":GOTO1360 

1310 SCREEN0,0:FORZ=lTO30:CLS:PRINT@201,"ZZZAAAPPPi ! 1 " :PLAY"05T1 

50E":CLS0:PLAY n C n :NEXT 

1320 CLS:PRINT@201,"ZZZAAAPPP! 11" 

1330 PRINT"YOU JUST RAN INTO.... THE ELECTRIFIE 

D WALL! ! 1 I" 

1340 GOTO1360 

1350 CLS:PRINT@198,"YOU WIN IN"Q"MOVES" :PRINT@229 ,A(102) "IS MINI 

MUM SCORE" :PLAY"T603L4CFAL4.04CL8.03AL104C" 

1360 PRINT: PRINT 

1370 PRINT"DO YOU WANT TO TRY AGAIN? (Y/N) " 

1380 M$=INKEY$:IFM$=""THEN1380 

1390 IFM$="Y"THENRESTORE:GOTO100 

Program Listing 3 Continues 



GET THE 

DOCUMENTER 

A MACRO UTILITY FOR YOUR MICRO 




Have your TRS-80* MOD I or III or an Apple II 
produce its own flowchart with the Documented 
Program logic is graphically displayed to your 
screen or printer. Uses include flowcharting basic 
level II. disk basic or Apple Soft programs, 
debugging programs and a learning aid. A branch 
map is also produced. TRS-80 version runs on 
l6-48k system {disk-48k only) Apple version requires 
48k and 1 disk drive. 

If documentation is a problem for you buy the 
Documentor. 

TRS-80 version-$34.95 Apple II version $49.95 

plus $1.05 postage & handling (Ga. res. add 4% tax) 
Specify Type: 



C TRS-80-48k disk 
□ Apple ll-48k disk 

□ 1 6 Sector 

_ 1 3 Sector 

Name: 

Address: 

City: 



_- TRS-80- 16k Tape 
H TRS-80-32k Tape 
TRS-80-48k Tape 



Q Master Charge 

Account No 

Bank No. 



ST. Zip 

Q Visa 



Expiration 
Date __ 



Signature 

P-80 Nut Software, P.O. Box 490 
Lilburn, Georgia 30247 (404) 469-0056 

^368 



>sSee List of Advertisers on page 402 
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I TRS -80 I 

s 




i 



i BUNDLE 

When you buy your % 
1 TRS 80™ equipment! I 

■g Use our toll free number to Kg 
£.5 cheek our price before you buy Jfflj 
a TRS 80™ . . . anywhere! 



5L Don't delay . . . CALL TODAY 

I 




nationwide 1 800 874 1551 ^ 



kv^ Creative Computer 

1236 E. Colonial Dr., Orlando, FL 32803, USA 

(305) 894-4744 — Micronet 71555,520 

3M Head Cleaning Diskettes — $22.95 



RIBBONS 



Radio Snack' 
Line Printers 1.2 & 4 . 
LmePrinters3&5 . . . 
LinePrinlers6&8. . . 
Daisy Wneel Printer 

(black) 

(brown, blue or red) 



.4 pk ribbons at $18.95 
. .3 pk reloads at $13.95 
. . 3 pk reloads at $11.95 

. 10 pk reloads at $24.95 
. 6 pk reloads at $24.95 



Line Printers 3 & 5 New ribbon & cartridge . 3 pk 24.95 
Epson MX-80/MX-80 F/T 3 pk reloads al $16.95 

LABELS 

1 Across (1 up) iabeis-5,000 in box-$l7.95 and down 

2 Across (2 up) iabels-10.000 in box$34.95 and down 

3 Across (3 up) labels- 15.000 in box -$51 .95 and down 

index Cards (3x5 after pmleeds tear off) 

3.000 in box • $29.95 

EPSON Primers ■ $ Call 

GAMES 

Model l/lll - 10-15% Off 

Big Five. Acorn. Adventure Intnat'l. 

Instant Sotlware. Library 100 

Model II YAHTZEE 

Deluxe Mtcro-Yahtzee Up to 4 players 
Grapnic Scoreboard - Graphic or numerical dice 
Bonus for multiple YahtzeeScore printoui option 
Model I or III disk $19.95 - Cassette $15.95 
Model II Disketie $24.95 ^ 190 

We ship daily - Anywhere in the World 
Stop by or write for complete price list! 

Quantity Discounts 

Free Freight (except labels)/ + $4 tor overseas 
We Accepi Masier Card/VISA/Amencan Express 
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Program Listing 3 Continued 



1400 IFM$="N"THEN1420 

1410 GOTO1380 

1420 CLS: PRINT "OK. COME BACK WHEN YOU'RE READY." : END 

1598 ■ 

1599 'update direction 

1600 IFD=1THENY=-10 
1610 IFD=2THENY=1 
1620 IFD=3THENY=10 
1630 IFD=4THENY=-1 
1640 B$=STR$(A(X+(Y*E) ) ) 
1650 IFD=1THEN1710 
1660 FORI=2TOD 
1670 B4=VAL(MID$(B$,4,1) 
1680 B6=VAL(MID$(B$,6,1) 
16 90 P=10000+B4*1000+B5*100+B6*10+B3 
1700 B$=STR$(P) :NEXT 

1710 RETURN 
2000 'array d 

2010 DATA1, 8 ,7, 14 ,2,8,8,20,3,7,10,23,4,10,8,29,5,10,10,38,6,10,1 

0,45 

3000 'array a 

3010 'maze one 

30 20 DATA0,0,0,0,0,0,0, 0,0, 0,0, 0,0,0,0 ,0,0, 0,0,0,0,0,0 ,0,0,0, 0,0 



:B5=VAL(MID$(B$,5,1) ) 
:B3=VAL(MID$(B$,3,1) ) 



3030 DATA11001, 11010, 1110 

11,11100,10111,11001,1001 

11,10100,11101,11001,10110,1 

00,10101,11011,10110,0,0 

3040 DATA10111, 10101, 10011, 110 

01,10010,11100,10101,10011,111 



,11011,11100,11011,11 

,11110,10101,10101,0, 

1,0,0,1 



rlt 



000,11100,0,0,100 
0,11101,10101,110 
0,11100,10011,101 



1,10000,11 
i, 11101, It 



010,11100,0,0,110 
,10011,11010,101 
0011,10010,10110,0,0,60,57,14,8,7 



'010,111 
101,1 



10,10011,11110,1 

3050 'maze two 

306 DATA0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 

3070 DATA11101, 11011, 11000, 11010, 11000, 11010, 11 

3080 DATA10011, 11010, 10000, 11110, 10011, 11010, 10 

3090 DATA11001, 11100, 10001, 111 00, 11001, 11110, 10 

3100 DATA10101, 10101, 10111, 10101, 10101, 11001, 10 

3110 DATA1000 0,10000, 11010, 10000, 10100, 10001, 11 

3120 DATA10101, 10111, 11101, 10101, 10101, 10011, 11 

3130 DATA10001, 11110, 10001, 101 00, 10011, 11110, 10 

3140 DATA10011, 11010, 10110, 10011 ,11010, 11110, 10 

77,20,8,8 

3150 'maze three 

3160 DATA11001, 11010, 11100, 11011, 11000, 11000, 11 

3170 DATA10000, 11100, 10111, 11101, 10101, 10101, 10 

3180 DATA10101, 10011, 11000, 10000, 10110, 10101, 11 

3190 DATA10011, 11100, 10111, 10111, 11001, 10010, 10 

3200 DATA11101, 10001, 11000, 11100, 10101, 11011, 10 

3210 DATA10011, 10110, 10101, 10111, 10001, 11110, 11 

3220 DATA11001, 11000, 10110, 11001, 10010, 11110, 10 

3230 DATA1 0101, 10101, 11101, 10101, 11011, 11000, 10 

0010,10100,100 01,11010,10100,11001,0,0,0,10111, 

,11110,10011,10110,0,0,0,10,86,23,7,10 

3240 'maze four 

3250 DATA11011, 11010, 11000, 11100, 11 001, 11010, 11 

1100,11001,11110,10101,10111,10011,11100,10101, 

,10101,11101,10011,11000,11010,10110,10101,1101 

00,10011,11000,10110,11001,11110,10001,11100,10 

3260 DATA10001, 11100, 10001, 11010, 10100, 11001, 10 

1100,10101,10111,10101,11011,10110,10101,10101, 

,10001,11010,10110,11101,11101,10101,10001,1011 

11,11010,11010,10110,10011,10110,10011,11010,10 

3270 DATA0 ,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 

3280 'maze five 

3290 DATA11001, 11010, 11100, 11011, 11100, 11001, 11 

1101,10100,11101,10001,1100 0,10110,10101,11001, 

,10101,10011,10110,10101,11101,10011,10100,1011 

01,11010,11000,10010,10110,11101,10011,11000,10 

3300 DATA1 0011, 11110, 10101, 11001, 11010, 101 00, 11 

0110,11001,11010,10100,10111,11011,10000,10110, 

,10101,11011,10110,11101,11101,10101,11011,1001 

01,11010,11000,10110,10011,10000,11000,11110,10 

3310 DATA10101, 11101, 10101, 11011, 11100, 10101, 10 

1110,10011,10110,10011,11010,10010,10110,10011, 

,10,29,38,10,10 

3320 'maze six 

33 30 DATA11001, 11000, 11010, 11100, 11001, 11100, 11 

1100,10111,10101,11101,10101,10111,10101,11001, 

,11000,10010,10110,10001,11000,10110,10101,1001 

01,11011,11000,10110,10011,11110,10011,11100,11 

3340 DATA1 0011, 11110, 10101, 11011, 11000, 11110, 11 

0101,11001,11010,10000,11110,10101,11101,10011, 

,10011,11110,10101,11001,10100,10011,11010,1000 

01,11010,10100,10111,10001,11010,11010,10100,11 

3350 DATA10011, 11100, 10011, 11110, 10101, 11101, 11 

1010,11011,10010,11010,11010,10010,10010,10110, 

,20,89,45,10,10 



100,11101,0,0 
100,10101,0,0 
001,10100,0,0 
110,10111,0,0 
010,11100,0,0 
100,10011,0,0 
101,11101,0,0 
011,10110,0,0,60, 



100,0,0 
111,0,0 
101,0,0 
100,0,0 
110,0,0 
101,0,0 
101,0,0 
110,0,0 
11011,1 



0,10001,1 
110,10011 



000,11110,11011,1 

11011,11100,10101 

1,10100,10101,101 



100,10111,10001,1 

11001,10110,10011 

0,11101,11101,100 



0,30,59,29,10,8 

110,11011,11100,1 

11000,10010,10100 

1,11101,10001,100 

1 

101,10101,11011,1 

10101,11001,11100 

0,10100,10111,100 



101,11001,10000,1 

10110,10011,11110 



011,11100,11011,1 

10000,11010,10100 

1,11110,10101,101 



101,10101,10111,1 

10100,11101,10101 

0,10110,10101,110 



101,10101,10011,1 

10011,11010,11110 



MX-80/100 OWNERS 

^■HHHHHH| PRINTER STANDS 

^P^^^^^^^^S*t End the mess of paper from your desktop 

^^SSSSSB^S ^J^ ^^^^^^^^^l printer. Paper is fed from under the printer 

^& J ^^^fef-, anc i a || 0weC j to stack neatly behind your 

machine. Made from the highest quality 
KMES clear plexiglass, this is a handsome addi- 

^^^mcw tion t0 home or office - Available in two sizes 

H^ 3 * .--^^BHlilfei 1 - Regular for printers such as MX-80, 

Microline80, etc. or Large for printers such 
as MX-100, DataRoyal, DWII etc. Available 
with extra shelf for quick and easy forms 
change. 

- -m— ■ iSi Regular (30001 0) 29.95 

""'"' l ^^^^^^' Regular w/shcif (300011) 44.95 

Shh^;; 1 Large (300020) 34.95 

™HMHMHffi |_ arge vv/shelf (300021 ) 49.95 




MX-80 RELOADS 

Reload your own MX-80 & MX-100 Ribbon Cartridges, and save money. These endless loop Silver Dollar Ribbon packs load into your worn cartridge 
easily, saving you money. Now available in Blue and Red. 



Black (500000) 
Red (500010). . 
Blue (500020) , 



$3.95 ea. 
4.95ea. 
.4.95 ea. 



Black (50000V 
Red (500011). 
Blue (500021) 



$39.50 doz. 
.49.95 doz. 
49.95 doz. 



MX-80 RIBBON CARTRIDGE 

Same as original cartridge, with the additional feature of "Mobis" loop which turns the ribbon 180° after each run through the cartridge extending rib- 
bon life. As you know MX-80 cartridges cost $15.00 from most sources, but these are only $10.95 each or save even more by buying 3 at $29.95. 



1 cartridge (500050) $10.95 



2 pack (50005V 



$29.95 



NEW — We now carry the DiGIAC MULTIUSER COMPUTER. Call for details on 
MULTIUSER Processing!! 




171 Hawkins Road 
Centereach, New York 1 1 720 







(516) 981 -8568 (Voice) Dealer Inquiries Welcome 
(516) 588-5836 (Data) A dd $2.00 s & h 

MNET-70331 , 1 05 NY * «*• odd app'- fox .300 



.See List ot Advertisers on page 402 
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APPLICATION 



(•a*) 



LOAD 80 



Use prime numbers to label the items in a DB. 



Priming the Data Base 



Stuart F. Ring 
106 Marble Drive 
Rochester, NY 14615 



I id you ever wonder how 
much you spent in a given 
month on house maintenance? 
Would you like a list of tax 
deductable family medical ex- 
penses? Create data files and 
search through them quickly for 
information on any topic or com- 
bination of topics, using num- 
bers formed as the products of 
prime numbers with this routine. 
A prime number is a number 
having no factor except itself 
and one: 2, 3, 5, 7 and 211 are 
prime numbers. 

Theory 

A product of a set of prime 
numbers is unique; no other set 
of prime numbers can form that 



The Key Box 

Basic Level II 
Model I or III 
16K RAM 
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product. For example, 2x3x5 
= 30 cannot be formed by mul- 
tiplying any other combination 
of prime numbers. 

File Creation 

To create files for fast se- 
quential searches, label each 
file record with a number which 
is the product of a set of prime 
numbers. Let this number repre- 
sent the topics in that record. 

Let's create a filing system 
for monthly expenses (see Fig. 
1). We label the data (in this case 
the dollar amount for monthly 
expense) with the product of 
prime numbers representing a 
topic. For example, let the prime 
number 2 be used for house ex- 
pense; let 3 represent a modifier 
(adjective) such as mainte- 
nance; and let 5 represent 
another modifier such as the 
month of July. Label record data 
with products of these prime 
numbers. The label for an expen- 
diture of $10 for house paint in 
July would be 2x3x5 = 30 and 
the file record would be Record 
Number 0-30-$10 (as in Fig. 1). 

By being inventive in assign- 
ing prime numbers to topics and 
modifiers, a single number can 
closely resemble a sentence de- 
scription of the record data. This 
is a very concise way to store 
information about a record. This 
compactness is especially 

1982 



useful for the home microcom- 
puter system, using minimal 
memory. 

The Search 

Having successfully labeled 
and stored the information, use 
the uniqueness of the prime 
number product to retrieve it. 
Divide each record label by the 
prime number representing the 
topic we wish to retrieve. If the 
result is an integer, the record 
label had that number as one of 
its factors and we have a match. 
If the result is not an integer 
there is no match. 

To search for items pertaining 
to combinations of topics, multi- 
ply the prime numbers for each 
search topic and its modifiers. 
Divide each label by the result- 
ing product; if an integer results 
we have a match for that combi- 
nation. If the result is not an in- 
teger there is no match and we 
continue our search through 
the file. 

Take our $10 expenditure for 
house paint with the prime 
number product 30 as an exam- 
ple. The prime number for hous- 
ing expenditures is 2; dividing 30 
by 2 gives the integer 15 and a 
match. If our search were for 
medical expenses with a topic 
prime number of 11, the result 
would not be an integer and we 
would not have a match. If our 



search were specifically hous- 
ing expenditures in July the 
search label would be 2 x 5 = 10 
and the search quotient (30 divid- 
ed by 10) would be the integer 3. 
Using the products of prime 
numbers to label data enables us 
to store all catagorizing in- 
formation in one double-preci- 
sion number, much more concise 
than word labels. Searches for 
combinations of topics are no 
more time-consuming than 
searching for data on a single 
topic. The accuracy of this pro- 
gram is limited by the accuracy 
of the search division. Round off 
or truncation errors will cause 
the process to fail. The Basic pro- 
gram in this article handles four- 
level description labels using 
TRS-80 Level II double-precision 
numbers. Be sure to test your ac- 
curacy before expanding this 
concept ad infinitum. Any cate- 
gorized information is a likely 
candidate for this approach. 

Program Operation 

The TRS-80 Level II Basic pro- 
gram included with this article is 
a data base of records of home 
expenses. As listed, it stores 500 
records consisting of a double- 
precision label, S#, and the data, 
S1. The program stores and re- 
trieves records from tape. When 
in use, all records are in memory. 

The program asks if you want 



to read the tape records, add 
new records to the file, search 
the file, or quit. 

The program requests up to 
four topics (prime numbers) and 
the dollar amount for the record 
to be added. To correct a record, 
call Fix; the program asks for 
the record number, prime num- 
ber product and dollar amount 
for the corrected record. This 
Fix routine assumes that you ar- 
rive at the Fix prime number pro- 
duct on your calculator, and that 
you use Fix because of a key- 
stroke error. If you expect to 
change records frequently, al- 
teration should be an element in 
the main menu. 

The Search portion of the pro- 
gram asks for up to four topics 
(prime numbers representing 
key-words). After the search is 
complete, a list of the results is 
displayed. This list includes the 
record number, product of the 
key-word prime numbers, the 
dollar amount, and a cumulative 
total of the dollar amounts. 

After adding records or 
searching your data base, Quit 
asks if you want to create a 
tape. The tape file is then com- 



pletely rewritten. It is good prac- 
tice to make one or more back- 
up copies. 

Table 1 lists the prime num- 
bers and their corresponding 
key-words. When a search is 
performed the topics, not the 
prime numbers, are listed. 
Change this table to suit your 
applications. 

The tape files created include 
a record count, and ten-record 
data blocks. This file structure 
reduces the number of relay ac- 
tuations and compresses the 
tape length. 

The multiple line calculation 
of the prime number product is 
necessary to prevent loss of sig- 
nificant digits during multiplica- 
tion. Check the accuracy of this 
product (and the division in the 
search process) if you change 
the number of search levels or 
expand the prime number (key- 
word) table. 

Do not overlook the power of 
the multi-level searches. Be cre- 
ative selecting topics and modi- 
fiers for your key-word list. It will 
take some experience to devel- 
op the most useful key-words for 
your application. ■ 



Record Number 

1 
2 
3 



Topic(s)/Label 

PN1xPN2xPN3xPN3 

PN4 

PN2xPN5 

PN1 xPN7xPN5 



Data 



Fig. 1. Monthly Expense File. 



2 


Sue 


97 




3 


Stu 


101 




5 


Matt 


103 




7 


Andy 


107 




11 


House 


109 




13 


Car 


113 




17 


Medical 


127 




19 


Dental 


131 




23 


Gasoline 


137 




29 


Gas 


139 




31 


Electricity 


149 


January 


37 


Water 


151 


February 


41 


Entertainment 


157 


March 


43 


Clothes 


163 April 


47 


Medicine 


167 


May 


53 Garbage 


173 


June 


59 Telephone 


179 


July 


61 


Insurance 


181 


August 


67 


Maintenance 


191 


September 


71 


Toys 


193 


October 


73 


Donations 


197 


November 


79 




199 


December 


83 




1 


Null 


89 








Table 1. Prime Numbers 


and Key Words. 



10 CLEAR: 

20 'PRIME NUMBER PRODUCT SEARCH ROUTINE BY S.F. RING 

30 CLS:PRINT "HOME DATA BASE":PRINT 

40 DIM S#(500) ,S1(500) ,PN(50) ,PA$(50) :DEPINT I-N 

50 PN(0)=2:PN(1)=3:PN(2)=5:PN(3)=7:PN(4)=11:PN(5)=13:PN(6)=17:PN 

(7)=19:PN(8)=23:PN(9)=29:PN(10)=31:PN(11)=37:PN(12)=41:PN(13)=43 

:PN(14)=47:PN(15)=53:PN(16)=59:PN(17)=61:PN(18)=67:PN(19)=71:PN( 

20)=73:PN(21)=79:PN(22)=83:PN(23)=89:PN(24)=97: 

60 PN(25)=101:PN(26)=103:PN(27)=107:PN(28)=109:PN(29)=113:PN(30) 

=127:PN(31)=131:PN(32)=137:PN(33)=139:PN(34)=149:PN(35)=151:PN(3 

6)=157:PN(37)=163:PN(38)=167:PN(39)=173:PN(40)=179:PN(41)=181:PN 

(42)=191:PN(43)=193:PN(44)=197:PN(45)=199:PN(46)=1 

70 PA$(0)="SUE":PAS(1)="STU":PA$(2)="MATT":PA$(3)="ANDY*:PAS(4)= 

"HOUSE":PAS(5)="CAR":PAS(6)="MEDICAL":PA$(7)="DENTAL":PA$(8)="GA 

SOLINE":PAS(9)="GAS":PA$(10)="ELECTRICITY":PAS(11)="WATER":PAS(1 

2)="ENTERTAINMENT":PA$(13)="CLOTHES": 

80 PA$(14)="MEDICINE*:PA$(15)="GARBAGE":PA$(16)="TELEPHONE":PA$( 

17) =" INSURANCE" :PA$( 18) ="MAINTAINANCE" : PA$ ( 34) =" JANUARY": PAS (35) 
="FEBUARY":PA$(36)="MARCH":PA$(37)="APRIL":PA$(38)="MAY":PA$(39) 

="JUNE":PA$(40)="JULY":PA$(41)="AUGUST" 

90 PAS ( 42) ="SEPTEMBER" : PAS ( 43 ) ="OCTOBER" : PAS (44) ""NOVEMBER" : PAS ( 

45)="DECEMBER":PA$(46)="NULL":PAS(19)="TOYS":PA$(20)="DONATIONS" 

100 INPUT "DO YOU WISH TO READ IN DATA? YES OR NO";D$ 

110 IF DS="NO" GOTO 170 

120 INPUT "HIT ENTER WHEN RECORDER IS READY" ;DS 

130 INPUT #-l,N 

140 FOR 1=0 TO N STEP 10 

150 INPUT #-l,S#(I) ,S1(I) ,S#(I+1) ,S1(I+1) ,S#(I+2) ,Sl(I+2) ,S#(I+3 

) ,Sl(I+3) ,S#(I+4) ,Sl(I+4) ,S#(I+5) ,Sl(I+5) ,S#(I+6) r Sl(I+6) ,S#(I+7 

) ,Sl(I+7) ,S#(I+8) p Sl(I+8) ,S#(I+9) ,Sl(I+9) 

160 NEXT I 

170 CLS:INPUT "DO YOU WISH TO ADD DATA, SEARCH, OR QUIT? 

ENTER 'ADD', 'SEARCH', OR 'QUIT'";A$ 
180 IF AS="ADD" GOTO 470 
190 IF A$="SEARCH" GOTO 230 

200 IF AS="QUIT" GOTO 650 

210 GOTO 170 

220 'SEARCH ROUTINE 

230 CLS: PRINT "SEARCH" : PRINT 

240 RESTORE:DS="NO" 

250 DATA 1,1,1,1: READ N1,N2,N3,N4 

260 INPUT "ENTER UP TO FOUR TOPICS" ; Nl ,N2,N3 ,N4 

270 P1#=N1*N2 

280 P2*=N3*N4 

290 PS=P1#*P2# 

300 NR=0: SM=0: CLS: 

310 GOSUB 840 

320 PRINT "SEARCH TOPICS ":PRINT:PRINT Q1S,Q2S,Q3S,Q4$:PRINT 

330 PRINT "RECORD", "PRODUCT", "S AMOUNT", "S SUM" 

340 FOR 1=0 TO 499 

350 IF S1(I)=0 GOTO 430 

360 RS#=S#(I)/P* 

370 IF (RS*-FIX(RS*)) <> THEN NEXT I 

380 NR=NR+1 

390 SM=SM+S1(I) 

400 PRINT I,S#(I) ,S1(I) ,SM 

410 NEXT I 

420 GOTO 440 

430 PRINT "THAT'S ALL" 

440 INPUT "ENTER 'EXIT' IF YOU ARE FINISED ELSE HIT 'ENTER' ";DS 

450 IF DSO'EXIT" GOTO 230 ELSE GOTO 170 

460 'ROUTINE TO ADD MORE FILE DATA 

470 CLS: PRINT "ADD DATA": PRINT 

480 DS="NO" 

490 FOR 1=0 TO 499 :'FIND LAST RECORD 

500 IF S1(I)=0 THEN 11=1 ELSE NEXT I 

510 READ N1,N2,N3,N4:DATA 1,1,1,1 

520 RESTORE 

530 PRINT:INPUT "ENTER UP TO FOUR TOPICS FOR EACH RECORD" ;N1 ,N2 , 

N3,N4 

540 INPUT "ENTER DOLLAR AMOUNT" ; SI ( II) 

550 P1#=N1*N2 

560 P2#=N3*N4 

570 S#(I1)=P1#*P2# 

580 PRINT "THIS IS RECORD NUMBER ";I1 

590 11=11+1 

PRINT "ENTER 'FIX' IF YOU NEED TO CORRECT A RECORD" 

INPUT "ENTER 'EXIT' IF FINISHED ELSE HIT 'ENTER' ";DS 

IF DS="FIX" GOSUB 770 

IF DSO"EXIT" GOTO 510 ELSE GOTO 170 

'QUIT ROUTINE - SAVE THE DATA 

CLS:INPUT "DO YOU WANT TO SAVE THE DATA";Xl$ 

IF X1$="YES" THEN GOTO 670 ELSE END 

FOR 1=0 TO 499: 'FIND LAST RECORD 

IF S1(I)=0 THEN B=I ELSE NEXT I 

N=FIX(B/10)*10 + 10 



600 
610 
620 
630 
640 
650 
660 
670 
680 
690 

700 INPUT "SAVE DATA - HIT ENTER WHEN THE TAPE IS READY";DS 

710 PRINT #-l,N 

720 FOR 1=0 TO N STEP 1 

730 PRINT #-l,S*(I) ,S1(I) ,S#(I+1) ,S1(I+1) ,S# ( 1+2) ,S1 (1+2 

) ,Sl(I+3) ,S#(I+4) ,Sl(I+4) ,S#(I+5) ,Sl(I+5) ,S#(I+6) ,Sl(I+6 

) ,Sl(I+7) ,S#(I+8) ,Sl(I+8) ,S«(I+9) ,Sl(I+9) 

740 NEXT I 

7 50 END 

760 'ROUTINE TO REPAIR A RECORD 

770 CLS: PRINT "FIX ROUTINE" 

780 INPUT "ENTER RECORD NUMBER"; IK 

790 PRINT "NUMBER", "PRODUCT", "AMOUNT" 

800 PRINT IK,S#(IK) ,S1(IK) 

810 INPUT "ENTER NEW PRODUCT, AMOUNT" ;S# (IK) ,S1 ( IK) 

820 DS="GO" 

830 RETURN 

840 FOR K=0 TO 50 

850 IF N1=PN(K) THEN Q1S=PA$(K) 

860 IF N2=PN(K) THEN Q2S=PAS(K) 

870 IF N3=PN(K) THEN Q3$=PAS(K) 

880 IF N4=PN(K) THEN Q4$=PA$(K) 

890 NEXT K 

900 RETURN 



) ,S#(I+3 
,S#(I+7 



Program Listing 
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GAME 



<*^1> 



LOAD 80 



Author Boothe is up to his graphic tricks again. 



Save All Humans 



The Key Box 

Basic Level II 
Model I or III 
16K RAM 



Bob Boothe 

4651 Browndeer Lane 

R.H.E., CA 90274 



If irst saw a game similar to this 
on a Wang computer at a com- 
puter show. The animation was 
very well done, so I decided to 
experiment with the TRS-80's 
block graphics. 

The program takes about 
twenty seconds to initialize the 
strings representing the running 
men, the ship and the enemy 
saucer. 



The game uses your skill level 
(from to 100) to compute the 
number of ships, the number of 
enemies and the size of the 
enemy ships. You get one to 
seven ships to fight 10 to 30 
enemies in six different enemy 
vessels. 

Your object is to protect the 
humans from the attacking fly- 
ing saucers. Move your ship 
with the left and right arrows, 
and fire with the spacebar. 

Four figures make up each 
step of the runner. Either pause 
the game while the men are run- 
ning or break the program and 
Print G$(1), G$(2), G$(3), G$(4) to 



see each figure. Lines 420 to 590 
contain graphics data for the 
figures. Lines 610 to 700 con- 
catenate the data into string 
variables and lines 720 to 820 
display the running figures. 

Control characters 24, 25, 26, 
27 move the cursor without de- 
stroying characters. Three se- 
quences of four graphics char- 
acters, a CHR$(26) (moving the 
cursor vertically down one line) 
and four CHR$(24)'s (back- 
spaces) make up each figure. 

Lines 320 to 360 combine ran- 
dom graphics blocks into a rec- 
tangle and repeat several rec- 
tangles on top of each other to 



produce the explosion. Prob- 
lems arise when the strings print 
over any edge of the screen; I 
treated the human at the right 
edge separately. 

When all of the humans are 
killed the program clears the 
string space and packs strings 
into circle patterns. Wait about 
forty seconds and the program 
will display its work, or press 
Enter to play another game. 

I used integer Basic, variables 
instead of constants and made 
multi-statement lines, but the 
game still moves rather slowly. 
A compiled version of the pro- 
gram might be challenging. ■ 



Program Listing 



100 ' THIS PROGRAM WAS WRITTEN BY BOB BOOTHE 

110 ' 4651 3R0WNDEER LANE 

120 ' DATE = JULY 25, 1981 R. H. E., CA 90274 

130 REMBRANDT WAS A PAINTER 

140 CLEAR 2000:CLS 

150 DEFINT A-Z:F3=15360:TT=2000:T2=32 

160 INPUT"WHAT IS YOUR RATING (0=REALLY BAD, 100=ACE)";R 

170 IFR<0ORR>100THENR=50 

180 PRINT@128,"YOUR DUTY IS TO PROTECT THE POPULATION OF THIS PL 

ANET FROM AN" 

190 PRIKT"INVASION FROM OUTER SPACE. YOU WILL BE GIVEN A SMALL 

FLEET OF" 

200 PRINT"FLYING SAUCERS KITH WHICH YOU MUST DESTROY THE LARGER 

ENEMY" 

210 PRINT"FLEET. THE ENEMIES ARE RANDOMLY BOMBINC THE PLA.1ET FR 

OM ABOVE." 

220 PRINT"YOUR SHIP WILL BE AT BOTTOM. TO MOVE YOUR SHIP, HOLD 

DOWN THE" 

230 PRINT"ARROW KEYS. THE SPACE BAR IS USED TO FIRE. REMEMBER, 

YOUR JOB" 

240 PRINT" IS TO PROTECT THE HUMANS BELOW YOUR SHIP. — GOOD LUCK 

250 TS=INT ;(100-R)/15)+l:TE=INT(R/5)+10 

260 IFR<40THENE$=" "+CHRS (1 84) +CHR$ ( 190 ) +CHR$ (191 ) +CHR$ (188) +CHR 

$(144)+" ":GOTO290 

270 IFR<70THENE$=" "+CHRS ( 1 84 ) +CHR$ ( 190) +CHRS (189) +CHR$ (180) +" " 

:GOTO290 

280 II'RND(4)=1THENE$ = " "+CHR$ (181) +CHR$ (1 91 ) +CHR$ (186) +" ":ELSE 

IFRND(3)=1THENE$=" "+CHR$ ( 157) +CHR$ ( 140) +CHR$ ( 174) +" ":ELSEIFRN 

D(2)=1THE!1E$ = " "+CHR$ ( 153) +CHR$ ( 140) +CHR$ (166) +" ":ELSEE$=" " + 

CHR$(i87)+CHR$(140)+CHR$(183)+" " 

290 PRINT00, "HUMANS REMAINING = YOUR SHIPS = ENEMY SHIP 

S = 0" 

300 TH=13 

310 PRINT@36,TS;:PRINT@54,TE; 

320 F0RQ=lTO6 : RESTORE : FORE=lT04 : F0RK=lTO4 : READG : X$=X $+CHR$ (C) : NE 

XT:X$=X$+STRING$(4,24) :NEXT:NEXT:>:$=" "+X$+" 

330 DATA 145,137,32,145, 160,129,150,144, 134,134,160,164, 136,1 

76,137,138 

340 A=4:FORQ=1TO8:GOSUB1710:HX$=HX$+A$+CHR$(26) :GOSUB1710 :HX$=HX 

$+A$+CHF$(26) :GOSUB1710:HX$=HX$+A$+STRING$(2,27) :NEXT 

350 HX$=HX$+" "+STRING$(4,24)+CHRS(26)+" '+STRINGS ( 4 ,24) +C 

HR$(26)+STRING$(4,176) 



360 A=3:FORQ=1TO10:GOSUB1710:SH$=SH$+A$+CHR$(26) :GOSUB1710:SH$=S 

H$+A$+CHR$(26) :GOSUB1710:SH$=SH$+A$+STRING$(2,27) :NEXT 

370 SH$=SH$+" "+STRING$(3,24)+CHR$(26)+" "+STRING$(3 , 24) +CHR 

$(26)+STRING$(3,176) 

380 MI(1)=63:MI(2)=191:MI(3)=319 

390 MA(1)=122:MA(2)=250:MA(3)=37 8 

400 S(1)=TT:S(2)=TT:S(3)=TT 

410 EL(1)=TT:EL(2)=TT:EL(3)=TT 

420 DATA 32, 32, 32, 32 

430 DATA 32, 32, 32, 32 

440 DATA 176,176,176,176 

450 DATA 32, 32,136,156 

460 DATA 32,160,186,191 

470 DATA 178,179,184,190 

480 DATA 32, 32,172,132 

490 DATA 32, 32,191,149 

500 DATA 184,190,184,190 

510 DATA 32,136,156, 32 

520 DATA 32,174,191,132 

530 DATA 184,190,186,177 

540 DATA 32,172,132, 32 

550 DATA 32,191,149, 32 

560 DATA 187,191,176,176 

570 DATA 32,172,132, 32 

580 DATA 135,191,151,133 

590 DATA 184,181,189,176 

600 DIM G$(5) 

610 FOR F=0TO5 

620 FOR L=0TO2 

630 FOR B=1T04 

640 READ C 

650 G$(F)=GS(F) +CHR$(C) 

660 NEXT 

670 IFF=1ANDL<>2THENG$(F)=G$(F)+" "+CHRS ( 26) +STRING$( 5 ,24) :GOT06 

90 

680 IF L<>2THENG$(F)=G$(F)+CHR$(26)+STRING$(4,24) 

690 NEXT 

700 NEXT 

710 PRINT@960,STRING$(63,176) ; :SET(126,47) :SET(127,47) 

720 FOR M=1T012 

730 PRINT@18,M; 

740 FL=827+M*5 

750 SL=890:IFINT(M/2)=M/2THENSL=SL-1 

Program continues 
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Program continued 

760 FOR P=SLTOFLSTEP-2 

770 FOR F=1T04 

780 PRINTf3P,G$(F) ; 

790 NEXT 

800 NEXT 

810 PRINT@FL,GS(5) ; 

820 NEXT 

830 PRINT@18,13; 

840 PRINT@892,LEFT$(G$(5) ,4) ; 

850 PRINT@956,MIDS(GS(5) ,10,4) j 

860 PRINT@1020,MID$(GS(5) ,19,3) j 

870 PRINT@64," " :F0RQ=1T07: PRINT:NEXT 

880 SL=7 96:S$=" "+CHRS(156) +CHRS(156) +CHR$(191) +CHR$(172) +CHR$(1 

72)+" " 

890 FOR ES-1T03 

900 IFSL-0THENPOPC+1:PRINT@36,TS-1;:IFPC<12THEN970ELSEPC=0!TS=T 

S-l : SL=796 : IFTS=0THEN1520 

910 K=PEEK(15168) : IFKANDT2THENSL=SL-1 

920 IFKAND64THENSL=SL+1 

930 IFSL>826THENSL=826 

940 IFSL<767THENSL=767 

950 PRINT@SL,S$; 

960 Z$=1NKEY$:IFZ$=" "TKENIFB=<64THENB=SI,-61: IFPEEK(B+F3) OT2THE 

N1150ELSEPOKEB+F3 ,191 :GOTO980 

970 IFB>63THENPOKEB+F3,T2:B=-B-64:IFB>63THENIFPEEK(B+F3)OT2THEN1 

170ELSEPOKEB+F3,191 

980 IF TE<3THENIFEL(ES)=TTTHEN1050ELSE1000 

990 IFEL(ES)=TTTHENEL(ES)=RND(2)*1000-1000:GOTO1010 

1000 EL(ES)=EL(ES)+D(ES) 

1010 IFEL(ES)<HI(ES)THENEL(ES)=MI(ES) :D(ES)=1 

1020 IFEL(ES) >MA(ES)THENEL(ES)=MA(ES) :D(ES)=-1 

1030 IFRND(30)=1THEND(ES)=-D(ES) 

1040 PRINT@EL(ES) ,E$; 

1050 SW=SW+1:IFSW<3THEN1140 

1060 FORQ=lT03:IF(S(Q)>959)ANDi 

1070 NEXT 

1080 IFS(1)>959THENIF(EL(2)<ELI 

<EL(1)+2460REL(3)>EL(1)+266)THENS(1)=EL(1)+67:IFPEEK(S(1)+F3)OT 

2THENS(1)=TT:GOTO1100ELSEPOKES(1)+F3,191:GOTO1100 

1090 IFS(1)<960THENPOKEF3+S(1) ,T2:S(1) =S (1) +64: IFPEEK (F3+S(l) )<> 

T2THEN1200ELSEPOKES ( 1 ) +F3 , 191 

1100 IFS(2)>959THENIF(EL(3)<EL(2)+1220REL(3)>EL(2)+134)THENS(2) = 

EL ( 2) +67 : IFPEEK ( S ( 2) +F3) OT2THENS (2) =TT: GOTO1120ELSEPOKES ( 2) +F3 , 

191:GOTO1120 

1110 IFS(2)<960THENPOKEF3+S(2) ,T2:S (2) =S(2) +64: IFPEEK (F3+S( 2) ) <> 

T2THEN1230ELSEPOKES ( 2) +F3 ,191 

1120 IFS(3)>959THENS(3)=EL(3)+67:IFPEEK(S(3)+F3)OT2THENS(3)=TT: 

GOTO1140ELSEPOKES(3)+F3,191:GOTO1140 

1130 IFS(3)<960THENPOKEF3+S(3) ,T2:S(3) =S(3) +64:IFPEEK(F3+S(3) ) <> 

T2THEN1260ELSEPOKES(3) +F3,191 

1140 NEXT:GOTO890 

1150 POKEB+F3 , T2 : IFS ( 1 ) =BTHENS ( 1 ) =TTELSEIFS (2) =BTHENS ( 2) =TTELSEI 

FS(3)=BTHENS(3)=TT 

1160 B=0:GOTO980 

1170 POKEB+F3 ,T2 : IFS ( 1 ) =BTHENS ( 1 ) =TT:GOTO1160ELSEIFS ( 2) =BTHENS ( 2 

)=TT:GOTO1160ELSEIFS(3)=BTHENS(3)=TT:GOTO1160 

1180 TE=TE-1:PRINT@54,TE;:PRINT@EL(INT((B+100)/128)) ,X$; : IFTE=0T 

HEN1340 

1190 EL(INT( (B+100)/128) ) =TT:B=0:GOTO980 

1200 POKES (1)+F3, 191 : IFS(l) =BTHENPOKES (1) +F3 ,T2:S(1) =TT:B=0:GOTO 

1100 

1210 IFS(1)>767ANDS(1)<832THENPRINT@SL,X$;:S(1)=TT:SL=0:GOTO1120 

1220 BN=1:GOSUB1290:GOTO1100 

1230 POKES(2)+F3,191:IFS(2)=BTHENPOKES(2)+F3,T2:S(2)=TT:B=0:GOTO 

1120 

1240 IFS(2)>767ANDS(2)<832THENPRINT@SL,X$;:S(2)=TT:SL=0:GOTO1140 

1250 BN=2:GOSUB1290:GOTO1120 

1260 POKES(3)+F3,191:IFS(3)=BTHENPOKES(3)+F3,T2:S(3)=TT:B=0:GOTO 

1120 

1270 IFS(3) >767ANDS(3) <832THENPRINTgSL,XS; :S (3) =TT:SL=0:GOTO1140 



S(Q)<1024)THENPOKES(Q)+F3,176 

1 ) +1220REL ( 2) >EL ( 1 ) +13 4) AND ( EL ( 3 ) 



1280 BN=3:GOSUB1290:GOTO1140 

1290 DL=S(BN) :IFDL>959THENRETURN 

1300 TH=TH-1:PRINT#18,TH; 

1310 S(BN) =TT:IFDL>895THENDL=DL-64 

1320 DL=DL-832:DL=INT(DL/5)*5+832:IFDL<892THENPRINT@DL,HXS;:IFTH 

=0THEN1720ELSERETURN 

1330 POKE16319,T2:PRINT@DL,SH$; : IFTH=0THEN1720ELSERETURN 

1340 FORQ=1TO3:IFS(Q)>0ANDS(Q) <960THENPOKES (Q) +F3 ,T2 

1350 NEXT 

1360 PRINT@SL," "; 

1370 PRINT@257," * * * * YOU HAVE SAVED THE WORLD FROM DESTRUC 

TION * * * *"; 

1380 PRINT@404, "THE HUMANS JUMP FOR JOY"; 

1390 R=R+TH*3-3+TS*TS:IFR>100THENR=100 

1400 PRINT@516,"YOUR NEW RATING IS";R;" PRESS <ENTER> TO PLAY A 

GAIN" 

1410 S=896 :FORL=lTOTH 

1420 IFPEEK(S+F3)=135THENJ(L)=S-128:S=S+5ELSES=S+5:GOTO1420 

1430 NEXT 

1440 J$=" "+CHR$(176)+CHR?(14 4)+CHR$(26)+STRING$(3,24)+CHRS(141) 

+CHR$(190)+CHRS(156)+CHR?(133)+CHRS(26)+STRING$(4,24)+CHRS(152)+ 

CHRS(131)+CHR$(137)+CHRS(14 4)+CHR$(26)+STRINGS(4,24)+STRING$(4,1 

76) 

1450 GS(5)=" "+CHR$(26)+STRINGS(4,24)+GS(5) 

1460 J=RND(TH) 

1470 PRINTgJ(J) ,J$; 

1480 F0RQ=1T0145:NEXT 

1490 PRINT@J(J) ,GS(5) ; 

1500 Z$=INKEY$:IFZ$OCHR$(13)THEN1460 

1510 RUN 

1520 FCRQ=1TC3:IFS(Q) >0ANDS(Q) <960THENPOKES (Q) +F3 ,T2 

1530 NEXT:PRINT@263 , "YOUR ENTIRE FLEET OF SHIPS HAS BEEN DESTROY 

ED" 

1540 PRINT@399,"THE SURVIVORS RUN FOR SHELTER"; 

1550 R=INT(R*.9)-TE:IFR<0THENR=0 

1560 PRINT@523,"YOU HAVE BEEN DEMOTED TO A RANK OF", -P.; 

1570 PRINT@590, "PRESS <ENTER> TO REDEEM YOURSELF" 

1580 F0RM=1T013 

1590 IFPEEK(16251+M*5) O135T11EN1690 

1600 SL=826+M*5:IFM=13THENSL=SL-1 

1610 FL=833:IFM=1THEN1690 

1620 FORP=SLTOFLSTEP-2 

1630 F0RF=1T04 

1640 PRINT@P,GS(F) ; 

1650 NEXT 

1660 NEXT 

1670 PRINT@FL,G$(0) ; 

1680 TH=TH-1:PRINT@18,TH; :NEXT 

1690 NEXT 

1700 Z$=INKEY$:IFZ$=CHR$(13)THENRUNELSE1700 

1710 A$="":F0RW=1T0A:A$=A$+CHRS(128+RND(63) ) : NEXT: A$=A$+STRINGS ( 

A, 24) :RETURN 

1720 PRINT@268,"THE ENTIRE POPULATION HAS BEEN DECIMATED"; 

1730 PRINT@396,"tHE PLANET KILL BE DESTROYED IN 40 SECONDS"; 

1740 R=INT(R*.9)-TE:IFR<0THENR=0 

1750 PRINT@528,"YOUR RANK HAS BEEN LOWERED TO";R; 

1760 PRINT@591, "PRESS <ENTER> TO PLAY ANOTHER GAME"; 

1770 CLEAR:DIMCS(6) 

17 80 F0RR=1T06 

1790 SX=0:SY=R:LX=0:LY=0. 

1800 F0RT=.1T06.4STEP1/R 

IFLX<SXTHENCS(R)=C$(R)+CHR$(25) : LX=LX+1 :GOTO1810 
IFLX>SXTHENC5(R)=CS(R)+CHR$(24) : LX=LX-1 :GOTO1820 
IFLY<SYTHENC5(R)=CS(R) +CHRS(26) :LY=LY+1 :GOTO1830 
IFLY>SYTHENC$(R) =C$(R) +CHR$(27) : LY=LY-1 :GOTO1840 
CS(R)=CS(R)+CHR$(128+RND(63))+CHRS(24) : SY=INT (COS (T) *R) :SX= 
SIN(T) *R*5) :NEXT 
Z$=INKEY$:IFZ$=CHR$(13)THENRUN 
NEXT 

CLS : F0RR=1T06 : PRINT@4 80 ,C$ (R) ; : NEXT 
ZS=INKEYS:IFZ$=CHR$(13) THENRUN 
GOTO1880 



1810 
1820 
1830 
1840 
1850 
INT( 
1860 
1870 
1880 
1890 
1900 



O KIDATAMicroline 82A 

Serial Dot Matrix Printer 




120 ops Bidirectional 
80 Column 



SG^C 



Microtme pontes are selling ihe quality standards lor the 
entire industry Built on a cast alumnum Dasc and dnvo:'. 
by two motors, these rugged units will run all day with no 
duty cycle limitations The head warranty eqmvaieni to 
200.000.000 characters, is unmatched in the industry 



Standard Features 

I Operates wtlh TRS-90'". APPL£ ' . others 
t 132 columns with condensed characters 
> Graphics 
t Oual interfaces 



i Plain paper- up to 4 parts 
i Full 96 character ASCII set 
i Double width c 



HIGH TECHNOLOGY AT AFFORDABLE PRICES 



\-®m 



TOC 



^302 



MODELS I & III 

DISK BASIC PROGRAMS 

RANDOM ACCESS PAYROLL VER. 1.1 



rsr 



SALARIED or hourly 
SPECIAL PAY— special hours 
TWO SAVINGS— including RIA 
CLASSED by occupation or depi 
PAYSTUB shows Year-to-Dale 



• No complicated initialization 

• EDIT & LIST 

• NO SPECIAL CHECKS 

• USES NEB 9020 checks 

• PAY any employee anytime 

• STATE-FICA— FED. TAXES-SAVINGS 

SEND YOUR STATE TAX SCHEDULE- 
FREE— customized to your state tax 

Documenlation $10 00 
Disk & Documentation $95 00 

RANDOM ACCESS DEPRECIATION 

• LISTS any one year's depreciation 

• OR complete list ol all properly 

• PRINTOUT shows— ID Number— description— 

• Yr. purchased— life — method— 
1st yr additional depreciation— 

• Reg. deprec— deprec. prior yrs— balance 

• SUMMARY— total value prop— additional 1st yr. 

• REGULAR deprec —deprec prior yrs 

• PERMANENT records tor your taxes 

Documentation $15.00 

Oisk S Documentation $195.00 

MIN:32K— 1 DISK — PRINTER/132 CPI 

TERMS: Personal checks require 3 weeks to clear. 

USE— VISA— MASTER CHARGE-MONEY ORDERS 

TEL 7 PM-9:30 PM EASTERN— (617) 369-2364/6370 

SEND: SASE tor additional information 

MEDFIELD COMPUTER SOFTWARE 

39 GREEN ST.. MEDFIELD, MA 02052 ^215 



FILE FORCE 

A Disk File Program Designed for the Small Businessman 

File Force Is designed to readily keep track ol all your business tiles 
and programs by utilizing all the power ot your TRS-80 and Disc 
Basic. This program is specially designed to combine the power of a 
disk utility, the speed of random access, and the ease of use of a 
general database manager 

File Force will automatically read the information on your disks and 
allow you to search the masterfile by: 

the name of the disk 

the name of a program 

the name of a business file 

any extension, such as a date. CMD 

Other special features include easy updating. Where some software 
houses have protected their disks to make them unreadable. File 
Force will let you assign a disk name and enter those program 
names It will also create a master printout of all business files and 
records on your disks, for safe keeping and better management of 
your resources. 

System Requirements: TRS-80 Model I. 48K. One Disk Drive: 
TRS-DOS Version 2.3. S19.95. Please add 52 for handling and 
postage: $5 overseas: for your convenience you may phone in VISA 
or M/C orders. 

SOFTWAREHOUSE INTERNATIONAL 

We've Moved! P.O. Box 1383 * Tandy Corp 
Clovis, CA 93613; (209) 251-7877 
In Australia: Computer Campus; Kent Town, S.A. 5067 
Phone; 08.42 4826. 



• See List ol Advertisers on page 402 
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HARDWARE 



64K of RAM for the Color Computer. 



RAM Wars 



Shawn A. McClenahan 
11347 Emelita Street #4 
North Hollywood, CA 91601 



The TRS-80 Color Computer 
has a major shortcom- 
ing—a limited amount of RAM 
memory. With piggy backing 
RAM chips or inserting Spectral 
Associates' innovative Ram- 
charger board you can expand 
the memory from a dismal 4K to 
a comfortable 32K bytes. How- 
ever, piggy backing takes care- 
ful soldering skills, perhaps the 
ingenious use of single pin 
sockets fashioned from 16 pin 
IC sockets for the Row Address 
Strobe (RAS) line connections, 
and a muffin fan atop the case 
to forestall overheating. Instal- 
ling Spectral's excellent board 
depends on how carefully Tandy 
put the IC sockets on the main 
board. I went through four Tan- 
dy boards, and the sockets were 
not properly aligned on any. If 
you have successfully imple- 
mented one of the above modifi- 
cations, the efficient code and 
memory handling of the 6809 
MPU allows your 32K to ap- 
proach the 48K of some other 
machines. But, considering the 
derision of some 48/56/64K ma- 
chine users, many Color users 



The Key Box 

Color Computer 



seek ever more RAM. Some are 
never satisfied. Thus the "RAM 
Wars" began. 

Fearlessly I answered the call 
to battle and took a Spectral As- 
sociates 8K Eprom board, 

MC6883 SAM 



RUN JUMPER FROM 
PIN 35 TO OLD RAM 
*5V LINE 



changed eprom pin 21 to the 
R/W* line and mounted four 200 
nanosecond (nsec) TMM2016, 
2K by 8 static RAM chips, 
mapped from &HC000 to 
&HDFFF. This is for an adapta- 



tion of TSC's FLEX 9.0 DOS and 
is mounted on my 12 slot expan- 
sion board. I used the fast static 
chips to allow faster, address 
dependent, clock speed (POKE 
65495,0 or LDX #$FFD7; STA, X), 



JUMPER FROM 0L0 -5V TO 
+5V FROM PIA's (MAY BE 
ELIMINATED IF USING 
MCM6665 OR 4I64'| 




REMOVE THE ABOVE CAPACITORS FROM THE *5V LINE 




-CUT +5V LINE JUST BEFORE OLD C6I 
CONNECTION AND RUN JUMPER FROM 
♦ 5V POWER LINE TO OLD *I2V LINE 



Fig. 1A 



MC6883 SAM 



MC682I PIA s 
LI4II/0) U8IKY8RD) 



RAM PIN OUTS 



PIN 35/D 



-5V *ISEE NOTE) 



°/ 
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Fig. 1B 



156 • 80 Microcomputing, March 1982 



and a minimum of hardware. I 
have heard of some putting 8K 
RAM in the Extended Basic 
ROM memory area and using 
the address decoder disable bus 
pin (SLENB* pin 40) to switch 
between RAM and ROM. With 
32K below that you have 40K of 
contiguous memory. 

If you put another 16K RAM 
on the external bus, you can 
have 56K. This large amount of 
external hardware places an 
added load on the Color Com- 
puter's none too massive power 
supply. The solution is to add an 
external power supply. 

Enter into the battle the avail- 
able-for-free-just-for-the-asking 
Motorola MC6883 SAM informa- 
tion sheet. Ever since I read 
those two 32K byte pages of 
RAM were possible in lower 32K 
memory I have lusted for the 
answer. It was obvious that 64K 
RAM chips were necessary (use 
dynamic chips in the Color Com- 
puter). Change a few traces (the 
64K chips use only +5V and 
need one more address line) and 
remove the capacitors from 



what used to be the + 5V line (it 
becomes the new address line 
MA7). See Fig. 1. If you modified 
the video display for dual 32K 
RAS, return it to the original con- 
figuration as you are back to 
just one RAS line again. This 
means you can put a video 
display anywhere in the 64K 
RAM area. Plus, the 64K chips 
use less power than the 16K. 
Trace changes are for the A-B 
series of boards. The E series 
has three jumpers that can be 
changed easily for 64K chips. 
But it is not that simple. Ac- 



cording to a Motorola warning 
the MC6883 must be set for the 
RAM size chips you are using 
before you write to any RAM. 
Since the Color Computer writes 
to lower RAM as part of the ini- 
tialization process, it seems 
prudent to ensure it knows it has 
64K RAM chips buried within. If 
you do not, it is unlikely the 
chips will be destroyed, but 
refresh will not be proper and 
you will lose data on reset. 

You cannot change the Basic 
ROM but you can fool the ma- 
chine into seeing something it 



thinks came from the ROM. In 
the Color Computer the ROM on 
powerup or reset configures the 
two MC6821s (PIAs), clears 
&HFF22 and then steps through 
the even MC6883 SAM control 
registers (STA ,X+ +) clearing 
them as an added precaution on 
powerup and to reinitialize the 
system on reset. After this the X 
register contains &HFFEO. Next 
it ANDs the contents of &HFF22 
(ANDA#4, the A register contain- 
ing the contents of &HFF22 
from a previous LDA 2,X). If the 
memory size jumper is grounded 



• Remove the motherboard from the case and detach the ground shield. 

• Cut the + 5V trace just under chip U27 (arrow). 

• Cut the + 12V trace where it crosses over the right side of the keyboard connectors. 

• Cut the - 5V line just after the bump, or disable entirely by removing R67 (1 .2K ohms) at the far lower left side of the board. 

• Remove capacitors C45, 70, 48, 67, 35, 64, and 31 from the top of the board. C61 may be left in place. 
There may be two holes in this area that you can use. 

• Scrape the green film from the area indicated by the up arrow, and then solder a jumper from the +5V line to the old + 12V line. 

• Drill a hole just large enough to pass a 33 ohm resistor lead through (#58 drill— .042") right below the screwhole to the left (from 
the bottom) of the MC6883 SAM. Check to make sure no traces are cut and that you clear the plastic post underneath the board. 
Solder one end of the 33 ohm resistor into the hole formerly occupied by C48 on the old + 5V line. Pass the other end through the 
hole and solder an insulated wire from that end to the pin 35 pad of the SAM. Make sure the lead will not interfere with the reinstalla- 
tion of the RF ground shield. 

• With the most commonly available 64K RAMs pin 1 need not be connected to anything. However, some chips need + 5V. If after 
checking the specifications for your chips you find you need + 5V on pin 1 , solder a jumper from the old -5V line to + 5V line at dou- 
ble arrows. 

• Re-install ground shield and motherboard in case. 

Fig. 1 



CONVERT YOUR SERIAL PRINTER TO PARALLEL 



NEW MODEL UPI-3 SERIAL PRINTER INTERFACE MAKES IT 
POSSIBLE TO CONNECT AN ASCII SERIAL PRINTER TO THE 
PARALLEL PRINTER PORT ON THE TRS-80. 

Software compatibility problems are totally eliminated because 
the TRS-80 "THINKS" that it has a parallel printer attached. 
NO MACHINE LANGUAGE DRIVER NEEDS TO BE LOADED 
INTO HIGH MEMORY BECAUSE THE DRIVER ROUTINE FOR 
THE UPI-3 IS ALREADY IN THE TRS80 ROM! SCRIPSIT. PENCIL, 
RSM 2, ST80D, NEWDOS, FORTRAN, BASIC etc. all work as it a 
parallel printer was in use. 

The UPI-3 is completely self contained and ready to use. A 34 
conductor edge card connector plugs onto the parallel printer 
port of the model I Expansion Interface or onto the parallel 
printer port on the TRS-80 III. A DB25 socket mates with the 
cable from your serial printer. The UPI-3 converts the parallel 
output of the TRS-80 printer port into serial data in both the 
RS232-C and 20 MA. loop formats. 



Lxi 



SPEEDWAY ELECTRONICS 
Division oi Binary Devices 

11560TIMBERLAKE LANE 

NOBLESVILLE, IN 46060 

(317)842-5020 

TRS 80 is a trademark of Tandy 



VISA MasterCard 




Switch selectable options include: 

• Linefeed after Carriage Return 

• Handshake polarity (RS232-C) 

• Nulls after Carriage Return 

• 7 or 8 Data Bits per word 

• 1 or 2 Stop Bits per Word 

• Parity or No parity 

• ODD or EVEN Parity 



NOW 
AVAILABLE 
FOR 
MODEL II 



UPI-2 for TRS80 Model II $149.95 

UPI-3 for TRS80 Model I or 3 $149.95 

UPI-4 for use with Model 1 and RS Printer 

Interface Cable (no expansion interface required) $159.95 

Manual only (may be applied to order) $ 5.00 

Ten day return privilege — 90 day warranty 

Shipping and Handling on all orders $ 4.00 

Specify BAUD rate 50-9600 BAUD 
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(4K) the result is zero and it skips 
one instruction (BEQ A06C). If 
the jumper is to + 5V (16K), the 
result is not zero, the next in- 
struction is executed (STA -5,X), 
the X register is backed up five 
places from &HFFEO resulting 
in the A register being loaded in- 
to &HFFDB. The MC6883 SAM is 
now set for 16K dynamic RAM. If 
you change the last instruction 
to STA -3,X (A71 D) the MC 6883 
would be set for 64K dynamic 
RAM. All you need change is one 
byte at &HA06B so the CPU 
sees byte 1D on the data bus in- 
stead of 1B. 

One external solution is to de- 
code the address bus so that at 
&HA06B you deselect the inter- 
nal ROM, using theSLENB* bus 
line, and put byte 1D on the data 
bus. You can mount a device like 
that shown in Fig. 2 externally 
on the expansion bus but it re- 
quires another edgeboard con- 
nector to replace the one taken 
to allow further system expan- 
sion. The easy solution, short of 
a double-sided printed circuit 
board with plated holes, is to 



wire wrap the circuit on a Vector 
4609 proto-board. I used this 
method on the buffered card to 
my expansion unit. If you try to 
mount this unit internally, be 
prepared for any number of 
placement/mounting/location 
problems — not to mention 
soldering about 20 jumpers to 
the motherboard. Since the data 
does not have to be stable until 
90 nsec before the E clock falls 
you have plenty of time for de- 
coding and will be online with 
byte 1D even before E rises. Fur- 
ther, this solution allows the use 
of either the slow or fast clock 
speeds (&HA06B will be ad- 
dressed only at the slow speed). 
The second solution is to 
mount a board into the ROM 
socket itself but instead of put- 
ting a whole byte on the bus it 
swaps the D1 and D2 lines from 
the ROM (thus 1B, 0001 1011 
becomes 1D, 0001 1101). This 
solution uses three chips, a dou- 
ble sided PC board (preferably 
with plated holes), and does not 
need jumpers. (See Fig. 3.) A four 
chip solution would put a whole 



byte on the data bus like Fig. 2 
but the extra chip would be 
needed to deselect the ROM or 
its output. The immediate prob- 
lem with four chips is that there 
is nowhere to put all of therm- 
three is tight enough. I have not 
worked out this design or PC 
layout because it does not offer 
any advantage over solution 
Two. If I add up the worst case 
propagation delays for the de- 



coder and multiplexor versus 
the maximum access time of the 
MC68A364 ROM chip there is a 
strong possibility that, at the 
fast clock speed, there will be a 
loss of data coming from the 
ROM. At the slow (normal) clock 
speed there is no problem with 
timing but since the ROM D1 
and D2 lines must always go 
through the 74LS257 multiplex- 
or there can be timing problems 




GROUND (33 OR 34) 



74LS260 
DUAL 5-INPUT 
NOR GATES 



74LSI33 
I3-INPUT 
NAND GATE 



74LS244 

OCTAL 

BUFFER 



Fig. 2 




31000 



A completely refurbished 1 ggj 
IBM Selectric Terminal with 
built-in ASCII Interface. 



*FOR YOUR TRS-80 WITH OR WITHOUT 
EXPANSION INTERFACE. AVAILABLE WITH 
CENTRONICS TYPE PARALLEL PORT. 



Features: 

• 300 Baud Serial 

• 14.9 characters per second 
printout 

• Reliable heavy duty Selectric 
mechanism 

• RS-232C Interface 

• Documentation included 

• 60 day warranty — parts and 
labor 

• High quality Selectric print- 
ing Off-line use as typewriter 

• Optional tractor feed 
available 

• 15 inch carriage width 



Also works with Exa- 
tron's Stringy floppy, 
for fast loading of pro- 
grams. (Has RS232 
built in stringy) 

HOW TO ORDER 
DATA-TRANS 1000 

1. We accept Visa, Master 
Charge. Make cashiers checks or 
personal check payable to: 

DATA-TRANS 

2. All orders are shipped 
EO.B. San Jose, CA 

3. Deliveries are immediate 




Desk and table top models also available. 



For orders and information 

DATA-TRANS 

45277 Fremont Blvd., #7 , 
Fremont CA 94538 

Phone: (408) 263-9246 
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WE ARE NOW NUMBER 1 

OUR MASSIVE VOLUME HAS ALLOWED US TO REDUCE OUR 

PRICE TO JUST 




$129 




REDUCED FROM 1690° 



FOR THE POWERFUL 
LDOS 5.1 OPERATING SYSTEM. 



The Ultimate In 
Operating Systems 
For Model I & III 



* Model I LDOS provided on 35 track single density media. 

* Model III LDOS provided on 40 track double density media. 

* LDOS can be provided on special media configurations at an 
additional charge. 

* Prices & Specifications are subject to change without notice. 
-(-Although not required, LSI recommends two or more drives 

when using LDOS. 



For Further Information Contact The Distributor Or Dealer Nearest You: 



(West) 
LOBO DRIVES INTL 

354 S. Fairview Ave. 

Goleta, CA 93117 

(805) 683-1576 



(Central) 
GALACTIC SOFTWARE LTD. 

11520 N. Port Washington Rd. 

Mequon, Wl 53092 

(414) 241-8030 



(East) 
MISOSYS 

5904 Edgehill Dr. 

Alexandria. VA 22303 

(703) 960-2998 



(The Common Market) 
MOLIMERX LTD. 

1 Buckhurst Rd., Bexhill 
Sussex, England 
(0424)-220391 



DEALER INQUIRIES WELCOME. LDOS is a product of LSI. TRS-80 & Radio Shack are trademarks. 



A 

//A 



OGICAL 
SYSTEMS 
INC. 

0-CZ>Z=7-c=3 

Mequon, Wl 53092 

(414)241-3066 



■See List ol Advertisers on page 402 
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MONEY MAGIC! 



t * douqfiflo.. 

DOUGHFLO. The Most Useful Program s Home or 
Business Msnsger Can Hsve! ^112 




Designed For The Decision Maker, Doughfio is an interacting system of 
programs for cash flow analysis, budget planning, and bookkeeping. 
In The Home, Doughfio becomes a key tod in solving the puzzle of balancing ex- 
penses vs. income. Doughfio shows you where the money goes. 
Fire Your Bookkeeper I You, the new bookkeeper, will have easy access to 
aH expense records. Rapidly find and display any number of entries by description, 
type, amount, date, or number. 

Simple To Use, Doughfio is quick and efficient, carefuBy guiding you from data 
entry to report generation. 

User Friendly input screens and single keystroke commands alow quick and 
easy data entry and computer interaction. 
Amazingly Versatile! Indispensable in home or business for: 



• Budget Planning 

• Tax Preparation 

• Bookkeeping 

• Financial Analysis 



Gain Valuable Ineight. Doughfio is ready to save you time and money. 
Requires 32K and one or more disk drives, specify Model I or III. $98.95 postpaid 
to continental North America. For more information check reader service 
number 



olph one*ics) p 



.0. Box 597 Forestvllle, Ca. 99436 
24 hr. phono (797) 997*7237 
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At last there is a cure for TRS-BO tape cloading blues! For over 
three years, Alphanetics has been selling the TRS-80 Tape Digitizer, a proven 
hardware solution for your software problems. No longer need you juggle the 
recorder's volume control endlessly, trying for a perfect cload of a pre-recorded 
program. Just pop the tape into the cassette recorder, process the signal 
through our digitizer, and you're ready to RUN a perfect load! 
Just check out the Tape Digitizer's features . . . 



M-kra tap* program loading virtually independent of 
volume control Batting. 

Allow, copying system and normal tapes without using 
computer. 

Makaa a perfect digital copy of any tape without using com- 
puter, removing hum, noise, and cores minor dropouts. 
Casaetta switch allows manual control of caseetta 
recorder, I n dependent of computer control. 
"GOOD DATA" indicator easily e n able s setting proper 
volume . . . doubles as a taps monitor. 
AX. powered — no batteries to replace. 
Housed In a sturdy, attractive metal case. 
Completely compatible with Laval I fill, alae LOW i 
(800 baud) Modal IH. 



Feed your cassette to the Alphanetics Tape Digitizer and feed your computer the 
exact digital waveform the TRS-80 gave your tape. Get rid of your tape bugs 
today — $64.95 postpaid to continental North America, or return withm 10 
days for a full refund! 



at the fast clock speed (1.8MHz). 

However, if you foresee using 
the Color Computer only at the 
normal clock speed, construct- 
ing the ROM satellite board is 
straightforward. Use a regular, 
low profile 24 pin socket for the 
ROM and use the thinnest diam- 
eter pins you can find (try the GC 
Electronics line of PC connec- 
tors) for easier and safer inser- 
tion into the onboard ROM sock- 
et. Solder the pins so that they 
do not interfere with mounting 
the ROM on the satellite board 
and so that they come down far 
enough out of the board. Since 
most of us do not have facilities 
for plating holes, be ready to 
solder connections on both 
sides of the board. You may 
want to use Molex IC pins for re- 
mounting the ROM as these 
would be easier to get to for 
soldering on top of the board. To 
conserve space solder the 74LS 
chips directly to the board. Use 
a capacitor for decoupling the 
power line. Fig. 4 is a suggested 
printed circuit layout. 

You could apply the above de- 
selection principle for changing 
other ROM functions. You may 
like the Color Computer to jump 
to another location when you in- 
sert a cartridge. If so, change 
&HA10B from CO to anything 
from 00 to FF. At this new loca- 
tion (or even still at &HC000) you 
may insert another initialization 
routine to set the Color Com- 
puter for 64K static RAM (re- 
quires two different registers 
set, and therefore another ROM) 
and to always run at the fast 
clock speed. To get back try 
JMP A10D. You may even try a 
circuit that executes this jump 
to a different location only on 
powerup or reset. 

Now that you have your Color 
Computer's traces all set and 
the auto-initializer constructed 



and inserted it is simple to bank 
select between the upper and 
lower 32K banks of RAM. In Ba- 
sic POKE &HFFD5.0 to get to 
the upper page and POKE 
&HFFD4 to get back to the lower 
page. In assembly language 
LDX #$FFD5:STA ,X for the up- 
per and LDX #$FFD4:STA ,X for 
the lower (it does not matter 
what the contents of register A 
are). Keep in mind that on pow- 
erup or after reset you will al- 
ways be in the lower page (#0) 
and will then have to jump to the 
upper page (#1). Since the Color 
Computer will not find the prop- 
er pointers in the upper page of 
RAM it is not presently usable 
for Basic. At the present time 
proper utilization depends on 
having a driver routine in exter- 
nal RAM or ROM even for ma- 
chine language use. 

It appears I have answered 
my own question about whether 
future Color Computer Basic 
ROMs will support 64K. While at 
the Glendale Computer Center I 
saw a 32K RAM machine that 
had a 1.1 Basic ROM. When I 
PEEKed &HA06B I got 2 back. 
Radio Shack changed the ini- 
tialization routine. When I got 
back to North Hollywood my 
Radio Shack Computer Store 
representative read me a bulle- 
tin about the new 32K upgrade 
kit using a different ROM. The 
clincher was that this ROM (part 
number AXX3052), which also 
corrects the multiple keypress 
problem, sends eight bit words 
out on the serial port (and 
hopefully corrects the DLOADM 
command). It would only be sold 
with the 32K upgrade kit. 

I ordered this ROM, inserted 
it, powered up and disassem- 
bled it. This ROM initializes for 
4K, 16K and 32K/64K. The rou- 
tine steps through the SAM reg- 
isters as before and then stores 



ROME (20) 01(10)02(11) *5V(24) 




Fig. 3 
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hex F8 in the keyboard PIA out- 
put register (&HFF03). It then 
checks &HFF22s bit 2. If this bit 
is zero, the Computer initializes 
for 4K; if not, it goes to the next 
instruction. &HFF03 is then 
cleared and &HFF22 bit 2 is 
again checked. If not zero, it 
goes to the next instruction 
which decrements the U register 
by two. With the next instruction 
storing the A register another 
three bytes below, making the 
back up total five, &FFDB is set 
and the CPU initializes for 16K 
RAMs. If the result of the second 
test is zero, it branches over the 
minus 2 decrement, executes 
the STA -3,U, backing up only 
three bytes, setting &HFFDD 
and we have 64K auto-initial- 
ization. 

The ROM checks &HFF03 to 
see if 30K/64K is in the machine 
and so you must run a jumper 
from PIA U8 to PIA U4. The byte 
stored at &HFF03 for the test 
had a value of &HF8 with a bit 
pattern of 1111 1000. Therefore 
run that jumper from pin 12 of U4 
to any one of pins 13, 14, 15, 16, 
or 17 of U8. 

However, since future pro- 
grams will probably have sub- 
routines to see what size RAM 
you have and since I do not 
know for sure which of the 
above U8 pins is the right one I 
suggest the following. Remove 
the 4K/16K jumper, wire wrap 
the center post, cut the wire with 
enough room to go to any of the 
above pins going directly over 



U8, strip the insulation off the 
end and push it into the socket 
next to U8 pin 17. This may 
change in the future if Tandy 
goes to 64K chips. You can easi- 
ly make the correct selection 
with the above method. 

A memory management oper- 
ating system is not available 
yet. When 64K prices drop 
enough Tandy may offer to pull 
your 4/16/32KS and plug in 64Ks 
(plus installation charges and a 
new ROM). There is a monitor 
available from Sound Center 
Radio Shack, NM, that provides 
some functions for using 64K. 

No, the other designs are not 
now obsolete. Tandy may yet 
implement the "no sale" provi- 
sion, forcing you to a satellite or 
outboard arrangement for your 
auto-initialization. The prin- 
ciples are still quite useful. 

Warning! You take full re- 
sponsibility for any modifi- 
cations to your machine. Since 
Radio Shack refuses to repair 
any Color Computer with cut 
traces invest in a service manual 
and a supply of spare chips. 
When you have the Tandy part 
numbers from the service manu- 
al you can order them from Na- 
tional Parts (1-817-870-5662). 
The courteous people there are 
just another reason Tandy is the 
biggest name in little comput- 
ers. This is an exceptional ser- 
vice. Do not abuse it with small 
orders or try to order whole com- 
puters. Be moderate or they will 
be forced to close down.H 




74LS257 

COMPONENT (TOP) SIDE 
(ROM FITS IN ROW MARKED 
BY ARROWS- SHIFT LEFT) 



BOTTOM SIDE - DON'T 
FORGET, YOU MAY HAVE TO 
SOLDER ON BOTH SIDES. 



Fig. 4. Use a very fine-tipped iron, thin solder, and the smallest diam- 
eter drill bit. Boards are 1:1 full scale. To avoid connecting spare in- 
puts, cut Bridge B and run a jumper from X to X (see top board). 

^See List of Advertisers on page 402 



PRACTICAL • ORIGINAL • SINGULAR • SUPERB • UNUSUAL 
REFWARE THESAURUS . 
INNOVATIVE READY-REFERENCE PROGRAMS j 
WHAT'S THE BEST WORD??? 

How many times have you racked your brain for just the right word 
when writing an important letter, report, or article? How many times have 
your ideas been misunderstood because the words you used didn't express 
your thoughts clearly and accurately? 

Now, by using the remarkable new REFWARE THESAURUS programs, 
your computer can speedily find those words that are on the tip of your 
tongue but that you can't quite remember at the moment. And it tells you 
how to spell them! 

.Just slip a REFWARE THESAURUS disk into your disk drive. Then type 
in your sentences or paragraphs. The computer will quickly offer a variety 
of alternatives, retyping your sentences or paragraphs with substitute 
possibilities chosen from its multi-thousand word vocabulary. It displays 
the revised sentences on your monitor or types them on your printer as you 
choose, so that you can mull them over and choose the one that most ac- 
curately expresses what you REALLY mean to say. 

Having helped thousands of writers learn to express themselves with 
clarity as editor of such publications as the World Book Encyclopedia the 
Encyclopedia Americana, and the Reader's Digest Almanac and Yearbook, 
David C. Whitney has drawn on decades of editorial experience to prepare 
the revolutionary REFWARE THESAURUS programs, bringing the speed 
and power of the computer to the aid of anyone who wishes to improve his 
writing or speaking. 

In addition to the specific programs capable of substituting suggested 
alternate words for nouns and adjectives, REFWARE THESAURUS Builder 
enables engineers, physicians, lawyers, educators, business, physicists, 
chemists, and other professionals and specialists to develop their own in- 
dividually tailored vocabularies of hard-to-remember technical words, 

REFWARE THESAURUS Adjectives 1.0 

6,200 adjectives assist you in choosing the most accurate modifiers 
in your ads, letters, reports, and speeches. 

REFWARE THESAURUS Nouns 1.0 

6,200 nouns suggest alternates for the names of persons, places, things, 
and ideas that you use in your writing and speaking. 

REFWARE THESAURUS Builder 1.0 

Series of eight utility programs enables the user to develop specialized 
computer thesaurus disk programs of hard-to-remember technical words 
and their alternates for personal use. Functions independently of Adjec- 
tives and Nouns programs. 

REFWARE THESAURUS User's Manuals: Complete descriptions of use of 
each of the above programs. Included at no additional charge with each of 
program disks listed above. If ordered separately, price of documentation 
is refundable upon receipt of order and payment for program disk. 

MINIMUM System Required TRS 80" Mod I or Mod III 48K with two disk drives. 
* A Trademark of Tandy Corporation 

REFWARE' Reference software division David C. Whitney Associates, Inc. 

P.O. Box451,Chappaqua, N.Y. 10514 
"A trademark of David C. Whitney Associates, Inc. ^ 114 

Specify Mod l( ) or Mod III ( ) 
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Order No. 


Title 


Unit Price 


Total 




1001 RT 


Adjectives 1.0 


$39.95 






2001 RT 


Nouns 1.0 


S39.95 






5001 RT 


Builder 1.0 


S149.95 






6001 RT 


User's Manual Adj 


$9.95 






6002RT 


User's Manual Nouns 


$9.95 






6003RT 


User's Manual Builder 


$14.95 








Postage and handling 


$ 3.00 


Enclosed $ ( ) Check ( ) Money Order TOTAL 
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PROFILE 



Swinging from rock music to computers. 



Jake's Wampeters 



by John P. Mello Jr. 



This is the first in a series of articles featur- 
ing personalities in the realm of the TRS-80. 
The people featured will be well-known or 
unusual, but all will have made a mark in the 
field that affects the state of the art. We 
welcome comments from you, and would 
like to hear who you'd like to see 
featured — Eds. 

There's a wacky irony in Jake Com- 
mander's life that reminds one of 



Bokonism, a fictitious religion created by 
Kurt Vonnegut, Jr. in his novel Cat's Cradle. 
Bokonism says there are pivots in a 
person's life called wampeters, one waning, 
one waxing, at any point in time. Jake Com- 
mander's wampeters have been rock music 
and computers. 

Born in Birmingham, England, Jake, at 
15, began playing in a band called the Andy- 
caps, after the famous British working- 
class comic strip character. But the seed of 
his interest in computers may have been 
planted in him long before that— at age two 
and a half: 




Jake Commander and friends. 
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"I remember a doll's house with a key- 
board in it. I remember that really well. It 
was one of my first recollections." 

His grandfather had made the dollhouse 
for Jake's mother. It had eight chimneys. 
Each room in the house had a ceiling light 
and fireplace fronted with red cellophane. 
When a chimney was pressed, the light in a 
room's ceiling and fireplace would glow. 

"My first keyboard," Jake said. When an 
interviewer suggested today's tykes need 
no silicon surrogates, 80 Micro's tech- 
nical consultant quipped, "Yeah, but they 
don't have as much fun as I had with that 
doll house." 

Jake's father had an engineering back- 
ground. "That definitely influenced my out- 
look," he said. And by the time he was eight, 
he was dabbling in electronics, building 
things and wondering why they didn't work. 

"It was all tubes back then so you'd just 
get electrocuted," he recollected. "Some of 
the shocks were unbelievable. I'm almost 
immune to electricity now." Asked if the 
shocks discouraged his experimentation, 
he replied: "No. It was part of the fun. Los- 
ing count of how many electric shocks you 
had was like getting a medal or something." 

While undergoing homebrewed shock 
therapy, Jake was also teaching himself to 
play the guitar. "Anything that I've ever 
learned that's been worthwhile." he ob- 
served, "I've taught myself." 

Although 11 year-old Jake passed a now 
defunct exam called "The 11-plus," aimed 
at separating the wheat from the chaff in 
the intelligence department, he found dubi- 
ous benefits in formal measures of intelli- 
gence: "The only kid in my class that didn't 
pass the 11-plus is now the guiding light of 
the Electric Light Orchestra and a multi- 
millionaire." 

Jake couldn't wait to leave school and at 
16, a year after joining the Andycaps, he 
landed a job in Britain's General Post Office 
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which, in addition to its postal chores, 
handles telecommunications in the coun- 
try. During this period, Jake and his friends 
built an outlaw radio station. 

They got 100 feet of scrap wire from the 
local telephone exchange where Jake 
worked, tied an old sneaker on the end of it, 
threw it over the roof of Jake's house and 
began transmitting their band over it. "The 
transmitter had so many harmonics in it," 
Jake said, "you could hear us all the way 
down the medium wave." 

The GPO prepared to capture the culprits 
responsible for the outlaw transmissions. 
"They sent out a detector van with a scan- 
ning unit looking for us," Jake explained, 
"but we had so many contacts in the field, 
we knew when they were in range. We'd just 
pull the sneaker back over the roof and 
wouldn't transmit until they were out of the 
way again." Finally, in a last ditch attempt 
to deceive the GPO, Jake said he and his 
friends started broadcasting in French. 

Jake tired of public service after a year 
and left the GPO to become a rock star. The 
time was 1966 and lots of lads Jake's age 
thought the road to success lay in emulat- 
ing four rockers from Liverpool. "We played 
Germany when I turned 18," Jake said. 
"That was like a really important thing as 
far as bands went. You know, follow the 
Beatles, go to Hamburg and come back a 
star." 

"It was a grueling experience," he re- 
called. "We were supposed to play a num- 
ber of clubs in the Hamburg area but ended 
up playing one. We couldn't stand it after 
two weeks. 

"On the weekend, you played until the 
last customer went. And the last customer 
went when the hell he felt like it. 

"You could see what it did to bands. It 
really gelled them. I remember one Satur- 
day night. The last customer left at six in the 
morning. We'd played six sets— an hour on, 
an hour off— 12 hours. 

"We were paid $50 a week. We thought 
we were rich. When I was 18, that was pretty 
good money." 

Back in England, the Andycaps contin- 
ued doing their gigs in "proper night clubs," 
places where it was either amateur night — 
someone from the audience trying to crash 
the stage and sing with the band— or Friday 
Night at the Fights or both. However, Jake's 
worst encounter didn't come in a club: 

"We were playing at a school hop when 
the local Hells Angels came in. 

"I was going through my tough period at 
the time— going through a 'Jake Command- 
er is going to be tough guy' type of thing. So 



I was ready to defend the band's honor and 
all that. 

"There wasn't any stage. We were play- 
ing on the floor and there was nothing be- 
tween us and the audience. 

"One of the bikers came up and says, 
'Play a Stones number.' We only knew 
one— 'Lady Jane'— not exactly a raunchy 
one. We started playing that but that was 
not their idea of what they wanted to hear. 

"One of them began wobbling the micro- 
phone in front of the rhythm player's nose 
so he couldn't sing into it. So the bass play- 
er came up and stopped it. 

"That was it. 

"A couple of them grabbed the bass play- 
er. I thought: These swines are going to get 
it now. And I took my real nice semi- 
acoustic guitar and went bolting over there 
at the speed of light and just cracked this 
kid over the head with my guitar. 

"There was this terrible splintering 
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crunch and this kid flew— like he was run- 
ning backwards— because of the momen- 
tum with which I hit him. His gang parted 
like the Red Sea and the kid went flying 
through them landing in the seats. 

"Then the chairs started flying. 

"And I'm standing there wondering what 
the hell's going to happen next when this 
great big kid comes up to me. He looked 
about eight foot tall. He picked up a micro- 
phone stand with a heavy metal base. 

"I put my guitar down as he threw the 
things at me and I caught it and the momen- 
tum of that just threw me backwards 
straight over the drums and I landed, just 
like the best of slapstick, with my head in- 
side the bass drum. 

"I thought: I'm staying here. This is the 
place to be. I could hear the place erupting. 
Then there was a lull and I got up and as I 
did I met a chair coming through the air end 
over end and it bounced off my head and I 
went straight back down into the drum. 

"Then somebody had the good sense to 
yell the word police. That was all it took. The 
place cleared." 



When it became apparent immediate 
rock stardom was not in the cards for the 
Andycapps, Jake got another job earning 
$30 a week as a cost clerk in an office. At 
that time, Jake and a friend decided to be 
space vandals. 

"All our buddies," Jake explained, "were 
going around doing things like throwing 
stones through windows. What we were go- 
ing to do was throw the biggest radio signal 
we could muster at the moon and bounce 
the thing back. It would be like throwing a 
brick at the moon." 

He added, "People bounce signals off the 
moon all the time now, but at that time it 
wasn't common at all to say the least." 

"We started building all this stuff in my 
dad's shed," he continued. "It was like the 
Houston space center. There were all these 
oscilloscopes; converted tvs doing strange 
things; monitoring gear." 

The pair planned to cap the project with a 
giant dish antenna on the shed's roof and 
use a computer to track the moon's posi- 
tion. Jake enrolled in a $50 course he be- 
lieved would teach him how to build a com- 
puter, but when he received the course ma- 
terials, they dealt with only programming. 
He was disappointed about that and upset 
about shelling out $50 for it, so he persuad- 
ed his office manager he'd started the 
course to improve his job performance. 
The company paid for part of the course 
until Jake later left the firm to work in a tv 
repair shop. 

When it dawned on his father his son was 
serious about constructing a dish antenna 
on the roof of a building the family didn't 
own, he clamped down on the project, so 
Jake and his buddy planned to let the city 
of Birmingham become an accessory in 
the act. 

The duo obtained from the city an allot- 
ment—public land rented to indigents for 
gardening. "We put up a hut," Jake said, 
"so we could have our own little lab on this 
allotment and nobody would know. They'd 
think we were gardening when really we 
were bouncing signals off the moon." 

Once again hearing the siren's lure of 
rock stardom, Jake quit his office job. Rela- 
tions between him and his parents wors- 
ened and young Commander moved into 
the allotment hut. "I felt like a vagrant living 
in this hut," he remembered. "I started doing 
the computer course as a means of telling 
myself I wasn't a tramp or a vagrant. It was 
kind of a psychological safety net for me." 

Then one night, after a good gig with the 
Andycaps, it became apparent in what di- 
rection fate was poking Jake: 
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"I walked up the hill to the hut and the 
door was ajar. I got in there and vandals had 
been in and just completely wrecked the 
place. I found food everywhere and burned 
things and ripped up things. That's a horri- 
ble thing to get back to. 

"I just stood in the doorway, trying to 
take it all in, trying to make it real and not 
matter too much. And all I've got in there is 
a battery— no light bulb— and they tore that 
to pieces, so there wasn't even light to see 
how bad it really was." 

The next day Jake got a mattress and 
started living in the band's van, but two 
weeks later he returned to the hut to gather 
up all his worldly goods: 

"We went there and the door was ajar 
again. Everything was gone. They'd taken 
my clothes, everything. All the little things I 
owned were stolen. 

"That was a real weird experience, stand- 
ing in the doorway for a second time realiz- 
ing that everything you owned you were 
wearing. 

"They did messy things like burn ball 
point pens. There'd be half burned ballpoint 
pens stuck on something with blue ink ev- 
erywhere. It was really messy. It made my 
life feel the same way. 

"There were all these pieces of paper 
scattered everywhere, some of them 
soaked in kerosene because I'd had a 
kerosene stove. When I collected them 
together, they were the computer program- 



ming course completely intact. 

"That was a real trick of fate. If that'd 
gone, there would have been no way I could 
have carried on with it. Now it was the only 
thing I had left, so I carried on with it." 

Eventually, Jake left the Andycaps and 
joined "Ochre Daydream," and left the tv re- 
pair job to work in a paint factory on electro- 
phoretic paint. Then he "met" D.D. 
McCracken. 

McCracken's book, Digital Computer 
Programming, was the final stage of Jake's 
course. "The great thing about the book," 
Jake observed, "was it didn't teach you how 
to program a particular computer. . .you 
were learning a computer McCracken made 
up in his head that displayed all the general 
characteristics of a computer. 

"That book taught me everything I 
needed to know about programming until 
this day. 

"About halfway through the book, it start- 
ed pulling me in. I started getting a kick out 
of it. I started to find it was really getting to 
my blood. 

"It was like the ultimate game. People 
talk about what's the best game— Star 
Raiders or this, that or the other— but to me, 
the Basic programming language itself is a 
game people enjoy playing." 

By the time he received his diploma, Jake 
was hot to be a programmer, but he was in 
for a rude discovery: 

"At the time, programming was a real 



cliquey type of job. It was one of those 
Catch-22 things: If you wanted to be a pro- 
grammer, you had to be a programmer. 

"There was a bit of a scam happening at 
the time. Because programming was sup- 
posed to be this glamorous job, people were 
offering programming courses for $400. 
You could spend a month at a programming 
school and get a diploma that was worth 
nothing more than the paper it was written 
on. My degree was like that, except it only 
cost me $50, not $400." 

After unsuccessfully trying to find a pro- 
gramming job, Jake went to the Labor Ex- 
change—the British version of the unem- 
ployment office. There he was advised to 
become a computer operator and use that 
job as an "entree" into programming. Jake 
was skeptical of that suggestion. "The one 
thing that stuck in my mind from the Mc- 
Cracken book," he recalled, "was this im- 
age of computer operators as nothing more 
than someone who picks up a pack of 
punch cards, puts them into a reader, and 
presses a button." 

Shelving his doubts, he accepted their 
advice and they made a referral. When he 
arrived at the factory gate, Jake had to take 
a double dose of nasty medicine. Not only 
did he have to start as an operator, but he 
had to work for a company making items 
not bandied about the pub— sanitary 
napkins. 

But then Jake looked at the firm's main- 
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frame: "I was in love with it. There was all 
this electronic gear and tapes clicking and 
whirring and printers going and paper tapes 
being read and punch cards read and 
punched." 

Jake also discovered another asset to the 
job: "It was the upper echelon of the place. 
Everybody looked up to it like everybody in 
there was really strange. It was nice to have 
that. So, you see, I was going to be a star 
again." 

Although hired as an operator, Jake 
didn't start as one. "When you joined a 
computer installation such as that," Jake 
remembered, "you get the bum job and the 
bum job there was loading tapes, but even 
that was taken with great pride by these 
guys. 

"You had to get those tapes up there fast 
because an operator's standing there ready 
to start the whole ballgame. At the moment, 
the computer's doing nothing and idle time 
was like an anathema. 

"As tape loader, you had to make sure 
that as soon as a tape finished and was dis- 
mounted by a program, you would have the 
next tape on the tape deck and in position. 
You'd whirl around. It took two of us. It 
became an art. You stuck something up, 
then took something down; meanwhile you 
started to know which program would dis- 
mount which tape when, you'd get really 
good at it. You'd get a real team going and 
get programs going back to back. Some- 



times you could almost overlap the pro- 
grams. It was amazing. 

"The first day of doing that, it was such 
an alien job to me, my head was spinning. I 
came out of that job and I couldn't believe it. 
It was like I'd been to a fairground or 
something. I was totally fascinated again. I 
was really sucked into it all." 

Jake's enthusiasm endeared him to the 
engineers in the computer room and they 
let him play with the mainframe during rare 
idle moments. "I could make things hap- 
pen," he said. "I could put in a small pro- 
gram—maybe 20 words; there was no such 
thing as bytes, just 24-bit words— and make 
a printer print a line of A's or something or 
make a tape block read one block of tape 
and see all the lights go on. I really did get a 
kick of power out of that." 

Jake married three months after landing 
the computer job and began climbing the 
ladder in the computer room. His sights 
were clear now: He wanted to be a machine- 
language programmer, "a programmer's 
programmer." 

But when he reached his goal after two 
years, "the wind suddenly went out of my 
sails because I suddenly got to my destina- 
tion." Then the music bug and a new 
itch— an urge to see America— got into his 
blood. 

Jake was ripe for a change. Not only had 
he become a machine-language program- 
mer, but he was bitter about being victim- 
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ized by a software pirate in the computer 
room. "Someone with a little more savvy 
than I had about the rights of a program 
took a program I'd written and sold it," he 
said, "got 2,000 pounds for it." 

"It was about 11 o'clock at night and I 
was ready to go to bed," Jake recalled, 
"when my friend from the Electric Light Or- 
chestra calls up. He only had half a band to 
appear on a tv show the next day and he 
wanted to know if I wanted to stand in as a 
cello player. 

"I'm a guitarist, right? I haven't a clue 
what to do with a bow and a thing with no 
frets on it. 

"Nevertheless, I went down to the BBC 
studios and we tanked up on whiskey and 
Coke. Then I put on an ape mask and vicar's 
collar and we faced the cameras and did it." 

Jake became the sound engineer for the 
band, but that sent shock waves through 
his marriage, a marriage already veined 
with faults from the hours he had been put- 
ting in on the computer. "I did everything I 
possibly could to keep the marriage togeth- 
er," Jake observed, "including going back 
into computing for three months just to try 
and be a steady guy again, show my wife 
everything was hunky-dory and l'm-really-a- 
nine-to-fiver-darling-why-don't-you-realize- 
that?" 

But his marriage cracked up anyway and 
Jake went back to music, becoming a 
sound engineer in a recording studio for 
two years, all the time his yen for the States 
growing. Then he bought a sports car that 
became a fateful part of his first trip to the 
"colonies." 

The car was a Reliant Scimitar, the make 
Princess Anne currently motors in, with a 
three-liter, V engine. Jake remembered: 
"The only reason I could afford one was to 
buy a second-hand one. It was the only lux- 
ury I'd ever had in my life. 

"Dad spent ages on the engine and it 
purred; it really purred. We could get the 
RPM on takeover so low it was untrue. 

"A couple of days after we'd done the 
final work on the car, I wanted to see what 
the performance was going to be 
like— naught to 50, naught to 60. 1 got to the 
end of this motorway, came to a complete 
halt, waited until there were no cars around 
and just floored it. The thing literally took 
off like a rocket. 

"It was beautiful. It shot off. I was sitting 
behind the wheel feeling good, zapping 
down there at 65 miles an hour about one- 
tenth of a second after I'd floored it. Then it 
lost power. 

"I thought: overheating. The thing's over- 
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heating already. I couldn't believe it. I took 
my foot off the gas pedal and tried it again. 
Nothing. The thing just wasn't responding. 

"Suddenly, smoke starts pouring out of 
the dashboard, coming out of the air vents 
in the side. 

"I thought: electrical short, turn off the ig- 
nition. Nothing. 

"I put my foot on the brake. Nothing. 

"I flipped the hood latch,thinking: If it's 
hot under there I'd better get some cold air 
down there quick. I flipped it. It came up half 
an inch, stayed on its latch and flames 
came out the side just like a Trans Am— on- 
ly for real. 

"I see this slip road coming up and I just 
pulled the hand brake like mad. It worked. I 
pulled over, got out of the car, lifted the 
hood up and there were these flames trick- 
ling out. 

"I go into panic mode. 

"I will do anything to stop these flames. I 
try to flag drivers down and they're doing 
what anybody does when they see some- 
body in distress: They pull into the fast lane 
and go zooming past you. 

"A guy in the other lane coming the other 
way saw what was happening. He worked 
for a road repair firm and by law in England, 
they have to carry a fire extinguisher. He 
came bounding across the road with this 
great big fire extinguisher. It looked great. 
He tipped the thing upside down, hit the 
knob underneath, and nothing happened. 

"Meanwhile, the flames in my car get a 
bit taller. It's looking a bit hot in there now. 

"Then another guy runs up. He's got this 
tiny 50-cent fire extinguisher that you hit 
and shaving cream comes out. He starts 
spraying that from about eight feet away. I 
grabbed it off him and plunged in there try- 
ing to get it over the flames. They'd die 
down and just come back up again. It was 
hopeless. 

"A guy gave me a lift to call for help and 
as we're going in one direction, a cop car 
goes the other way with its light going. 
Great, someone's called them, I thought, 
but it's going to look fabulous because it 
looks like I abandoned my car. 

"When I got there, the police said stand 
back because they thought the tank was go- 
ing to blow. It never did and the car burned. 
It burned beautiful with a thick black plume 
that went half a mile into the air." 

A couple of those cars did the same thing 
to their owners his car did to him, Jake not- 
ed. He explained there was a design defect 
in the roadster. Engine vibration, he said, 
could work the pipe, running from the gas 
pump to the carburetor, loose. 
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After someone stole the car's wreckage, 
Jake's insurance company settled with him 
and he decided to give in to a desire he'd 
had for awhile— to go to the United States. 

He planned to spend three weeks in Los 
Angeles looking for a job as a record pro- 
ducer. But Electric Light Orchestra contact- 
ed him and asked him to be their monitor 
engineer for their latest American tour. 
"Suddenly," Jake observed, "a three week 
vacation to look for work turned into a three 
and a half month tour of the whole States." 

When Jake returned to England, he found 
he had a yearning for the States that 
wouldn't quit, so he joined ELO on their tour 
of the world. 

While in Australia, he picked up an issue 
of Popular Electronics dedicated to the new 
microcomputer craze. For $400, the TRS-80 
Model I, Level I, 4K, was the best bargain in 
the book, Jake maintained. And when the 
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band began their U.S. leg of the tour in Los 
Angeles, he immediately bought one. 

"Me and the bass player, between gigs 
for the rest of the American tour, would be 
up in our hotel room with the tv undone in 
the back, programming away. 

"The bass player wrote a few good pro- 
grams. He turned out to have a real flair for 
programming." 

Before the end of the tour, Jake had up- 
graded his Model I to Level II. The bass play- 
er wanted some of Jake's Level II programs 
to run on his Level I machine. Jake wrote a 
disassembler program to help accomplish 
that and by the end of the tour, he'd been 
bitten by the computer bug again. 

By the time Jake got back to England, he 
was ready to move to the United States, but 
once again he was strapped for money. He 
realized microcomputers were going to be 
a boom industry, but he didn't realize they'd 
play a part in a scheme to get the capital 



he needed to return to "the land of 
opportunity." 

"I went back to see some of my buddies 
on the mainframe," he recalled. "I said, You 
guys had better look out because why 
should anyone buy a computer terminal and 
rent time off you for $80 an hour when 
they can get a micro and do exactly the 
same thing? 

"I thought it was going to hurt them. And 
within six months, the place had closed 
down." 

That meant a lot of computer terminals 
could be had for a song and Jake capital- 
ized on it. He developed a hardware inter- 
face allowing the terminals to be used as 
printers. He bought 20 terminals, modified 
them, and sold them for 250 pounds each. 
The only competition at the time was a Cen- 
tronics printer selling for 600 pounds. 

With the money from that scheme, Jake 
hopped a plane to L.A., again intending to 
be a record producer. But the record busi- 
ness was in the doldrums at the time, so he 
brought his disassembler program to a 
friend who was a Radio Shack dealer in 
Santa Monica. The dealer suggested Jake 
send the program to Tandy. 

Months dragged on and Jake still didn't 
hear from Tandy. As his financial resources 
dwindled, he found an ad in Microcomput- 
ing for Instant Software in Peterborough, 
NH. Jake sent 20 programs there; eight of 
them returned immediately because they 
were games. But by September 1979, In- 
stant Software had accepted the rest of 
Jake's programs. 

January 1980 rolled around. Jake's pro- 
grams still hadn't been released by Instant 
Software. With the dogs of destitution nip- 
ping at his heels, Jake decided to take a 
stab at landing a job with the Peterborough 
concern. After contacting Instant Software, 
he was offered a job interview. With his last 
$50 in his pocket, Jake boarded a Freddie 
Laker Airlines jet on a one-way ticket to 
New York City. There he met two Instant 
Software employees who brought him to 
the converted motel housing the firm. 

Instant Software liked what they saw and 
hired Jake immediately. But soon Jim Perry, 
then managing editor of 80 Micro, pirated 
Jake away from Wayne Green's software 
sister and since that time, the affable 
Englishman has been gracing the maga- 
zine's staff and its pages with his wizard's 
knowledge of microcomputers. 

However, there are signs of the polarity in 
Jake's wampeters may be changing again. 
Rumor has it he is dusting off the cobwebs 
on his electric guitar and. . . ■ 
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agree! If for some reason you find that this 
program does not meet your needs, return the 
entire package within 14 days for a prompt and 
cheerful refund. 

(Actual QWERTY text above) 
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SOME FEATURES OF QWERTY 3.0 

1 . Automatically prints in proportional print, with a suitable format Transitions between the 
three print styles are easy including all expanded print modes. 2. QWERTY 3.0 adds 75 new 
symbols, including upper and lower case Greek letters, mathematical symbols such as 
integrals and summations, arrows, brackets, and probability symbols. 3. Any character can 
be used as a subscript or superscript, even simultaneously: Carats, bars, and tildes can be 
placed over any character, with precise position control. 4. Underlining, with or without 
underlining of spaces, including long ratios and mathematical expressions. 5. FOOT- 
MOTES can be placed on any page so that they remain on the desired page, even if text is 
inserted later. 6. TABLE commands enable positioning of the print head anywhere on a line. 
Invaluable in printing neat mathematical layouts, tables, columnar material, etc.. in propor- 
tional print 7. PRETTY commands allow printing of repetitions of a chosen character. When 
combined with TABLE, decorative borders can be produced with ease. 8. FOJJO format 
produces output in two or three columns per page, in either proportional or 1 6.7 cpi mode. 
Ideal for newsletters. 9. Supplies a third output mode, in which only SCRIPSIT commands 
are obeyed. .Allows printing of special QWERTY commands for future reference. 1 0. RAGE 
EMD indicates where pages will end. and the page number, without printing the text One can 
prepare an almost error-free document without ever using paper. 1 1 . Correction of 
SCRIPSITs errors and inconveniences, extensive documentation, and much more! 

QWERTY 3.0 requires a TRS-80 Model I or Model III. at least one disk drive, a copy of 
SCRIPSIT. and one of the printers specified below: When ordering, please specify which 
model computer, number of drives, and printer you use. For cautious buyers, we offer the 
manual (over 70 pages) for S 1 0. When you decide to buy QWERTY we will credit the full 
manual price. 

QWERTY 3.0 

(for Lineprinter IV. Centronics 737. or Centronics /39) complete package . S74.95 

DAISY (for Radio Shack Daisy Wheel II) complete package S74.95 

QWERTY 3.0 Manual (specify printer) S10.00 
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MED SYSTEMS SOFTWARE 

P.O. BOX 3558 CHAPEL HILL, NC 2751 4 
TO ORDER, G\LL 1 -800-334-5470 - 
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GENERAL 



The Model II wins when compared to the IBM 5150. 



Radio Shack vs IBM 



Roger Van Ghent 
125 Woodhull Road 
Huntington, NY 11743 



Comparisons of small business micro- 
computer systems help make the deci- 
sion about which system to buy. This article 
compares IBM's 5150 Model 824 and Radio 
Shack's TRS-80 Model II. 

Most computer systems are made up 
of the following major components: pro- 
cessor, memory, disk, tape, console, print- 
er, communications, and software. My 
analysis covers each of these components 
in turn. 

The Basic System 

Table 1 shows the small business config- 
uration plus display and printer options of 
the IBM 5150 Model 824. Table 2 shows the 
64K small business configuration plus 
printer option of the Radio Shack TRS-80 
Model II. Both models have power-up diag- 
nostics, user manuals and 90-day warran- 
ties. Both vendors provide field service at 
special service centers and optional main- 



IBM 5150 Model 824 


1 


System unit with 40K bytes of Read Only 




Memory and 64K bytes of user memory 


1 


Keyboard 


1 


5 Vi" disk expansion drive adapter 


2 


5 'A" 160K byte disk drives (total 320K bytes on 




line) 


1 


Asynchronous communications adapter 


2 


Additional expansion slots 


1 


Cassette attachment jack 


1 


Tone speaker 


1 


Monochrome display and printer adapter 


1 


Monochrome display 


1 


80 character per second dot matrix printer 


1 


Printer cable 


1 


Disk Operating System and advanced level 




Basic language software 


1 


Asynchronous communications support 




software 




Total cost $4615.00 


, 


Table 1. IBM System. 



tenance contracts. Radio Shack provides 
an on-site maintenance service option. 

The IBM system is less expensive than 
Radio Shack's by $483.00. If you substitute 
word processing quality printers for the 
matrix printers (a NEC Spinwriter 3530 
33cps on the IBM system, and a Daisy 
Wheel II 43cps on the Radio Shack system) 
the prices are: IBM $6410, Radio Shack 
$5898, a difference of $515 in Radio 
Shack's favor. 

Processor 

Comparison criteria for processors are 
speed (in cycles per second), word size (in 
bits), addressing capacity and instruction 
set. One character can be stored in eight 
bits. An instruction takes 4-20 machine 
cycles and 1-6 words. Roughly 10 instruc- 
tions execute one line of Basic code. 

The IBM's processor is an Intel 8088 eight 
bit chip, which runs at 4.77 million cycles 
per second. It can perform a 16 bit multipli- 
cation or division and address one million 
bytes of memory. 

The Model IPs processor is a Zilog Z80A 
eight bit chip which runs at four million 
cycles per second. It can address up to 64K 
bytes of memory, the full capacity of 
the package. 

IBM's chip is 20 percent faster and has 
substantially more addressing and compu- 
tational capability. You cannot use the full 
addressing capability in IBM's package, 
however. Radio Shack's widely used micro- 
processor has high reliability and is com- 
patible with virtually every program written 
for microprocessors. 

Memory 

Computer memory is measured in bytes 
(a byte is computerese for a character such 
as A-Z, 0-9, and other special marks or 
symbols). Not all of a computer's memory is 
available to an application program. 

Starting with 64K bytes, IBM's disk oper- 
ating system uses 12K. The advanced disk 
Basic programming language required for 
communications uses 30.5K and allows 
33.5K bytes for user programs and data. 



Starting with 64K, Radio Shack's oper- 
ating system uses 10.25K bytes. Basic 
uses 18K and allows 35K bytes of us- 
able memory. 

Both systems have enough memory for 
approximately a 1000 line Basic program; 
IBM's operating sytem is slightly larger. 

Disk 

Both machines have floppy disk storage. 
The significant characteristics of disks are 
capacity and transfer rate. 

The IBM system has two 5 1 /4 " disk drives, 
using removable minifloppy disks. Each 
disk holds 160,000 characters, a total of 
320,000 characters of online storage. After 
the space required by the Disk Operating 
System and Basic is subtracted, available 
storage for programs and data is at most 
277,500 characters (probably less due to 
disk overhead such as directory tracks). The 
IBM drive transfers data at 20,480 char- 
acters per second. 

The Model II has one 8" double density 
disk drive, using removable floppy disk stor- 
ing up to 509,184 characters each. When 
the directory tracks, operating system and 
Basic storage is subtracted, available 
space is 416,000 characters. The Radio 
Shack disk drive transfers data at 62,500 
characters per second. 

Radio Shack's disk holds at least 50 
percent more information than both of 
IBM's and transfers that information 300 
percent faster. Radio Shack's disk stor- 
age can be increased to a total of 35,000,000 
characters. 

Tape 

The IBM 5150 supports cassette tape 
storage (the user supplies the tape deck), 
but this is not a practical option for a busi- 
ness computer. The Radio Shack Model II 
does not support tape. 

Console 

Both systems have similar keyboards, 
with calculator pads, a tilt (IBM's is adjust- 
able), and user-defined function keys (IBM 
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"Much more software has been written for 
Radio Shack's small system than for IBM's." 



has 10, Radio Shack has 2). IBM' keys re- 
peat when held down; Radio Shack has a 
Repeat key. 

The display units are both 80-character 
columns and 24 or 25 rows. Both allow 
double-size character display, line graph- 
ics, reverse image, and lowercase with true 
descenders. The IBM unit has high intensi- 
ty, underlining and blink features. Radio 
Shack's screen is black and white, IBM's is 
green. Radio Shack's screen is built into the 
cabinet, IBM's plugs in separately. (IBM 
allows a tv instead of monochrome display, 
but does not sell the tv set or RF modulator.) 



Printer 

The IBM printer (an Epson printer) prints 
bidirectionally at 80 characters per second 
on pin fed continuous form fan-fold. The 
paper may be up to 10" wide, including tear- 
off pin feed strips. 

The Radio Shack Line Printer VI prints bi- 
directionally at 100 characters per second. 
A removable tractor allows both pin fed and 
sheet fed paper. The paper can be from 4" 
to 14 7/8" wide (standard computer size). 

The Radio Shack unit has a sheet feed 
feature and 25 percent greater speed than 
the IBM. The sheet feed feature is essential 
for word processing applications. 

Radio Shack sells two less expensive 
printers (not recommended for business 
purposes) and two more expensive printers, 
one for heavy duty business use (such as 
label production, personalized form letters, 
large inventory reports), and a letter quality 
Daisy Wheel printer with proportional spac- 
ing and different type styles (ideal for word 
processing). IBM does not have any other 
printer, but other makes of printer (such as 
aNECSpinwriter)can be attached if a paral- 
lel interface is added to the configuration. 

Communications 

A computer system communications 
ability is described in terms of its protocols 
(how it shakes hands with the computer it 
talks to), and rate, measured in bits per sec- 
ond. Both these systems support asynchro- 
nous communications (a commonly used 
protocol) through their RS-232C ports. 

IBM's asynchronous communications 
support option, not included in the standard 
configuration, allows communications with 
other microprocessors and larger comput- 
ers which support this protocol (most do). It 
allows transfer rates of 75-2400 bps. 

The Model II comes with asynchronous 
software. In addition, Radio Shack sellstwo 
bisynchronous communications packages 
—3780 and 3270 protocols— allowing the 
TRS-80 to communicate with host comput- 
ers (IBM 370 and 30 main frames) as a re- 



mote job entry terminal or as a special input 
terminal for software such as IBM's TSO, 
CICS, VM/CMS, and IMS. Transfer rates on 
this model can vary from 110 to 9600 bits 
per second. 

Radio Shack's system provides a more 
complete set of communications software 
than the IBM system, and supports higher 
transfer rates. 

Software 

The measure of any computer system is 
its software. Both sytems use variants of 
Microsoft's Basic. IBM supports color 
graphics (requiring a color display) and 
tones; Radio Shack does not. Radio Shack 
has a compiler Basic (which runs much 
faster than either vender's interpretive Ba- 
sic), a multi-key access Cobol (for busi- 
application programming), Fortran (for en- 
gineering and mathematical applications), 
and an Assembler. IBM has Pascal (a teach- 
ing language for computer professionals), 
but this language requires twice the memo- 
ry (128 thousand bytes). 

Both models allow automatic job stream 
execution at start up. Both systems have 
Accounts Receivable, Payable and General 
Ledger, Visicalc (a powerful calculating 
tool), and word processing. Radio Shack 
has the software shown in Table 3. IBM has 
only Microsoft Adventure, a game. 

Much more software has been written for 
Radio Shack's small business system than 
for IBM's, and Radio Shack can support 
several higher level languages. IBM's sys- 
tem can support one higher level language 
if its memory is doubled (for $540). 



In Conclusion 

The IBM small business configuration is 
$483.00 less, the word processing configur- 
ation $515.00 more, than Radio Shack's. 
IBM's processor is 20 percent faster and 
has more addressing and machine instruc- 
tion capability. 

The Radio Shack's usable memory is 
slightly more than IBM's. Both machines 
will handle approximately a 1000 line Basic 
program. Radio Shack's disk stores at least 
50 percent more information than both of 



IBM's combined, and transfers that infor- 
mation 300 percent faster. Much more 
disk storage can be added to the Radio 
Shack system. 

The consoles and printers are very simi- 
lar, but the Radio Shack printer has a sheet 
feed feature and is 25 percent faster. 

Radio Shack sells more communications 
software and supports higher transfer rates 
than IBM does for its system. 

Much more software has been written for 
Radio Shack's small business system than 
for IBM's. Radio Shack supports faster Ba- 
sic, Cobol and Fortran compilers and an as- 
sembler. The IBM system supports Pascal if 
its memory is doubled. 

The two machines are about equal in 
power and price, but Radio Shack sup- 
ports a much faster and larger disk and 
much more development and application 
software than IBM's small business 
system. It also has more hardware options 
(printers, disks and plotters) to fit the 
user's needs. ■ 



Robert Van Ghent, a consulting software 
engineer, specializes in system analysis 
and design. Robert has managed applica- 
tion development projects in the media and 
banking industries, and is an expert in pro- 
grammer productivity. 



Radio Shack TRS-80 Model II 


1 


System unit with 64K bytes of memory 


1 


Keyboard 


1 


8" double density 500K byte disk drive 


1 


Video display 


1 


Bootstrap read only memory 


4 


Additional expansion slots 


1 


Parallel port (for printer) 


2 


RS-232C serial ports 


1 


External disk bay port 


1 


Line printer VI (100 character per second print 




speed) 


1 


Printer cable 


1 


TRSDOS (Disk Operating Sytem) and Basic 




language software 




Total cost $5098.00 




Table 2. Radio Shack System. 



Payroll 


Order Entry 


Inventory Control 


Sales Analysis 


Profile II. a filing system 


Mailing List 


Medical Office System 


Manufacturing Inventory System 


Job Costing 


Personnel Search 


Litigation Support Package 


WESTLAW 


Time Accounting for Professionals 


Statistical Analysis 


Scripsit Dictionary 


Color Plotting Printer Package 


Table 3. Radio Shack Software. 
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WINCHESTER 
HARD DISK 

for 

TRS-8CT 

Add 6.3 meg to 19 meg to your TRS- 80 



Integral Winchester 
Business System includes 
48K MODEL III, DOS, 
DISK III™, 6.3 MEG 
HARD DISK (internal). 

$4995 




$2895 

6.3 MEGABYTE 

WINCHESTER 

HARD DISK SUBSYSTEM 

With Chassis, PS, DOS. 

9.5 MEG $3395.00 



VR Data Winchester HD 
Subsystem Features: 

• TRSDOS Compatible Operating System 

• State-of-the-Art Circuitry 

• Full Calibration, Test and Burn-in 

• Up to 4 drive configuration 

• Heavy duty Power supplies 

• Warranty-120 days-parts & labor 

• 115/230 VAC, 50/60 Hz. 



Optional Mod III Configurations: 

9.5 Meg HD (internal) add $500.00 

80 tk1 side floppy add $120.00 

80 tk 2 side floppy add $240.00 

Optional Winchester Subsystem 

configurations: 

2x6.3 meg drives $4495.00 

2x9.5 meg drives $5495.00 



Model III Communications 



COMING SOON 

d-con $299, 

Integral Modem 
NEEDS NO RS232 
— Direct Connect 
Programmable Dialing 
AUTO ANSWER/ORIGINATE 
Easy Installation 



$75, 



HERE NOW 

VR-RS232C 

Direct Replacement For R.S. RS232 
Fully Tested & Burned-ln 
Easy Installation 
120 Day Warranty 
Programmable Pincut 
Prototype Area 



Phone 800-345-8102 • in PA 215-461-5300 

VR Data Corporation 
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DISK 111 

100% Compatible 



Model III Disks 



Complete Business 
System includes: 
48K TRS-80™ Model 
III, Disk III™ 2 Drive 
System, TRSDOS 
and Manual. 



$1882 




DISK III Single 
drive assy 



$599 



DISK III Two 

drive assy 864.00 
DISK III Assy 

w/out drives 435.00 
TRSDOS™ & 

Manual 



21.90 



1 DISK III single drive assembly includes: one 40 track 
5'/4" double density drive, power supply, controller, 
mounting hardware, and applicable cables. 



External drives 



(3&4) 



275.00ea 



IMMEDIATE DELIVERY - COMPARE AND SAVE 

VR Data's DISK III features: 

• Completely compatible with TRSDOS 

• State-of-the-art circuitry 

• Fully tested, calibrated & burned-in 

• Up to 4 drive configuration 

• Warranty 120 days - 100% parts and labor 

• Installation with simple hand tools 

• Optional 80 tk and 2 sided drives 

• READ 40 - Pgm. to read 40 tk. Diskettes 

on 80tk. Drives $25.00 

• FCC CERTIFIED 



Peripherals 




Epson MX-80 


500.00 


Epson MX-80 FT 


615.00 


Epson MX-100 


800.00 


Centronics 739 


700.00 


Starwriter25(P) 


1395.00 


RS-232 


95.00 


Lexicon modem 


105.00 



MODEL l/IH 
EXTERNAL DRIVE 
W/ PS & ENC 

Fully Compatible 
120 day warranty 
Easy installation 
80 tk or 2 sided 
80tk&2sided 




$419.00 
549.00 



IF YOU DON'T SEE IT ADVERTISED CALL US AND ASK FOR IT. 

PUBLISHED PRICES REFLECT CASH DISCOUNT. 

ALL PRICES ARE SUBJECT TO CHANGE WITHOUT NOTICE. 

TRS-80 and TRSDOS are trademarks of Tandy Corp. 

DISK III is a trademark of VR Data Corp. 1 Dealership available. 



OTHER PRODUCTS 

SUPERBRAIN 64K 
PARALLEL PORT — 

SUPERBRAIN 
DISK & MYSTERIES 
BASIC & MYSTERIES 
NEC Ribbons (min. 6) 
Epson Ribbons 
NEW— 
LDOS Operating 

System 
COMING SOON!! 
Internal MODEM for MOD 



2990.00 

99.95 
22.50 
29.95 
5.95 
12.50 



149.00 



CABLE "VRDATA" • TELEX 845-124 
777 Henderson Boulevard • Folcroft, PA 19032 



VISA' 
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HARDWARE 



A single-board compiler in a kit. 



Building an M-80 



James Hawkes 
College of Charleston 
Charleston, SC 29401 

Grady R. Reese 
500 Tulip Street 
Somerville, SC 29483 



Why would a TRS-80 owner 
be interested in the M-80, 
a single board microcomputer 
utilizing the Z80 CPU? Possible 
control applications include 
home environmental systems, 
security systems, household ap- 
pliances, and computer peri- 
pherals such as printers, plot- 
ters, and tape drives. The TRS-80 
can handle these chores; never- 
theless, most of us don't want to 
commit such an expensive ma- 
chine to these mundane and 
time-consuming tasks. 

The M-80 kit, available for only 
$99, does not have the conve- 
nience of a keyboard and a video 
display— not to mention disk 
and tape drives, printers, and 
the cache of development soft- 
ware which exists for the 
TRS-80. But anyone with a 
TRS-80 can use it as a terminal 
for developing programs direct- 
ly on the M-80. Software can 
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also be developed for the M-80 
using TRS-80 editors, assem- 
blers or compilers and then 
downloaded to the M-80 for ex- 
ecution. 

M-80 Hardware 

The heart of this micro is the 
Z80 microprocessor, the same 
microprocessor that controls 
the TRS-80. Thus, any properly 
designed machine language 
program written on the TRS-80 
can be executed by the M-80. 

The M-80 is operated on 2 
MHz by a clock circuit con- 
sisting of five sections of U11, a 
CD4049 CMOS hex inverter 
which is used as an oscillator 
and buffer (see Fig. 1). 

Address decoding is ac- 
complished by U9, a 74LS154 
four line to six line decoder. This 
device decodes the addresses 
from 0000 hex to 3C00 hex in 1 K 
increments. Notice that this 16K 
address space is not uniquely 
assigned since the A15 address 
line is not used in the decoding 
scheme. This means that the 
memory from 0000 to 3C00 will 
duplicate itself in memory loca- 
tions above 3C00. 

Memory for the M-80 consists 
of two 2708 EPROMs and two 1 K 

1982 



banks of 2114 static RAM. Two 
sections of U10, a 74LS32 quad 
2 input OR gate, are used to 
select one of the two EPROMs. 
Also, one section of U10 is used 
to OR A14 and the MREQ (active 
low) signals from the CPU. In 
this design, both signals must 
be low to get a high from the OR 
gate, satisfying the G1 input of 
the decoder. A section of U11, 
the CD4049 inverter, is used to 
invert the CPU refresh (active 
low) signal for application to the 
G2 input. This prevents the 
static RAM's and EPROMs from 
participating in a refresh cycle. 
The one remaining section of 
U10 is not used and can serve as 
a spare gate. 

The M-80 microcomputer pro- 
vides input/output and 128 bytes 
of RAM with a multi-purpose 
chip, U1 (National Semiconduc- 
tor's INS8154 RAM I/O). The 
8154 contains 1024 bits of static 
memory organized into 128 
bytes plus 16 lines of I/O on a 40 
pin dual in line package. The 16 
I/O lines are designed to provide 
two 8-bit parallel ports (A and B). 

Port A can be configured in 
four parallel modes specified by 
placing appropriate values in 
the output definition registers: 



basic I/O (no handshaking); 
strobed input; strobed output; 
and strobed output with tri- 
state. Port B can be used only in 
the basic mode— no handshak- 
ing is available. 

In addition to reading and 
writing to ports A and B in 8-bit 
bytes, you may elect to set, 
clear, or read any individual byte 
in either port. This capability 
provides a means for serial com- 
munications and enhances ef- 
fectiveness in control applica- 
tions. 

If your application requires 
additional memory or I/O de- 
vices there will be very little dif- 
ficulty interfacing since the 
M-80 provides 16K of decoded 
address space of which only 4K 
is currently used. To further 
simplify interfacing, the excel- 
lent manual provides drawings 
detailing the use of many de- 
vices such as RS232 to TTL and 
TTL to RS232 converters (see 
Fig. 3), A/D D/A converters and 
port expansion circuits. 

The power supply chosen for 
this project must provide plus 
five volts at 280 mA, + 12 volts 
at 60 mA, and minus five volts at 
35 mA. An additional source of 
-12 volts at 60 mA must be 




Reprinted with permission from Miller 
Technologies. 



Fig. 1. 



available for the RS232 and TTL 
converter circuits described lat- 
er. We used the power supply 
described by Don Walters in 
"The Mighty Five Way Power 
Supply" (Kilobaud Microcomput- 
ing, April 1980). The supply 
shown in Fig. 4 is included 
for those who prefer to build 
their own. 

Software 

To complement the versatility 
in hardware there is also excel- 
lent software available for the 
M-80 in the form of a 1 K monitor 
and a 2K Basic. 



The monitor has commands 
that allows memory to be 
dumped; data entered into mem- 
ory; memory to be downloaded; 
execute a program; set a break 
point; proceed from a break 
point; set a bit; and test a bit. 
The documentation also pro- 
vides the addresses of numer- 
ous subroutines in the monitor, 
greatly simplifying those tasks 
which might otherwise have to 
be written in machine language. 

Also available on two 2708 
EPROMs is a powerful 2K in- 
teger Basic interpreter modeled 
after Palo Alto Tiny Basic by Li- 



Chen Wang as presented in Dr. 
Dobbs Journal, May 1976. This 
Basic compares favorably with 
the 4K Basic offered by Radio 
Shack. The instruction set (see 
Table 1) is rather extensive given 



the comparatively small amount 
of code required for the inter- 
preter. 

The language permits 26 var- 
iables denoted by the letters A 
through Z. There is also a single 
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Fig. 3. RS232 and TTL converter. 




Fig. 4. Power Supply. 



array, designated @( ), whose 
size is a function of available 
memory. To conserve memory, 
virtually all commands have one 
or two letter abbreviations. 

The GOTO statement in the 
language is syntactically un- 
conventional: It permits the user 
to compute the line which is the 
object of the statement. Thus, 



GOTO 3*X + 2 will transfer con- 
trol to the line whose value 
equals 3*X + 2. Equally unusual 
is the ability to mix logical and 
arithmetic expressions in an as- 
signment statement. For exam- 
ple LET C = D*(A>B) + 6 will 
assign the value 6 to the variable 
C if the logical expression A>B 
is false and D + 6 if A>B is true. 



FREE 

business software 
directory 

• Radio Shack's Model I, II, III. 

• Heath's M BASIC and HDOS 

• CPM: Xerox, Alto... 

• IBM Personal Computer 



IDM2 is GREAT !" 



-publisher of 80- US 



" (GL) superior to either the Osborne (SBSG & Taranto) 
or Radio Shack ... MAI L-X has a greater capacity. . . 
more flexible than (R.S.)" 

-columnist of 80-microcomputing 

" imperceptively fast .. .(DBMS) is a good and reliable 
workhorse" -publisher of Interface Age 

Data base manager, integrated accounting package 
(AR, AP, GL & Payroll), inventory, word proces- 
sing, and mailing list. Compare and be selective ! 



a^ 



Micro Architect, Inc. 

96 Dothan St., Arlington, MA 02174 



^149 



Another useful feature is the 
ability to jump to a machine 
language routine and return to 
Basic, implemented by the 
CALL command. 

Interface to the TRS-80 

Both the machine language 
monitor and Basic were written 
to communicate in a serial 
mode with a host terminal. Thus, 
the M-80 can communicate with 
the TRS-80 through the RS232 
board if the TTL I/O on pins two 
and three of the 8154 is con- 
verted to RS232 compatible 
signals. This can be done with 
the RS232 to TTL and TTL to 
RS232 converter circuits shown 
in the M-80 manual (see Fig. 3). 
Electronic Systems of San Jose, 
CA offers a 2-square inch 
printed circuit board containing 
both circuits for about $10 in kit 
form. Regardless of whether you 
construct or purchase the above 
circuit, we suggest you obtain a 
female DB25 connector to con- 
nect with the RS232 lines from 
the TRS-80. For the connection 
details, see Fig. 2. 

Communicating 

Any terminal program should 
work once it is properly con- 
figured for the serial protocol ex- 
pected by the M-80 (8-bit word, 
no parity, and one stop bit). Even 
the Term program included with 
your RS232 package will do the 
job. 

Although we eventually were 
able to use the ST80D package, 
our first efforts were not suc- 
cessful. Because ST80D was 



written to be used with a 
modem, the program expects 
the modem to transmit the Clear 
to Send signal when communi- 
cation is established. As soon 
as we provided this signal, by 
connecting pins four and five in- 
side the female DB25 cable con- 
nector used on the M-80, ST80D 
functioned perfectly. 

By using the ST80D and its 
utilities, you will be able to 
download machine language or 
Basic software created on the 
TRS-80 to the M-80 for execu- 
tion. This will ease development 
work and accelerate applica- 
tions. 

Applications 

The M-80 is a perfect board for 
dedicated control applications 
such as heating and cooling 
systems, security systems, and 
watering systems. In addition, it 
could control a printer or plotter 
and execute specialized graph- 
ics software as directed by a 
host processor. Parallel pro- 
cessing would certainly make 
gaming applications far more 
powerful. Imagine the strength 
of the chess playing program, 
Sargon, if it had been written to 
be executed on a multipro- 
cessor system. 

Our experience with the M-80 
has been very satisfying: We 
had the microcomputer up and 
running within 20 minutes of 
building the TTL to RS232 con- 
verter. Next we plan to build a 
control system for heating and 
cooling a home, using the M-80 
as the controller. ■ 
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MULTI 



III 




Model III Now Available 

What Do You Use Your 
TRS-80®For? 

*** Word Processing ? 

MULTIDOS will permit you to 'grab' a formatted diskette, shove it into a track compatible 
drive, and write to it - no matter if it is single density, double density, or DBLDOS™ density. This 
is possible because of MULTIDOS' automatic density, recognition which includes diskettes for- 
matted by DBLDOS™ — similar to NEWDOS/80 2.0. 

*** Basic Programming ? 

"MULTIDOS' BASIC is unequaled, in both features and size, among TRS-80® Disk Basics'' 

— Paul Wiener, 19oV 

Included is B BASIC/CMD which has all of the "BOSS" single step and trace features. Now 
you can insert 'break points' to turn on/off the trace and/or single stepping in your BASIC program. 
Now you can save the screen as formatted and look at variable values. Afterward, return the screen 
as before and continue your BASIC program. 

*** Whatever 

MULTIDOS Is Easy To Learn — Easy To Use! 

DOS commands may be repeated, even multiple DOS commands. System utilities never 
require more than 2 keystrokes per query . . . 

Now That's Easy ! To Make It Easier There Is A 'Help File' ! 



MULTIDOS 
Model I or Model III 



On,y*79 95 

(Watch The Competition Squirm !) 



MULTIDOS Now Available From: 

WARLOCK WAREHOUSE 

1691 Eason. Ponliac. Ml 48054 
(313) 673-2224 or (313) 673-8700 

— AND — 

POWERSOFT 

1 1500 Stemmons Fwy Suite 125 
Dallas. TX 75229 
(2)4) 484-9428 



Cosmopolitan Electronics Corporation 

P.O. Box 234 . Plymouth, Michigan 48170 
(313) 397-3126 

— Dealer Inquiries Welcomed — 



VISA 



COD - Cash or Certified Check 

Personal Checks - Allow 
2 Weeks To Clear 

ADD $3.00 
For Shipping & Handling. 
Michigan Residents Include 



{S 




■ See List ol Advertisers on page 402 
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BUSINESS 



Used to be you couldn't take it with you 
because the government took it first 



Tax Relief for the Rich 



Charles R. Perelman, P.C. 
9777 Wilshire Boulevard #700 
Beverly Hills, CA 90212 

The most substantial estate 
tax changes in over 25 years 
became effective January 1, 
1982. On August 13, 1981 Presi- 
dent Reagan signed into law the 
Economic Recovery Tax Act, af- 
fectionately known by profes- 
sionals as the Accountants' and 
Lawyers' Relief Act of 1981. 

The present threshold of 
$175,625 for federal estate and 
gift taxes will increase from 1982 
through 1987 to $600,000. The 



The Key Box 

CBasic 2 
Model II 



maximum estate tax rate will de- 
cline from the current 70 percent 
to 65 percent in 1982 and five 
percent in each of the subse- 
quent three years to 50 percent 
for 1985 and succeeding years. 

Perhaps the most significant 
provision is an unlimited marital 
deduction. You may leave your 
spouse any amount of property 
without tax— provided all prop- 
erty qualifying for the marital de- 
duction remaining when the sur- 
vivor for the marital deduction 
dies will then be taxed (assum- 
ing, of course, that the second 
spouse has not remarried and 
left the estate to another surviv- 
ing spouse!). 

For the next several years, as 
the rates change, you must con- 
tend with a number of additional 
variables in the estate planning 
equation. With Estate Planner 
you can make assumptions and 



rapidly compute the effects 
upon estate tax of factors such 
as year of death, size of estate 
and use of the marital deduction. 
Forecast the size of your 
estate and determine your prob- 
able tax liabilities in future 
years. If you desire to carry life 
insurance for payment of estate 
taxes, the program enables you 
to determine your needs during 
the transitional years as the new 
limits go into effect. The de- 
tailed schedule headings are 
the same as those on form 706, 
the Federal Estate Tax Return. If 
you are preparing a return with 
data taken directly from your 
schedules, the program will 
compute the tax for you. 

Program Details 

The program was written for a 
TRS-80 Model II in CBasic 2. 
Whole word variables make the 



program easy to follow or con- 
vert to Microsoft Basic for TRS- 
DOS. Control variable Y choos- 
es the exemption, credit, maxi- 
mum estate tax rate and value at 
which the maximum rate is ef- 
fective for the computation 
year. The flags control screen 
and printer output. When 
PFLAG1 (for PRINT FLAG 1) is 
set, you get a screen summary 
of the items used to determine 
taxable estate. PFLAG2 con- 
trols printing of the credit for 
state death taxes. When 
PFLAG3 is set you get a print- 
out. The remaining two print 
control flags implement your 
choice of printout for details of 
assets and deductions if they 
were entered. 

You can enter assets or de- 
ductions individually, as a total, 
or work from the figure for tax- 
able estate. You can prepare a 



Estate Planning for Wife of John Client Computation Year 1994 

Taxable Estate $1,000,000.00 

Total Tax $345,800.00 

Credit Against Tax $192,800.00 

Net Estate Tax $153,000.00 

State Death Tax Credit $33,200.00 

Estate Tax Less State Death Tax Credit 



Table 1 



$119,800.00 



Estate Planning for Wife of Eni Baude Computation Year 1998 

Taxable Estate $7,500,000.00 

Total Tax $3,525,800.00 

Credit Against Tax $192,800.00 

Net Estate Tax $3,333,000.00 

State Death Tax Credit $705,200.00 

Estate Tax Less State Death Tax Credit 



$2,627,800.00 



Table 3 



Estate Planning for Wife of John Client Computation Year 1994 

Taxable Estate $675,000.00 

Total Tax $220,550.00 

Credit Against Tax $192,800.00 

Net Estate Tax $27,750.00 

State Death Tax Credit $17,000.00 

Estate Tax Less State Death Tax Credit 



$10,750.00 



Table 2 
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Estate Planning for Wife of Eni Baude Computation Year 1998 

Taxable Estate $6,600,000.00 

Total Tax $3,075,800.00 

Credit Against Tax $192,800.00 

Net Estate Tax $2,883,000.00 

State Death Tax Credit $586,800.00 



Estate Tax Less State Death Tax Credit 



Table 4 



$2,296,200.00 



Model III 

DISK SYSTEMS 

We have upgraded the TRS80 Model III 16k 
Computer to 48k with our own high quality 
memory chips and added our top of the line 
disk drive systems to make this your best buy 
of the season. These computers are 
functionally identical to the Radio Shack 
units sold at computer centers for $500 more. 
Only prime high quality components 
(described below) are used in the 
construction of these units. These computers 
have the same type double density disk drives 
as the original. They have the same storage 
capacity, are completely software compatible 
with TRSDOS, DOSPLUS, NEWDOS/80, 
LDOS, VTOS and many other disk operating 
systems, and are compatible with all BASIC 
applications software available for the Model 
III. 




INSTRUCTIONS - For kit installations we 
provide complete instructions. 



Vc 



'COMPUTER - The Model III computer unit is 
an original unit which has extended BASIC 
and upper/lower case. It is packed in original 
factory packing, and is new and unused. Each 
computer, after having the drive systems and 
memory added, must pass a 24 hour burn-in 
test to assure maximum reliability. 



VoiSK DRIVES - TCS offers standard 5 1/4" 
disk drives from TANDON, the same people 
that make the original drives for the Model III. 
These drives have band head positioning for 
long life, and have a fast 5 millisecond track to 
track access time. This means that if LDOS or 
one of the other fine disk operating systems is 
used, the track access time may be adjusted 
to allow faster operation of the entire system. 
Some brands of drives (Siemens, older 
Shugart) have access times as slow as 40 
milliseconds, which can result in slow system 
speed especially when a considerable 
amount of random disk I/O is needed, such as 
programs manipulating large lists of data. 
This means that you should check track 
access capability before deciding on a 
particular drive. Each of our drives is tested 
fully for alignment, speed and proper 
operation before shipment. 




VdISK CONTROLLER - TCS uses a high 
quality, double sided glass epoxy disk 
controller board that has GOLD plated edge 
connectors for reliable data connection. We 
use a reliable digital data separator design for 
the upmost in long life reliability. This means 
that adjustments NEVER need be made to the 
controller circuit for it to keep separating data 
correctly. This is the highest quality disk 
controller board available for the Model III. 



i 



^MOUNTING HARDWARE & CABLING - The 

disk drive mounting hardware is aluminum 
sheet construction for easy installation and 
the disk mounting holes are slotted to allow 
adjustment of the drives for exact alignment. 
The power and data cables are all included 
and are plug compatible with each unit. No 
soldering or tools are needed for installation 
other than a screwdriver. 



V, 



POWER SUPPLY - Where many companies 
cut corners, TCS has chosen the finest 
switching power supply available. A 
switching power supply is much more 
efficient than linear supplies, which means 
that the TCS supply creates less heat than a 
linear supply, and it uses less energy. As a 
result, the internal parts of the Model III can 
operate cooler (the Model III has no cooling 
fan) without the need of an expensive internal 
cooling system. This power supply is the 
same commercial grade switcher that is used 
in the original more expensive Model III. 



KIT 1 Controller, power supply t - 7Q 

& Mounting Hardware 901 v 

KIT 2 Kit 1 plus one Tandon *ene 

Disk Drive $D5IO 

KIT 3 Kit 1 plus two Tandon #q 40 

Disk Drives *0 13 

KIT 4 One Disk Drive only $219 

KIT 5 16k TCS Memory $49 

KIT 6 32k TCS Memory $79 



For complete assembled and tested Model III 
Systems using these kits see our other ad In 
this Issue of this magazine. 



Introducing The B-TREE SERIES 

B-TREE Mailing List Disk $49.95 WHAT IS THE B-TREE? 



MEMORY - The memory used in the TCS 
Model III is the highest quality Japanese 
made memory available. In a recent test, 
Japanese memory was shown to be over 
twice as reliable as American made memory 
of the same type. We use only first line (no 
surplus) chips that are rated 200 
nanoseconds or faster. Each set of memory 
units installed by our technicians is tested 
using several of the best commercial memory 
test programs available. These tests last for a 
period of over 24 hours. 



A mailing list application data base. Allows the maintenance ot 
about 1500 to 2000 names on a single double density DATA disk. 
Display or print in order by name or by zip code (allows 9 digits). 
Print mailing labels by zip, name or user selected category. Dup- 
licate names are allowed as well as optional data fields for each 
record. Also allows two line addresses for long addresses or 
company names and phone number. 

B-TREE Library Program Disk $39.95 

A complete library maintenance data base system which allows 
storage of the book title, author, category, and 2 other user 
selected fields. Over 2000 books can be maintained on one 
double density DATA disk. Average search time by author is 2 
seconds with 2000 records in file. Complete reports include: 
1)Alphabetical listing of file by author, 2)List all books of one 
author by title or alphabetical by title. 3)List all books in a 
selected category, etc. 

B-TREE Video Program Disk $39.95 

A complete data base for your video cassette collection. Al- 
lows entry of each program tne stars, Video I.D. number, starting 
counter number, category & length. Over 1000 programs with 
over 300 cassettes can be storeo on one double density DATA 
disk Special reports include: 1)Printed Labels, 2)Alphabetical 
listing by stars, 3)Alpha Listing by Program. 4)Listings by cas- 
sette. 5)time left on each cassette report, etc. 



The above Series of programs have many exclusive features. 
Each application program stores a variety of data in a B-TREE 
Structured file. The B-Tree file organization method allows fast 
and efficient access to a large amount of data. With B-TREE, a 
whole disk of data can be accessed in alphabetic or numeric 
order without sorting or merging and all in a minimum of time. 
The user may add, delete, edit, list, print and redisplay the data 
without any file reorganization necessary. This is one of the 
BEST ANSWERS to data Storage problems on microprocessors. 
Fully implements the BINARY search tree concepts 
including Insertion, delation, editing, & traversal. No sorting or 
long searches for data recovery is needed with B-TREE, yet even 
larger than memory files can 6e printed or displayed in sorted 
order without the necessity of sorts. Varing Key fields possible 
with duplicates allowed. These are BASIC programs (yet faster 
than many assembly language programs) with hundreds of 
REMark statements for easy modification or use of the modules 
in user programing. Also includes the best INKEY module ever 
written, allowing tne fastest direct screen oriented input you 
have seen. All programs are non-scrolling with SCREEN oriented 
design and have all information needed on screen at all times. 
Single Key stroke command sequences and complete error 
trapping as well as controlled input of data to any field Each 
package comes on a formatted diskette to run on TRSDOS 1.3, 
LDOS 5 1 , NEWD0S80 & DOSPLUS for TRS80 Model III computers 
and also for Model I using LDOS or DOSPLUS. Watch for new 
programs in our exclusive B-TREE series in upcoming months. 
MODEL II versions for TRSDOS and CP/M available soon with 
expanded capabilities. 



For fast, efficient service. Heart Of we can air freight from Dallas 

TEXAS COMPUTER SYSTEMS 

P.O. Box 1327 Arlington, Texas 76004-1327 

^VToll Free Number 800 433-5184 
Texas Residents 817 274-5625 
Dallas Metroplex 265-1524 






' Payment: Money order, cashiers check, 
certified check. Prices above reflect 3% cash 
discount. Call for VISA/MC prices. 



* Prices subject to change any time. 

* No tax out-of-state. Texans add 5%. 

* Many items shipped FREE. SCall. 



^59 



■ See List of Advertisers on page 402 
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Estate Planning for Eni Baude Computation Year 1988 
Taxable Estate $2,500,000.00 

Total Tax $1,025,800.00 

Credit Against Tax $192,800.00 

Net Estate Tax $833,000.00 

State Death Tax Credit $138,800.00 

Estate Tax Less State Death Tax Credit 



$694,200.00 



Table 5. 



Estate Planning tor Wife of Eni Baude Computation Year 1998 
Taxable Estate $3,750,000.00 

Total Tax $1,650,800.00 

Credit Against Tax $192,800.00 

Net Estate Tax $1 ,458,000.00 

State Death Tax Credit $144,400.00 

Estate Tax Less State Death Tax Credit 



$1,313,600.00 



Table 6. 



Program Listing 1 



rem 

rem estate tax planner 
rem by charles r. perelman 
rem written in cbasic2 

REM 

E$>">»*>»»»»i»,»». l 

D$«"$$##,###, ###.##•• 

DIM A$(20) 

A$(1)-"PLEASE PRESS NUMBER FOR ACTION DESIRED:" 



A$(2)«"SCHEDULE A 
A$(4)-"SCHEDULE C 
A$(5)«"SCHEDULE D 
A$(6)="SCHEDULE E 
A$(7)-"SCHEDULE F 
A$(8)-"SCHEDULE G 
A$(9)-"SCHEDULE H 
A$(l 1)-"SCHEDULE J 
A$(12)-"SCHEDULE K 
A$(13)-"SCHEDULE K 
A$(14)-"SCHEDULE L 
A$(15)-"SCHEDULE 



REAL ESTATE ": A$ ( 3) -"SCHEDULE B - STOCKS AND BONDS " 

MORTGAGES, NOTES AND CASH " 

INSURANCE ON DECEDENT'S LIFE " 

JOINTLY OWNED PROPERTY " 

OTHER MISCELLANEOUS PROPERTY " 

TRANSFERS DURING DECEDENT'S LIFE " 

POWERS OF APPOINTMENT ": A$ ( 10 ) -"SCHEDULE I - ANNUITIES 

- FUNERAL AND ADMINISTRATION EXPENSES " 

- DEBTS OF DECEDENT " 

- MORTGAGES AND LIENS " 

- NET LOSSES DURING ADMINISTRATION " 
L - EXPENSES OF PROPERTY NOT SUBJECT TO CLAIMS " 

A*(16)="SCHEDULE M - MARITAL DEDUCTION " 
AS(17)-"SCHEDULE - CHARITABLE DEDUCTION " 
A5(18)="ENTER AMOUNT FOR EACH SCHEDULE WITHOUT COMMAS-" 
A$(19)-"ENTER FOR NONE." 



3 PRI 

INP 

5 INP 

IF Z< 

FOR X 
IF Z 



NT CHR$(12) :PRIN 
UT"WHAT IS THE N 
UT"IN WHAT YEAR 

THEN PRINT:PR 
THIS PROGRAM IS 

1 TO 500:NEXT:P 



IF 
IF 
IF 
IF 



IF Z> 



THEN 
THEN 
THEN 
THEN 
THEN 
THEN 



Y-1:EXEMP 
Y-2: EXEMP 
Y-3:EXEMP 
Y-4:EXEMP 
Y-5:EXEMP 
Y-6: EXEMP 



T E$; 

AME 

IS TA 

INT\ 

ONLY 

RINT 

TION 

TION 

TION 

TION 

TION 

TION 



" ESTATE TAX PLANNER "; E$ : PRINT : PRINT 

F YOUR CLIENT? ";LINE CLIENT$ 

X TO BE DETERMINED? "; YEAR : Z-YEAR- 198 1 



1981. PLEASE REENTER. 



FOR YEARS AFTER 
CHR$(12):GOTO 5 

22 5 00:CREDIT-62 800:MAX-400O000:MAX.RATE-.6 5 
2 7 5000: CREDIT- 79 300: MAX- 3500000: MAX. RATE-. 60 
32 5 000: CREDIT- 9 6 300: MAX- 3000000: MAX. RATE-. 5 5 
40000 : CREDIT- 12 1800 :MAX-2 5000 00: MAX. RATE-. 50 
500000 : CREDIT- 15 5 800 : MAX- 2500000 : MAX. RATE-. 50 
600000: CREDIT- 19 2800: MAX- 2500000: MAX. RATE-. 50 

Program continues 



printout for presentation to 
clients. 

CHR$(12) clears the screen. 
CONCHAR% is similar to IN- 
KEY$ in Microsoft Basic, except 
it returns the ASCII value of the 
keyboard entry. CHR$(127) 
erases the prior character and 
clears the number of your 
choice from the screen. LPRINT- 
ER sends all Print commands to 
the printer rather than to the 
screen. CONSOLE reactivates 
the screen. 

After entering items on the 
detailed schedules, you can re- 
start this portion of the program 
if you made a mistake. An error 
trap is provided if the taxable 
estate does not exceed the 
threshold for estate tax in the 
computation year. 

If your estate is large enough 
to be subject to the maximum 
rate, line 520 routes the program 
to lines 2100-2400 for tax com- 
putation. When I examined the 
tax tables, I found that brackets 
were $250,000 or $500,000 apart. 
Therefore, when you have an 
estate subject to a rate less than 
the maximum, you will divide by 



• TRS ■ 80 (1) Model I 
or Model III 

48K, 2 disks 
TRSDOS (1 > or LDOS (2 > 
formats available 

PRICE $149.50 

• TRS ■ 80 (1) Model II 

64K, 2 disks 
TRSDOS (1 > format 
expanded version 

PRICE $224.50 



GANTT-PACK: AUTOMATED PROJECT CHARTS 

This powerful, flexible program will save you time in project planning, 
scheduling, tracking and reporting. You need no prior Gantt experience; 
screen prompts guide you all the way. Scratchpad entry lets you keep 
track of unassigned tasks while structuring your project. Automatic 
project organization. Fast edit lets you correct errors, modify schedules, 
explore alternatives. Saves alternative plans from original database. 
Helps you visualize the project at all stages. 

Large capacity allows up to 100 tasks per phase and multiple phases per 
project, each phase with its own chart. Hard copy to parallel or serial 
printers. Scroll to any portion of any chart and print selected region. 
Charts show projected, elapsed and overrun times. Get professional 
results quickly and easily with Libra Lab's Gantt-Pack. 




Libra Laboratories, Inc. 
495 Main Street 
Metuchen, N.J. 08840 

(201) 494-2224 



Gantt-Pack © Libra Laboratories, Inc. 1981 

(1) TRS-80 and TRSDOS Trademarks of Tandy Corp. 

(2) LDOS Trademark of Logical Systems, Inc. 
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ARCADE CENTER 



i^ 






i 



# T. T. 



ALIEN DEFENSE 

e 1981 Soft Sector Mkt. 
Mod I or III Tape. 16K 

$19.95 
Mod I or III Disk', 32K 

$24.95 

Only Mod III version has 
Extended Graphics 



111 «■ i 



SUPER VADERS 

e 1981 Soft Sector Mkt. 

Mod I or III Tape $19.95 
Mod I Disk $24.95 
Mod III Disk $24.95 

- 2 Player- 10 Levels - 
Ask for upgrade info for 

Invaders plus & 
trs-super invaders 





STAR FIGHTER 

by Adventure 

Mod I & III Tape 

$24.95 

Mod I Disk 

$29.95 



ATTACK FORCE 

by Big 5 

Mod I & III Tape 

$15.95 

Mod I & III Disk* 
$19.95 



SCARFMAN 

5 1981 Cornsoft Group 

Mod I & III Tape 

$15.95 
Mod I & III Disk 

$19.95 



rihiOiiOirihfOitfhrOifOitOi 
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I While Supply Lasts! 
GALAXY INVASION 

by Big 5 

Mod I & III Tape 

$15.95 
Mod I & III* Disk 

$19.95 



While Supply Lasts! 

ROBOT ATTACK 

by Big 5 

Mod I & III Tape 

$15.95 

Mod I & III Disk 

$19.95 




ti 




METEOR 
MISSION 2 

by Big 5 
Mod I & III Tape 

$15.95 
Mod I & III Disk* 

$19.95 



VOYAGE OF 
VALKYRIE 

Mod I & III Tape 

$34.95 
Mod I & III Disk 

$39.95 



80 SPACE RAIDERS 

Mod I & III Tape 
$24.95 



LUNAR LANDER 

by Adventure 

Mod I & III Tape 

$15.95 
Mod I & III Disk 

$20.95 



FORTRESS 

The Fastest Action 
Game of Them All! 

1981 Soft Sector Mkt. 

Mod I & III Tape 

$15.95 
Mod I or III" Disk 

$19.95 

See following page 
for picture. 



II 



SPECIAL DEAL - This Month Only 

Purchase 1 Game - List Price / Purchase 2 Games - Deduct 10% 
Purchase 3 Games - Deduct 15% / Purchase 5 Games - Deduct 20% 

- SPECIAL DEAL applies only to games purchased from this ad, at one time, and at list price - 



COD. - certified check. MO or cash only. Most orders 
shipped next day Ail orders must have shipping included 
Please add 2% or S2.50. whichever is higher for shipping 
Michigan restfents, please odd 4% tax Add extra S 1 50 for 
C.O.D Personal checks take 3 weeks to clear Out of the 
country orders add $1000 extra shipping 
' TRS-80 is a product of Radio Shack, drv of the Tandy Corp 



"These Disk versions save high score to disk. 

SOFT SECTOR MARKETING, 

INCORPORATED 
6250 Middlebelt ^Garden City, Michigan 48135 
Order Line 800-521-6504 
Michigan Orders & Questions 313-425-4020 




The Quality Continues 



Program continued 

10 PRINT CHR$(12) REM ASSET ENTRY ROUTINE 

PRINT: PRINT A$( 1) : PFLAG 1=0 : P FLAG 2=0 : PFLAG 3-0 : P FLAG 4=0 : PFLAG5=0 
PRINT"1. ENTER DETAILED ASSET INFORMATION- 
PRINT'^. ENTER SUMMARY FIGURE FOR ASSETS" 
PRINT"3. ENTER TOTAL TAXABLE ESTATE" 
15 Y%-CONCHAR% 
IF Y%-(32) THEN 15 
IF YZ<(49) OR Y%>(51) THEN PRINT CHR$(127):\ 

PRINT'PRESS NUMBER FROM 1 TO 3 PLEASE":FOR X=l TO 5 00 : NEXT : GOTO 
PRINT CHR$(127) : CHOICE-Y%-48 : ON CHOICE GOTO 100,200,500 

20 PRINT CHR$(12) :PRINT A$(l) REM DEDUCTIONS ENTRY MENU 

PRINT 1 1. ENTER DETAILED DEDUCTIONS DATA" 

PRINT"2. ENTER SUMMARY FIGURE FOR DEDUCTIONS" 

GOSUB 1500 

IF ERROR. FLAG-1 THEN 20 



10 



ON CHOICE GOTO 300,400 

100 PRINT CHR$(12) : PFLAG 1= 1 : PFLAG4- 1 
PRINT A$(18):PRINT A$(19):PRINT 



REM DETAILED ASSET SCHEDULES 



PRINT AS(2) ;TAB(50) ; : INPUT 
PRINT A$(4) ;TAB(50) ;: INPUT 
PRINT A$(6) ;TAB(50) ; 
PRINT A$(8);TAB(50) ; 
PRINT A$(9) ;TAB(50) ; 
PRINT A$(10) ;TAB(50) 



INPUT ■ 
INPUT ' 
INPUT • 
: INPUT 



S";RL.EST:PRINT AS ( 3 ) ; TAB ( 50 ) ; : INPUT " $";ST0CKS 
5";CASH:PRINT A$(5);TAB(50) ; :INPUT " $";INSURANCE 
$";JOINT:PRINT A$ ( 7 ) ; TAB ( 50 ) ; : INPUT " $";MISC 
$";TRANSFERS 
S";POWERS 
' $";ANNUITIES 

TOT.ASSETS-RL.EST+STOCKS+CASH+INSURANCE+JOINT+MISC+TRANSFERS+POWERS+ANNUITIES 

PRINT:PRINT"TOTAL ASSETS- ";:PRINT USING D$ ; TOT . ASSETS 

30 PRINT"IF SCHEDULE ENTRIES ARE CORRECT, PRESS 1 TO CONTINUE. PRESS 2 TO " 

PRINT'START DETAILED SCHEDULE AGAIN." 

GOSUB 1500 

IF ERROR. FLAG-1 THEN 30 

ON CHOICE GOTO 20,100 



200 INPUT"WHAT IS TOTAL VALUE OF ASSETS 
GOTO 20 



$"; TOT .ASSETS : PFLAG 1 = 1 .-PFLAG4-0: \ 



300 PRINT CHR$(12) :PFLAG1=1 :PFLAG5-1 REM DETAILED DEDUCTION SCHEDULES 
PRINT A$(18):PRINT A$ ( 1 9 ): PRINT : PRINT AS ( 1 1 ) ; TAB ( 60 ) ; : INPUT " $";FUN.ADM 



PRINT A$(12) ;TAB(60) 
PRINT AS(13);TAB(60) 
PRINT A$(14) ;TAB(60) 
PRINT A$(15);TAB(60) 
PRINT A$(16) ;TAB(60) 
PRINT A$(17);TAB(60) 



INPUT " $";DEBTS 

INPUT " $" {MORTGAGES 

INPUT " $";LOSSES 

INPUT " $";EXPENSES 

INPUT " $";MARITAL 

INPUT " $" ;CHARITABLE 
TOT.DED-FUN.ADM+DEBTS+MORTGAGES+LOSSES+EXPENSES+MARITAL+CHARITABLE 
PRINT:PRINT"TOTAL DEDUCTIONS - ";:PRINT USING D$;T0T.DED 
40 PRINT"IF SCHEDULE ENTRIES ARE CORRECT PRESS 1, TO CONTINUE." 

PRINT"PRESS 2 TO START DETAILED SCHEDULE AGAIN." 
GOSUB 1500 

If ERROR. FLAG-1 THEN 40 
TAXABLE. EST-TOT.ASSETS-TOT.DED 
ON CHOICE GOTO 510,300 

400 INPUT'WHAT IS TOTAL VALUE OF DEDUCTIONS? $"; TOT .DED : PFLAG 1 = 1 : \ 
PFLAG5-0: TAXABLE. EST-TOT .ASSETS-TOT . DED : GOTO 510 



S" ;TAXABLE.EST 



500 INPUT"WHAT IS VALUE OF TAXABLE ESTATE? 
PFLAG4-0:PFLAG5-0 

510 IF TAXABLE. EST-EXEMPTION<-0 THEN PRINT "TOTAL ASSETS - " ; TAB ( 50 ) ; : \ 
PRINT USING D$;TOT.ASSETS:PRINT"TOTAL DEDUCTIONS - ";TAB(50);:\ 
PRINT USING D$;TOT.DED:PRINT"TAXABLE ESTATE - "; TAB ( 50 );: PRINT USING DS;\ 
TAXABLE. EST:PRINT"EXEMPTION EQUIVALENT- " ; TAB ( 50 ) ; : P RINT USING D$;\ 
EXEMPTION:PRINT:PRINT" ««»NO TAX. TAXABLE ESTATE DOES NOT EXCEED CREDIT «»*": 

PRINT:GOSUB 1600 : ON ' CHOICE GOTO 3,5000 
520 IF TAXABLE. EST>-MAX THEN W- (TAXABLE . EST-MAX) "MAX. RATE : \ 

ON Y GOSUB 2100,2200,2300,2400,2400,2400 
IF TAXABLE. EST>EXEMPTION AND TAXABLE . EST<MAX THEN V-INT (TAXABLE . EST/ 250000 ): \ 
S-250000:ON V+l GOSUB 3 100 , 3200 , 3300 , 3400 , 3500 , 3600 , 3700 , 3800 , 3900 , 4000 , \ 
4100,4 200,4300,4 400,4500,4600 
600 PRINT:PRINT A$ ( 1 ): PRINT" 1 . COMPUTE STATE DEATH TAX CREDIT .": PRINT \ 
"2. COMPLETE COMPUTATION WITHOUT STATE TAX CREDIT." 
GOSUB 1500 

IF ERROR. FLAG-1 THEN 600 
PRINT CHR$(12):0N CHOICE GOTO 4700,700 

700 PRINT TAB(20) ; "ESTATE PLANNING FOR ";CLIENT$ 
PRINT TAB(20) ; "COMPUTATION YEAR ";YEAR:PRINT 
IF PFLAG1-1 THEN PRINT"TOTAL ASSETS-" ; TAB ( 30 );: PRINT USING D$ ; TOT .ASSETS 
If PFLAG1-1 THEN PRINT"TOTAL DEDUCTIONS-" ; TAB ( 30 );: PRINT USING DS;\ 
TOT.DED:PFLAG1-0 
PRINT:PRINT"TAXABLE ESTATE-" ; TAB ( 30 );: PRINT USING D$ ; TAXABLE . EST 
PRINT:PRINT"TOTAL TAX-" ; TAB ( 30 );: PRINT USING D$;TOTAL.TAX 
PRINT"CREDIT AGAINST TAX=" ; TAB (30 );: PRINT USING D$;CREDIT 
PRINT:PRINT"NET ESTATE TAX-" ; TAB ( 30 );: PRINT USING D$ ; TOTAL . TAX-CREDIT 
IF PFLAG2-0 THEN PRINT TAB ( 3 1 );"-- — ---- — —" 
IF PFLAG2-1 THEN PRINT : PRINT" STATE DEATH TAX CREDIT-" ; TAB ( 30 );: \ 

Program continues 



$250,000 before computing tax 
with lines 3100-4600. This tech- 
nique simplified the coding. 
When you compute the state 
death tax credit at line 4700, set- 
ting U = 100000 saves space and 
typing time. 

Planning Examples 

The first example demon- 
strates the effectiveness of a 
"tax exemption" trust. Every 
estate plan for husband and 
wife should consider this de- 
vice. Without any planning, the 
use of the exemption to avoid 
tax on the first death is lost. By 
placing the maximum amount 
which will escape tax without 
use of the marital deduction into 
the "tax exemption" trust on the 
first death, this amount escapes 
estate tax completely on the 
death of both husband and wife. 
The surviving spouse may re- 
ceive all income. If he or she is 
the trustee, subject to required 
standards, the survivor may con- 
trol investment of funds and 
withdraw principal needed for 
support. 

Example 1: John Client dies in 
1984 with a taxable estate of 
$1,000,000. He leaves all proper- 
ty to his wife. There is no tax on 
John's death since all of the 
property qualifies for the marital 
deduction. His wife dies 10 
years later with an estate of 
$1,000,000. Table 1 is the tax 
upon death of the wife. If a "tax 
exemption" trust were used on 
John's death, $325,000 would go 
into that trust. His wife's taxable 
estate at her later death would 
then be $675,000 (assuming no 
growth). Table 2 shows that the 
tax is $109,050 lower than with- 
out the trust. 

The second example illu- 
strates further sophistication 
for a larger estate. In addition to 
the use of a "tax exemption" 
trust, a "qualified terminable in- 
terest" (QTI or "cutie") trust is 
used. The QTI trust enables you 
to elect upon the first death 
whether to pay tax on the money 
in the QTI trust or to postpone 
that tax until the second death. 
With Estate Planner you get an 
immediate printout of the re- 
sults of implementing this 
estate planning option. 

Example 2: Joe Businessman 
leaves an estate of $5,000,000 in 
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These Are Fast- Paced Arcade Simulations 
ONLY THE FAST SURVIVE! 



The first machine language arcade game written to use 
all those NEW SPECIAL FEATURES of your MOD III! 




ALIEN 
DEFENSE 




Copyright®1981 Soft Sector Marketing, Inc. 
Written by Larry Ashmun 

Cassette $19.95 

Disk $24.95 

Cassette version doesn't go to disk. 
Only disk version talks and saves high scores. 

Now MOD I and III 

As you fly over a mountainous terrain the aliens are being grabbed from the ground 
below and are taken to the sky. 



FORTRESS 



'1982 Soft Sector Marketing, Inc. 
written by Larry Ashmun 






Defend your for- 
tress from alien 
fighters - but 
watch out for the 
sneak attack. 
The game starts slow 
but speeds up very 
quickly. 



°'>//>>c e « 



Mod I and 

Cass. . . . $15.95 
Disk .... $19.95 




COD. - certified check, '-^ or cash only Most orders 
shipped next day All orde J^R;t nave shipping inducted 
Please add 2% or $2.50. whtmewer is higher tor shipping 
Michigan residents, please odd 4% tax Add extra $ 1 SO for 
C.O.D Personal checks take 3 weeks to clear Out of the 
country orders add S10.00 extra shipping. 
• TRS-80 is a product of Radio Shack, div. of the Tandy Corp. 



SOFT SECTOR MARKETING, 

INCORPORATED 
6250 Middlebelt •Garden City, Michigan 48135 



■4a«»*fOard 



Order Line 800-521-6504 

Michigan Orders & Questions 313-425-4020 



^■84 



Tne American Exocess'Card 
Don i leave home without ii "~ 



WS4- 



I The Quality Continues 



Program continued 

PRINT USING D$;STATE.CR:PRINT"ESTATE TAX LESS STATE DEATH TAX CREDIT=";\ 
TAB(50) ; :PRINT USING D$ ; TOTAL . TAX-CREDIT-STATE . CR : \ 
PRINT TAB(52) •"»•«-————•■ 
IF PFLAG3-1 THEN PFLAG3-0 : CONSOLE : GOTO 900: 

800 PRINT:PRINT"TO PRINT SUMMARY, PLEASE TURN ON PRINTER AND PRESS 1 . " 

PRINT"T0 CONTINUE WITHOUT PRINTOUT, PLEASE PRESS 2." 

GOSUB 1500 

IF ERROR. FLAG=1 THEN 800 

ON CHOICE GOTO 810,900 

810 LPRINTER WIDTH 80 : PFLAG3- 1 : GOTO 700 

900 IF PFLAG4-0 AND PFLAG5-0 THEN GOTO 950 ELSE PRINT A$(1):PRINT\ 
"1. PRINT DETAILED SCHEDULES. (PLEASE TURN ON PRINTER) " : \ 
PRINT"2. CONTINUE PROGRAM" 

GOSUB 1500 

IF ERROR. FLAG-1 THEN 900 
ON CHOICE GOTO 910,950 

910 IF PFLAG4-0 THEN GOTO 920 ELSE LPRINTER WIDTH 80 : \ 
PRINT TAB(32) ;"ASSET SCHEDULE" : PRINT 

PRINT A$(2) ;TAB(50) ; :PRINT USING D$ ; RL . EST : PRINT A$ ( 3 ) ; TAB ( 50 ) ; : \ 
PRINT USING D$;STOCKS:PRINT AS ( 4) ; TAB ( 50 ) ; : PRINT USING D$ ; CASH: PRINT AS ( 5 
TAB(50) ; :PRINT USING D$ ; INSURANCE : PRINT AS ( 6 ) ; TAB ( 50 ) ; : PRINT USING D$;JOI 
PRINT AS( 7) ;TAB(50) ; :FRINT USING D$ ;MISC : PRINT A$ ( 8 ) ; TAB ( 50 ) ; : PRINT USING 
TRANSFERS:PRINT A$ ( 9 ) ; TAB (50) ; : PRINT USING DS ; POWERS : PRINT AS ( 10 ) ; TAB ( 50 ) 
PRINT USING D$;ANNUITIES:PRINT:PRINT"TOTAL ASSETS- ";: PRINT USING D$;T0T. 
920 IF PFLAG5-0 THEN CONSOLE:GOTO 950 ELSE LPRINTER WIDTH 80 : PRINT : PRINT\ 
TAB(32) ; : PRINT'DEDUCTION SCHEDULE" : PRINT AS ( 1 1 ) ; TAB ( 60 ) ; : PRINT USING D$;\ 
FUN.ADM:PRINT A$ ( 1 2 ) ; TAB ( 60 ) ; : PRINT USING D$ ; DEBTS : PRINT A$ ( 13 ) ; TAB ( 60 ) ; : 
PRINT USING D$ ;MORTGAGES : PRINT AS ( 14) ; TAB ( 60 ) ; : PRINT USING D$ ; LOSSES : PRIN 
A$(15) ;TAB(60) ; :PRINT USING D$ ; EXPENSES : PRINT A$ ( 1 6 ) ; TAB ( 60 ) ; : PRINT USING 
MARITAL:PRINT A$ ( 1 7 ) ; TAB ( 60) ; : PRINT USING D$ ; CHARITABLE 
PRINT-TOTAL DEDUCTIONS- ";:PRINT USING D$ ; TOT . DED : CONSOLE 
950 GOSUB 1600:ON CHOICE GOTO 3,5000 

1500 Y%=C0NCHAR% 

IF Y%-(32) THEN 1500 

IF YX<(49) OR Y%>(50) THEN PRINT CHR$ ( 127 ): ERROR. FLAG- 1 : \ 

PRINT"PRESS NUMBER 1 OR 2 PLEASE":FOR X- 1 TO 500 : NEXT: RETURN 

PRINT CHR$(127) : CHOI CE = Y%-4 8 : ERROR . FLAG.-O : RETURN 
1600 PRINT A$(l) :PRINT"1. DO ANOTHER COMPUTATION .": PRINT" 2 . END PROGRAM." 

GOSUB 1500 

IF ERROR. FLAG-1 THEN 1600 

RETURN 

2100 TOTAL. TAX-W+1880800:RETURN 

2200 TOTAL. TAX-W+1 5 7 5800 : RETURN 

2300 TOTAL. TAX-W+1290800 : RETURN 

2400 TOTAL. TAX-W+ 1 025800 : RETURN 



);\ 
NT: \ 
D$;\ 
;:\ 
ASSETS 



\ 

T\ 
D$;\ 



3100 
3200 
3300 
3400 
3500 
3600 
3700 
3800 
3900 
4000 
4100 
4200 
4300 
4400 
4500 
4600 



TOTAL 

TOTAL 

TOTAL 

TOTAL . 

TOTAL 

TOTAL, 

TOTAL 

TOTAL i 

TOTAL 

TOTAL. 

TOTAL 

TOTAL , 

TOTAL. 

TOTAL. 

TOTAL. 

TOTAL. 



TAX 
TAX' 
TAX 
TAX' 
TAX 
TAX' 
TAX' 
TAX' 
TAX 
TAX' 
TAX' 
TAX' 
TAX' 
TAX' 
TAX' 
TAX* 



'62500 
-70800 
=15580 
■24830 
■34580 
■44830 
'55580 
'66830 
'78080 
■90330 
'10258 
'11583 
'12908 
•14333 
'15758 
'17283 



+(TAXABLE.E 
+(TAXABLE.E 
0+(TAXABLE. 
0+(TAXABLE. 
0+(TAXABLE. 
0+(TAXABLE. 
0+(TAXABLE. 
0+(TAXABLE. 
0+( TAXABLE. 
0+(TAXABLE. 
00+(TAXABLE 
00+(TAXABLE 
00+(TAXABLE 
00+(TAXABLE 
00+(TAXABLE 
00+(TAXABLE 



ST-22 
ST-S) 
EST-2 
EST- 3 
EST-4 
EST-5 
EST-6 
EST-7 
EST-8 
EST-9 
.EST- 
.EST- 

• EST- 

• EST- 
.EST- 
.EST- 



5000) 
".34: 
«S)". 
»S)». 
«S)«. 
"S)«. 
*S)". 
»S)«. 
«S)«. 
"S)«. 
10"S) 
11*S) 
12-S) 
13"S) 
14"S) 
15»S) 



».32:RETURN 
RETURN 
37:RETURN 
39:RETURN 
41 :RETURN 
43:RETURN 
45 :RETURN 
45:RETURN 
49: RETURN 
49:RETURN 
».53:RETURN 
».53:RETURN 
*.57:RETURN 
«.57 :RETURN 
-.61 :RETURN 
".61 :RETURN 



If 

IF T>" 

IF T>- 



4700 U-10000 
IF T < 3 » U 
IF T>-3" 
IF T>=5" 
IF T>-7* 
IF T>=9» 
IF T > = 1 1 
IF T>=16 
T>-21 
■26 
'31 
IF T>-36 
IF T>=41 
IF T>-5 1 
IF T>=61 
IF T>=71 
IF T>=81 
IF T> = 91 
IF T> = 10 
IF STATE 
GOTO 700 

5000 PRINT"- 



0: PFLAG2=1:T=TAXABLE.EST 

THEN STATE. CR- 1 200+. 024" (T- 
U AND T<5*U THEN STATE. CR-36 
U AND T<7*U THEN STATE. CR-10 
U AND T<9»U THEN STATE. CR-18 
U AND T<11"U THEN STATE. CR-2 
"U AND T<16«U THEN STATE. CR- 
"U AND T<21"U THEN STATE. CR- 
»U AND T<26"U THEN STATE. CR- 
«U AND T<31«U THEN STATE . CR= 
"U AND T<36"U THEN STATE. CR- 
»U AND T<41«U THEN STATE. CR- 
»U AND T<51«U THEN STATE. CR- 
*U AND T<61"U THEN STATE. CR- 
»U AND T<71"U THEN STATE. CR- 
«U AND T<8 1»U THEN STATE. CR 
»U AND T<91"U THEN STATE. CR- 
"U AND T<101*U THEN STATE. CR 
1»U THEN STATE. CR=1082800+( . 
.CR> (TOTAL. TAX-CREDIT) THEN 



END OF PROGRAM 



REM STATE DEATH TAX CREDIT COMP 
2"U) 

0U+(.032"(T-3"U) ) 
000+( .04»(T-5»U)) 
000+(.048"(T-7"U) ) 
7600+( .056"(T-9"U) ) 
3880 0+(.064"(T-ll»U)) 
70800+( .072-(T-16"U) ) 
106800+(.08"(T-21«U) ) 
14680 0+(.088"(T-26»U)) 
190800+(.096"(T-31*U)) 
128800+ (.104»(T- 36 »U)) 
290800+ (,112«(T-41"U)) 
40 2 8 00+ ( .12«(T-51*U)) 
522800+(. 128*(T-61«U) ) 
650800+( .136"(T-71»U)) 
7 86800+ (. 144»(T-81"U) ) 
-930800+ (. 152" (T-91-U)) 
16"(T-101»U) ) 
ST ATE. CR-( TOTAL. TAX-CREDIT) 



1988 to his wife. She dies 10 
years later and the value of the 
property has increased 50 per- 
cent to $7,500,000. There will be 
no estate tax on Joe's death. 
Table 3 shows the tax of 
$2,627,800 on his wife's death. If 
a "tax exemption" trust is used, 
the tax on her death is deter- 
mined in Table 4. (Trust is now 
$900,000 and wife's estate 
$6,600,000.) The trust has saved 
$331,600 for the family. Total 
tax: $2,296,200. 

Assume Joe and his wife plan 
with both a "tax exemption" 
trust and a "QTI" trust. The QTI 
trust receives half of Joe's 
estate, less the amount in the 
"tax exemption" trust ($2,500, 
000-$600,000 = $1,900,000). 
Joe's wife may elect to pay a tax 
of $694,200 on Joe's death 
(Table 5), by not qualifying the 
QTI trust for the marital exemp- 
tion. The tax on her death will be 
$1,313,600. (Table 6). Total tax 
on both deaths: $2,007,800. The 
family has apparently saved an 
additional $288,400 over the use 
of the tax exemption trust alone. 

However, things are not al- 
ways what they seem. Payment 
of tax on Joe's death deprived 
his wife of $694,000 in cash. In- 
vested at the very conservative 
rate of 6 percent per annum, the 
before-tax income on these 
funds during the ten years will 
exceed substantially the estate 
tax savings. Therefore, his wife 
elects upon Joe's death not to 
have the QTI trust taxed. 

If you are a professional 
estate planner, accountant, in- 
surance salesman, attorney or 
trust officer, this program dem- 
onstrates dramatically to your 
clients the savings to be realized 
with proper planning. Before the 
estate planning conference, if 
you know the approximate size 
of the estate, run the computa- 
tions for both tax and QTI trusts. 
For the successful business or 
professional person, the pro- 
gram should convince you to up- 
date your estate plan to take ad- 
vantage of the new provisions in 
the estate tax law.B 

Charles R. Perelman is an at- 
torney/CPA who specializes in 
estate planning and other tax 
matters in Beverly Hills, CA. 
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Utilities 




SUPER UTILITY PLUS 

Copyright C 1°81 Breeze Computing. Inc SUPER UTILITY PLUS 
was written by Kim Watt and is the most powerful program of its 
kind on the market at this time This program Is a machine 
language, stand alone program that has its own I/O routines, 
does not use any ROM or DOS calls, and works on SINGLE or 
DOUBLE DENSITY systems Super Utility Plus performs such a 
wide range of varied tasks that it may truly be called "The King 
of Utilities" it is not required that the disk be in any drive after 
initialization of the program and user may custom configure 
the program to suit his individual system requirements 
ZAP does everything your present "zapping" utility does plus 
many additional enhancements It will operate on SINGLE or 
DOUBLE DENSITY systems and will work with most major opera- 
ting systems that are presently on the market The screen 
printout on Zap displays one sector at a time in HEX and ASCII 
(as other "zapping" utilities), but also tens user the true and 
relative track and whether the disk in IBM format or not. Zap 
also has a search routine that will locate the highest or lowest 
configured track on the disk and others that will search the 
disk for byte list, ASCII string, word list, or even encripted code. 
Zap also allows you to display disk sectors, compare disk 
sectors, copy sector data zero disk sectors, copy disk sectors, 
reverse sector data, sector searches, read ID address marks, or 
alter data address marks. 

PURGE has a full screen editing kill control that allows you to kill 
tiles by positioning cursor and pressing one key. Also. Purge has 
several subutilities that allow you to zero out unused directory 
entries or zero out unused disk granules, in addition, user may 
kill files by naming the common category of the files, and may 
compute existing passwords, change the disk name. date, 
passwords, auto command, or even file parameters (name, 
passwords, protection levels) Lastly. Purge contains a complete 
disk directory that indicates all active and non-active files on 
the disk. 

FORMAT is a utility that allows the user to format a disk with, 
standard format, format without erasing existing data, special 
format (custom 'ormat your disk most any way you want it), 
build a format track and optionally write it back to any track 
on your disk, and even contains a software bulk erase utility 
The total formatting capabilities of this program are just about 
UNLIMITED and you may even reformat over a disk or add 
tracks to an existing disk without destroying existing disk data. 
DISK COPY will copy most any standard disk, with or without 
formatting The Special Disk Copy enables the user to make a 
backup of most TRS-80* readable disks that are presently on 
the market, regardless of any efforts that have been made to 
protect them from being "backed up" (NOTE This program 
WILL NOT copy itself)- This program' s on ly intended use is for you" 
to make backups of your legally purchased programs. Please 
DO NOT use this utility to make "bootleg copies" for others as 
authors of quality programs deser their royalties. 
TAPE COPY enables the user to perform a wide variety of 
ac'ions that include the ability to read, write, or verify tapes 
and even includes a Bit by Bity copying routine that will back 
up most ANY TRS-8C 1 reaaable tape regardless of protection 
attempts made by authors. This utility also is for your own use 
only. 

DISK REPAIR allows you to automatically repair the HIT and 
GAT sectors, and will automatically repair a Boot This utility 
also does a complete Directory Check and will advise you of 
errors that exist In addition, this utility allows the user to recover 
killed files(if the file was killed by this utility or by NEWDOS), read 
protect or un-read protect the directory, move it to a different 
location on the disk, or clear unused entries. Lastly, this utility 
advises you of all inactive file that are on the disk 
MEMORY supplies the ability to display, move, test, compare, 
zero, exchange, input or output a byte to any port, exchange, 
jump to. reverse, fill, string search, or even load/ write and entire 
track or sectors to/ from memory. 

FILE contains the abilities to display file sectors, compare files, 
copy files, disk directory, free space, file locations, drive status, 
create fiies. and clear files from disk. These utilities give you a 
wide range of powerful complete reorganization of your entire 
disk with all the files re-written in their most contigious order. 
CONFIGURE SYSTEM gives you the ability to custom configure 
Super Utility Plus to your system You may select single or 
double density, in any combination, 5" drives, select your 
operating system boot of your choice, upper or lower case, 
high speed clock single or double headed drives, or even 
configure your printer 

Now for Mod I or III $74.95 

Sold on protected media 



BOSS III 



The 

BASIC 

OPERATED 

SINGLE 

STEPPER 



®1981 Soft Sector Marketing, Inc. 
for Mod III 

This Machine Language utility is designed to aid 
you in creating and debugging programs written 
in BASIC. The utility allows you to trace the 
program flow, to single step the BASIC program, 
to observe the conditions of variables during 
program execution, and to push your basic 
program on the stack during program develop- 
met. The utility is known to operate with Mod III, 
TRS-DOS or Mod III Rom BASIC 
Cassette (goes to disk) $18.95 



TAPE COPY 2 

®1981 Softer Sector Marketing, Inc. 
This program will load most any TRS-80 500 Baud 
system tape (standard Mod I speed) and load it 
into memory and save it at either 500 or 1500 
Baud on the Mod III. NO KNOWLEDGE OF MACHINE 
LANGUAGE NEEDED. Now it gives you a way to 
back up a machine language program that 
loads at the lower speed and makes cassette 
loading into your new Mod III a much faster, more 
reliable process. Works with Mod I" & Mod III. 

Only $14.95 

'Mod loads and saves at 500 Baud only 



Purchase Any Program This 
Month and Receive 

Tape Copy 2 for $7.95 





Do you reap only mysteries from 
your TRS-80 ROMs? 
Your book has arrived! 

MOD III ROM 

COMMENTED 

Copyright® 1981 Soft Sector Marketing, Inc. 
Not just a rehash of old information, but detailed 
comments on the ROMS in the latest machine 
from Tandy. 

List $22.50 



ZAPSIT 



: 198 1 by Soft Sector Marketing. Inc. - Written for TRS-DOS & DOSPLUS Dy Larry Ashmun 
Requires 32K Disk - Mod Hi 



Zapsit is a stand alone machine language program that lets you examine, modify, copy disk sectors and much 
more It does not use any of the resident DOS routines so that you are not limited to the restrictionsof trie particular DOS 
that you normally use You do not have to have a system disk in DRIVE once Zopsit is running 

Currently there are two versions of Zapsit- one for use with TRSDOS' and one for use with DOSPLUS" ' They are the 
same except in the way that they format a disk and the way that they write DA T A ADDRESS MARKS Because of the 
differences, they are not interchangabie Writing to a TRSDOS diskette with the DOSPLUS version (or vice- versa) could 
make the diskette written too unuseable 

For all disk operations you will be asked a senesof questions. Each question can be answered by pressing the ENTER 
Key or by entering a specific value Pressing the ENTER Key will cause the DEFAULT value to be used All default values 
are indicated on the screen at the time the question is asked. 

When entering a specific numeric value it ^s assumed to be DECIMAL unlessan H isappended to'he number When 
an H is appended, the numbe' s assumed to be hexadecimal (base 16) 

CAPABILITIES 



Display/Modify Disk Sectors/Memory. °rmt to screen Pr nt 
sector to printer Modify in Hex Modify in ASCII 
Change Track & Sector Limits. Single density read and write. 
Double density read and write tor 1 -80 track, from 0-18 sectors 
Single and dual sided drives 

Format a Disk. S= Standard Format W= Format without Erase 
if you press ENTER or S you will be asked which arive. what 
density After answering these questions Zapsit will format the 
disk using the parameters specified As each track is format- 
ted all of the sectors are checked for readability before the 
next track is formatted Any unreadaole sectors are reported 
but the operation will not be aborted 

If you type W you will be asked which drive, what density to 
use and if you want any bad sectors reported to the printer 
Before each track is formatted each readable sector on the 
track is read into a holding area Unreadable sectors are 
reported and their holding area is zeroed After all of the 
sectors for a track are stored, the track is reformatted and the 
data m the holding areas written to the appropriate sectors 
Verity a Disk. Verify a disk does just that it verifies that every 
sector is readable Any unreadable sectors are reported You 
wili be asked if you want the unreaoab^e sectors reported to 
the printer 



Now you con verify that tne format of your diskette is in good 
shape before you copy your important files to a diskette This 
prevents loosing your data that you are t>y ng to back up 
Copy Disk Sectors. Copy disk sectors ai'ows you to Copy 
sectors (Single or Double Density) from a disk to different 
sectors on the same disk Copy sectors from a Double Density 
disk to a different Double Density aisk Copy sectors from a 
Single Density disk ro a different Single Density disk Copy 
sectors from o Single Density disk to a Double Density disk 
Copy sectors from a Double Density disk to a Smgie Density 
disk All copying to a Different disk must oe done on a Two 
Drive System 

Zero Disk Sectors. Zero disk sectors ahow you to write c value 
of your choice to the sectors specified 
Read a Track. Reading a track allows you - o read an entire 
track into memory, witn all of the cddress marks and ■nforma- 
tion that you don't normaly see witna secto'reod T he output 
can be *o either the screen or printer 



List $24.95 

Introductory Special $19.95 



C.O.D - certified check. MO or cash only Most orders 
shipped next day. All orders must have shipping included 
Please add 2% or S2.50. whichever is higher for shipping 
Michigan residents please add 4% tax Add extra $150 for 
C.O.D Personal checks fake 3 weeks to clear. Out of the 
country orders odd $10.00 extra shipping. 
"TRS-80 isa product of Radio Shack, dry of the Tandy Corp 
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EDUCATION 



<•_■■•} 



LOAD 80 



Teachers are going to love this one. 



Grade Book 



B. E. Pugsley 

7780 Candlewood Dr. 

Boise, ID 83709 



Most teachers find much of their time 
is spent calculating and recording 
grades. This program was designed to rec- 
tify that situation while in addition provide a 
computer printout of the grades. This pro- 
gram requires the use of total points and 
either curved grades or percent grades. In 
addition the grade records may be printed 
in alphabetical order, sorted by average 
grade or points accumulated, and saved on 
disk., 

Records for up to 45 students, with 20 
grades each can be accommodated. These 
numbers may be limited by available com- 
puter memory. The resulting printout will 
show the calculated weighted grade aver- 
age and the appropriate letter grade. In ad- 
dition to the weighted average, the percent 
grade and the total weighted points will be 
printed. If total points are used and grades 
curved, the letter grade is omitted. If de- 



S$(S) 


The student name, 20 spaces and each grade, five spaces 


W(A) 


Weighting for each assignment, any value 


A$(A) 


Assignment titles, up to four characters long 


G$, G1$, G, G%, G! Work areas for the grades 


NS 


Total number of students allowed 


NA 


Total number of assignments allowed 


TS 


Number of students in the class 


TA 


Number of assignments recorded 


SP$ 


20 blanks used for filler when working with strings 


L$ 


20 . . . used as leaders 


C$(l) 


Commands 


GR$ 


* Fills in the missing grades 


AV(A) 


Average grades for assignments 


INS 


Input area from line input 


B($) 


Letter grades allowed 




Table 1 



The Key Box 

Disk Basic 

48K RAM 

NEWDOS 80, TRSDOS 

2 Disk Drives 

Printer 



Program Listing 1 

1 CLS : PRINT :PRINTTAB( 20) "GRADE BOOK " :POKE16561 , 254:P0KE16562 ,12 
6:CLEAR6000:DEFINTA-C,E-V,X-Z:POKE16526,0:POKE16527,127:DATA205, 
127, 10, 94, 35, 86, 237, 83, 32, 127, 35, 94 :DATA35, 86, 237, 83, 215, 127, 35, 
94, 35, 86, 237, 83 :DATA217, 127, 35, 126, 50, 219, 127, 33, 0,0, 34, 213 

2 DATA127,237,91,213,127,203,59,175,203,58,48:DATA2,203,251,237, 
83, 213, 127, 122, 179, 200, 42 :DATA32, 127, 237, 82, 34, 209, 127, 33, 0,0, 34 
,207:DATA127,42,207,127,34,205,127,42,205,127,237:DATA91,213,127 
,25,34,211,127,235,33,0,0,25 

3 DATA25,25,229,237,91,205,127,33,0,0,25,25:DATA25,237,75,215,12 
7, 9, 235, 225, 9, 229, 213, 58 :DATA219, 127, 71, 197, 19, 35, 78, 35, 70, 42, 21 
7:DATA127,9,235,7 8,35,70,42,217,127,9:DATA193,26,150,56,6,32,35, 
19,35,16,246 

4 DATA209,225,6,3,78,235,126,113,235,119:DATA35,19,16,246,42,213 
,127,235,42,205:DATA127,175,237,82,34,205,127,48,155,24,2:DATA20 
9, 225, 42, 207, 127, 17, 1,0, 175, 25, 34, 207, 127 :DATA237, 91, 209, 127, 237 
,82,218,71,127,195,37,127:FORI=1TO205:READA 

5 POKEI+32 511,A:NEXT:NS=45:NA=20:T=0 
DIMC$(11) ,S$(NS) ,W(NA) ,A$(N 

A) ,AV(NA) ,X(3) :Z=0:SP$=STRING$(20," ") :L$=STRING$ ( 20 , " . " ) :GR$=" 

*":B$(1)=" 90":B$(2)=" 80":B$(3)=" 70":B$(4)=" 60" :DATAHELP,P 
RI NT , LOAD , SAVE , NEW , QUI T , GRADES , SORT , NAMES 

Program continues 
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GUARANTEE 

30 DAY, MONEY BACKf 
GUARANTEE 

tLess 10% 'estockmg charge 



If you are looking for 
The Finest In Word Processing Systems 

you can . . . 

Purchase and examine all other word processing programs 
on the market and then purchase Lazy Writer® 
or . . . 

You can purchase Lazy Writer® first. Ifs your money! 
Lazy Writer® Mod I or III 
$175.00 

'Requires 2 Disk Drives to convert only. 

Proportional Spacing Option Now Available for 
Daisy Wheel II Printer- Oniy $29.95 



> ELECTRIC WEBSTER 



# 



& 



o 



Spelling Checker 

"A product of Cornucopia Software 



EASY TO USE 

50,000 WORD VOCABULARY & EXPANDABLE 
RECOGNIZES PREFIXES & SUFFIXES 
REQUIRES ONLY 32K OF MEMORY & 2 DISK 
DRIVES 

AFFORDABLE & AVAILABLE IN THREE FORMS: fully 
independent program to identify errors; inde- 
pendent program to identify and correct errors; 
or with a conversion program that will permit 
ELECTRIC WEBSTER to operate from within. 



Was 

$125,00 



Now Oniy 

$89.50 

$149.00 

$149.50 



Basic Electric Webster 

with Correcting Feature 
Special Lazy Writer® Version $189.50 

with Correcting Feature 

works from within Lazy 

Writer® 

Scriptsit Versions Available - Call for Price 



THE COMPLEAT IDIOTS BOOKKEEPER 

- Now Is Tax Season - 

Turn your baskets full of receipts 
into one super organized group of paper work. 

If your income tax is a pain 
you don't have The Compleat Idiots Bookkeeper! 

Mod I & III - $49.95 

FREE Overview Available 

MAKE V.C. 

Changes files to VISI CALC interchangeable format or V.C. file 
into The Compleat Idiots Bookkeeper readable files. 

Mod I & III - Only $24.95 



COD- certified check. M O or cash oniy Most orders 
shipped next day All orders must have shipping included 
Please add 2% or $2.50. vvfiichever is higher tor shipping 
Michigan residents please add 4% tax Add extra S1 .50 for 
C O.D Personal checks take 3 weeks to clear Out o< the 
country orders add S 10.00 extra shipping. 
' TOS-80 is a product of Radio Shack, div. of the Tandy Corp 
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;an Express' Card 
• home wilhour it " 



The Quality Continues 



"I found it useful 

to observe the results 

before settling on a final weight" 



sired, a worksheet for recording daily grades 
may be printed. (Fig. 1.) 

Features 

The program is command driven. If you 
are in doubt as to what command to enter, 
type Help for a list of allowable commands. 
Typing End will terminate a section without 
any action being taken. The major program 
sections are: Names; Grades; Sort; Load; 
Save; Print; Quit; and New. 

Names 

This section allows the user to enter a 
new class, change or delete a name in an 
existing class, or add a new student to the 
roster. The New operation allows the entry 
of students in a new class. Enter last name 

"If you are in 
doubt. . .type Help. . . " 



first, in any order. Since the sort program 
only takes about a second, it is entered au- 
tomatically at the End. Names of up to 20 
characters long may be entered; if longer, 
the name will be truncated to 20 characters. 
Commas may be entered in the disk version 
but not the tape version. 

Grades 

The options to this section are Enter, 
Change and Delete. Grades may be entered 
as a percentage by responding with 100 to 
the maximum points query. If the percent 
grade is needed, enter the raw score and the 
percent will be calculated and recorded. If a 
grade is missing and you do not want it 
averaged in as a zero, type in an * . If you wish 
to begin again, type in End and start over. 

Prior to entering any grades, select a 
weighting for the assignment. Any value may 
be used. I found it useful to change this value 
and observe the results before settling on a 
final weight. To do this, break from the pro- 
gram and change W(A) for the assignment 
you want to a different value. Then run a new 
printout and compare the results. 

In addition to the average grade and the 
letter grade, the total weighted points are 
printed. If you use total points for your 
classes the letter grade is deleted. To use 
this option changeT = toT = 1 in line 350. 

Sort 

The sort routine is entered automatically 
after a new class is entered. It may be called 
at any time, even after grades have been en- 
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Program continued 

6 F0RI=1T09:READC$(I) :NEXTI 

7 PRI NT : C $="": INPUT "COMMAND OR ' HELP' " ;C$:F0RI=1T09 : IFC$ ( I) =C$TH 
EN8ELSENEXT: PRINT" INVALID COMMAND — TRY HELP" 

8 ONIGOSUB10,11,66,67,29,30,31,46,49:GOTO7 

9 CLS:PRINTC$(I) : PRINTSTRING$ (LEN (C$ ( I) ) ,"-") :PRINT:RETURN 

10 GOSUB9 : PRINT :PRINT"VALID COMMANDS" : PRI NT" 

HELP PRINT LOAD SAVE 
NAMES GRADES NEW ": RETURN 

11 GOSUB9:IFTS<lTHENPRINT"NO STUDENTS" :GOT07ELSEPRINT"VALID COMM 

ANDS":PRINT" 

REPORT WORKSHEET" :G0SUB64:IFIN$="END"THEN7ELSEI 

FIN$="REPORT"THENCLS:PRINT"REPORT": PRINT" ":GOT013 

12 IFIN$="WORKSHEET"THENCLS:PRINT"WORKSHEET": PRINT" ":GO 

T027 

13 PRINT"TYPE IN DATE" :GOSUB64 :CLS : LPRINTIN$: LPRINTCL$; " FOR ';T 

A;" ASSIGNMENTS.. AND ";TS;" STUDENTS " :LPRINT" ASSIGNMENT NO. 

» ; : FORL=1TOTA: LPRINTLEFT$ ( SP$ , 5-LEN ( STR$ (L) ) ) +STR$ ( L) 

; :NEXT:LPRINT"" 

14 LPRINT"ASSIGNMENT TITLE " ; : FORL=lTOTA: LPRINTLEFT$ (SP 

$,5-LEN(A$(L) ) )+A$(L) ; :NEXT: IFTTHENLPRINT" TOTAL"ELSELPRINT" AV 

E."; n TOTAL" 

15 LPRINT:LPRINT" ASSIGNMENT WEIGHT " ; : FORA=lTOTA:LPRINT 
RIGHT$(" "+STR$(W(A) ) f 3)+" " ; :NEXT:LPRINT:FORS=lTOTS :N=0 :D=0 :F 
ORA=lTOTA:G%=VAL(MID$(S$(S) ,16+(A*5) ,5)) : IFTTHENN=N+G%*W(A) :GOTO 
17ELSEIFMID$(S$(S) ,16+(A*5) ,5)=" *"THENG%=-1 

16 IFG%>=0THENN=N+G%*W(A) :D=D+W(A) : AV( A) =AV(A) +G% 

17 NEXTA:A=A-1:IFTTHENG1$=" " :G0T019ELSEIFG%=-1THENG1$=GR$:G 

OT018 

18 G%=N/D+.5:G1$=STR$(G%) : S$ (S) =LEFT$ (S$(S) , 20+A*5) +LEFT$ (SP$,5- 

LEN(G1$) )+Gl$ 

19 N$=STR$(N) :IFS<10LPRINT" " ; 

20 IFTTHENS$CS)=LEFT$(S$(S) ,20+5*A) :GOT022ELSEN$=STR$ (N) : 1=1 : IFG 

%<1THENG1$=" *":G0T022 *,,,»„„ 

21 IFVAL(G1$)<VAL(B$(I))THENI=I+1:G0T021ELSEG1$=" "+MID$( ABC 

DF&",I,1) 

22 S$(S)=S$(S)+LEFT$(SP$,6-LEN(N$))+N$+G1$: PRINT". " ; : IFTTHEN23EL 

SELPRINTS;" ";S$(S) 

23 NEXTS:IFTTHEN24ELSELPRINT"AVE. " ; SP$; : FORA=lTOTA: AV(A) =INT (AV 

(A)/TS+.5) :G1$=STR$(AV(A) ) : AV( A) =0 : LPRINT (LEFT$ (SP$, 5-LEN (Gl$) ) + 

Gl$) ; :NEXTA: LPRINT :A=A-1 

24 IFTTHENGOSUB46 : LPRINT : FORS=TST01STEP-l : IF (TS+1) -S<1 0LPRINT 

25 IFTTHENLPRINT(TS+1)-S;" " ;S$ (S) :NEXTS 

26 FORS=1TO60-TS:LPRINTCHR$(138) :NEXT:RETURN 

27 LPRINT :LPRINT"WORKSHEET FOR " ;CL$:PRINT"PLEASE TYPE IN DATE : 
GOSUB64:LPRINTIN$:FORI = 1TOTS:IFK10LPRINT" 

28 LPRINTI;LEFT$(S$(I) ,20) ; "I I I I I l 

j j j i i I I I n :NEXT:FORI=lTO60-TS: 

LPRINTCHR$(138) iNEXT:GOSUB65:CLS:PRINT"WORKSHEET FINISHED" :PRINT 
» " :GOT07 

29 RUN 

30 POKE16561,255:POKEl6562,255:END 

31 GOSUB9:IFTS<lTHENPRINT"NO STUDENTS" :GOT07ELSEPRINT: PRINT VALI 

D COMMANDS: „ „„-.«■ T «™, 

ENT ER END CHANGE" : PRINT: C$=" ": INPU 

T"C0MMAND OR HELP" ;C$: IFC$="END"THEN7ELSEIFC$="ENTER"THEN33ELSEI 
FC$=" CHANGE "THEN40ELSECLS 

32 PRINT"INVALID COMMAND" : PRINT" ":GOT07 

33 IFTA=NATHENCLS:PRINT"NO MORE ROOM": PRINT" ":G0T07E 

LSETA=TA+1:A=TA: INPUT" INPUT TOTAL POINTS POSSIBLE" ; Tl :PRINT"GRAD 
E INPUTS FOR ASSIGNEMNT";" # "TA:PRINT"4-LETTER NAME OF ASSIGNE 

MNT"": "; 

34 G0SUB64:G$=LEFT$(IN$,4) : IFG$=""THEN34ELSEA$ (A) =G$: PRINT"WEIGH 
T OF "A$": ";:GOSUB64:IN$=LEFT$(IN$,4) :W( A) =VAL( IN$) :PRINT"ASSIG 
NMENT # :"TA" "A$(A); n WEIGHT: "W( A) : PRINT" (TYPE * FOR INCOMPLE 



# 



NAME 



GRADE" 



TES) ": PRINT" 

35 FORS=lTOTS 

36 PRINTS ;LEFT$(S$(S)+". ",20); 

37 G0SUB64:IFIN$=""THEN36ELSEIFIN$="*"THEN38ELSEIFVAL(IN$)>T1THE 

NPRINT"> ";T1;"?? " :GOT036ELSEIFVAL( IN$)<0THENPRINT"<0 ??":G0T03 

Program continues 



^"For Your Col 




uter 



MASTER CONTROL 

Copyright ®1981 Soft Sector Marketing, Inc. - Written by A. Schwartz 






mm 




m^mm^^m 



Requries16-32K 

1. 50 preprogrammed command 
keys. Standard and Extended com- 
mand. 

2. Direct control of motor, trace 
and audio from keyboard. 

3. Automatic line numbering. 

4. Programmable Custom Key. 

5. Direct Run Button. 

6. Keyboard overlay for easy pro- 
gram use. 

7. Easy entry of entire commands 
into computer. 

Load Master Control into your ma- 
chine then either type in a BASIC 
program or load one in from tape 
to edit. Cuts programming time by 
50% or more $24.95 




List 

6 Cassettes - Disk version available soon. 









$49.95 



MA = Machine language 
NF = Non Extended Basic 
EXI = Extended Basic 



Tape 1 

Keys 

Bagels 

Find 

Darts 

Motor 

Bomber 

Football 

Kapow 

Dodge 

Tape 2 

Bounce 

lank 

One Arm 

Chute 

Where is it 

Lunar lander 

Slock Market 

Tape 3 

Multiply 

Divide 

Add Sub 

Simple Simon 

Hangman 

Beast 

Count [town 

Acey 

Genie 

Protect 

Tape 4 

Graphics 

Songs 

Joy 

Mortgage 

Checkbook 

Draw 1 

Morris 

Sound 

Tape S 

Rom 

Trace 

MMaster 

Demo 

Disassembler 

Basbug 

Ohmlaw 

Convert 

Drawer 2 

Degrees 

Tape 6 

Hurdler 

tntrap 

Search 

Flip Flop' 

Lost Atom 

Attack 
Cartel" 



4k NE 

4k NE 

16k NE 

4k NE 

4k NE 

4k NE 

16k EX! 

4k NE 

4k NE 

16k EXT 

32k EXT 

4k NE 

16k EXT 

16k EXT 

16k FXT 

4k NE 

16k EXT 

16k EXT 

16k EXT 

4k NF 

16k NE 

16k NE 

4k NE 

16k NE 

16k NE 

16k EXT 

16k EXI 

16k EXT 

16k EXT 

16k EXT 

16k EXT 

16k EXT 

16k EXT 

16k EXT 

16k MA 

16k MA 

16k MA 

16k NE 

16k NE 

16k NE 

4k NE 

4k NE 

32k EXT 

4k NE 

32k EXT 

16k EXT 

16k NE 

16k EXT 

16k EXT 

16k EXT 

32k FXT 



COD - certified cneck. MO or cash onry Most orders 
shipped next day All orders must nave shipping included. 
Please oaa 2% or $2 50. whichever is higher tor snipping. 
Michigan residents, please odd 4% tax Aad extra S1 .50 for 
C O.D Personal checks take 3 weeks to clear Out ot the 
country orders odd $1000 extra shipping. 
• TRS-80 is a product ot Radio Shack, div of the Tandy Corp 
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"Student grade averages are calculated 

as each name is printed to speed up the operation. 



Program continued 



7ELSEIFIN$="END"THENCLS:TA=TA-1:PRINT"GRADES ENDED" :G0T07ELSEIFT 

O100GOSUB39 

3 8 IN$=LEFT$(SP$,5-LEN(IN$) ) +IN$: S$ ( S) =LEFT$ (S$ ( S) ,20+( (A-l)*5) ) 

+ IN$ : NEXT: 1=1 : G0SUB9 :G0T07 

39 G!=VAL(IN$) :G! = ( (Gl/Tl) *100) :G=G! :IN$=STR$(G) : RETURN 

40 PRINT"CHANGE GRADE FOR WHICH ASSIGNMENT #?":GOSUB64 

41 IFIN$="END"THENCLS:PRINT"GRADE CHANGE ENDED" :G0TO7ELSEINPUT"H 
OW MANY POINTS MAXIMUM?" ; Tl :A=VAL ( IN$) : IFA<10RA>TATHENPRINT"NO S 
UCH ASSIGNMENT! " :GOTO40ELSEPRINT" ENTER STUDENT NUMBER ";:GOSUB6 
4:IFIN$="END"THEN41ELSES=VAL(IN$) 

42 IFS<10RS>TSTHENCLS:PRINT"NO SUCH STUDENT" :GOTO40ELSEPRINT"STU 
DENT ";S;" " ; LEFT$ ( S$ (S) ,20) ; : PRINTMID$ (S$ (S) , 16+ ( 5*A) ,5) 

43 PRINT"CHANGE GRADE TO: " ; :GOSUB64 : IFIN$=""THEN43 

44 IFIN$="*"THEN45ELSEIFTK>100THEN3 9ELSEIFVAL(IN$) <0ANDIN$<>" 
*"THENPRINT"<0 ??" :GOT044ELSEGOSUB39 

45 S$(S)=LEFT$(S$(S) ,15+(A*5) ) +LEFT$ (SP$ ,5-LEN ( IN$) ) +IN$+MID$ (S$ 
(S) ,16+5+(A*5) ,5*(TA-A) ) : 1=1 :GOSUB9 :GOT07 

46 GOSUB9 : PRINT :INPUT"WHICH FIELD DO YOU WANT TO SORT ON, NAME, 
AVERAGE, OR POINTS " ; IN$ : IFIN$="AVERAGE"THEN47ELSEIFIN$="POINT 
S"THEN47ELSED1=0:L1=LEN(S$(1) ) :GOT048 

47 D1=21+(5*A) :L1=5 

48 IFTS=0THENPRINT"NO RECORDS IN FILE" :RETURNELSEX ( 0) =TS :X ( 1) =VA 
RPTR(S$(1) ) :X(2)=D1:X(3)=L1:Z=USR(VARPTR(X(0) ) ) : FORI=lTOTS : PRINT 
I;" ";S$(I) :NEXT:RETURN 

49 GOSUB 9: PRINT: PRINT "VALID COMMANDS: ": PRINT" 

ADD CHANGE DELETE NEW":PRI 

NT:C$="" :INPUT"COMMAND OR HELP" ; C$: IFC$="END"THENCLS : 1=1 :GOSUB9 : 
GOT07ELSEIFC$=" ADD "THEN5 9ELSEIFC$= "DELETE "THEN6 2 

50 IFC$= "CHANGE "THEN56ELSEIFC$="NEW"THEN51ELSE4 9 

51 CLS: PRINT: PRINT: PRINT "NAME OF CLASS? " ; : G0SUB64 :CL$=IN$:TS=0 
:TA=0: PRINT "YOU MAY NOW TYPE IN NEW NAMES" : PRINT"TYPE IN 'END' A 
FTER LAST NAME IS ENTERED." 

52 TS=TS+1:IFTS>NSTHENPRINT"CAN'T TAKE ANY MORE STUDENTS" :GOT05 4 

53 PRINTTS": "; :GOSUB64 : IFIN$="END"THEN54ELSEIN$=LEFT$ (IN$,20) : 
L=LEN(IN$) :IFIN$=""THEN53ELSEIN$=IN$+LEFT$(L$,20-L) :S$(TS) =IN$:G 
OT052 

54 TS=TS-1 :GOSUB46 : FORI=1TO60 : NEXTI : RETURN 

55 CLS: PRINT" "CL$"":IFTS<0THENPRINT "NO STUDENTS" : PRINT" 

— " :GOT07ELSEFORS=lTOTS:PRINTS;LEFT$(S$(S) ,20) :NEXT: FORI=1TO600 : 
I=l:GOSUB9:GOT07 

56 CLS:PRINT"CHANGE":PRINT" ":PRINT" 

TYPE IN STUDENT NUMBER: " :GOSUB64 : IFIN$="END"THENCLS : PRINT"DONE" : 

PRINT" " :GOT07ELSES=VAL(IN$) : IFS<10RS>TSTHENPRINT"NO SUCH STU 

DENT NUMBER":GOSUB6 5:GOT049 

57 IFS<=TSTHENPRINT"OLD NAME* " ; LEFT$ (S$ (S) ,20) 

58 PRINT"NEW NAME IS? " ; : GOSUB64 : IFIN$=""THEN58ELSEIN$=LEFT$ ( IN$ 
,20) :L=LEN(IN$) : IN$=IN$+LEFT$ (L$ ,20-L) : S$ (S) =IN$+MID$ (S$ (S) ,21, L 
EN(S$(S) ) ) :GOSUB46:FORI = 1TO600:NEXTI:CLS:PRINT"NAME CHANGED":PRI 
NT" " :GOT07 

59 CLS :PRINT"ADD": PRINT" " :TS=TS+1 : IFTS>NSTHENPRINT" TOO MANY 

STUDENTS " : TS=TS-1 : GOT049 

60 PRINT" 

ENTER NEW STUDENT NAME" :GOSUB64 : IFIN$=" "THEN60ELSEG$=" " : FORI=lTO 
TA:G$=G$+GR$:NEXT:S$(TS)=STRING$(20,32)+G$:IN$=LEFT$(IN$,20) :L=L 
EN(IN$) :IN$=IN$+LEFT$(L$,20-L) : S$ (TS) =IN$+MID$ (S$ (TS) ,21,LEN(S$( 
TS) ) ) :GOSUB46:FORI = 1TO600:NEXTI:CLS 

61 PRINT"NAME ADDED" : PRINT" ":GOT07 

62 CLS :PRINT"DELETE": PRINT" ": PRINT: PRINT"ENTER STUDENT NUM 

BER TO BE DELETED":GOSUB64:S=VAL(IN$) : IFS<10RS>TSTHENCLS : PRINT"N 
SUCH STUDENT NUMBER" :GOSUB65 :GOT049ELSEPRINT"IS THIS THE NAME 
YOU WISH DELETED? (Y OR N) " ;LEFT$ (S$ (S) ,20) ; 

63 INPUTIN$:IFIN$<>"Y"THEN7ELSES$(S) =S$ (TS) -TS=TS-1 : CLS : PRINT"NA 
ME DELETED": PRINT" ":GOT07 

64 INPUTIN$: RETURN 

65 FORII=1TO600:NEXTII:RETURN 

66 CLS :GOSUB9 : INPUT#-1 ,CL$ : INPUT! -1 ,TS : INPUT#-1 ,TA: PRINT" . " ; :FOR 
S=1T0TS : INPUT#-1 , S $ ( S) : PRINT" . " ; : NEXTS : PRINT : FORA=lTOTA : INPUT#-1 
,A$(A) : PRINT"."; : NEXTA: PRINT: FORA=lTOTA: INPUT#-1 ,DR$: W( A) =VAL(DR 

$) : PRINT". " ; : NEXTA: PRINT .-RETURN 

Program continues 



tered. When entering the sort routine the 
option is given of sorting on the name field, 
the average field or the total field. 

The Sort portion of the program is the 
machine language sort published in Radio 
Shack's July 1980 Newsletter and modified 
by Dave Anderson and Joe Fugate. Their 
program, Flexfile, uses this very quick sort 
which may be relocated for 32 and 16K 
machines. 

Delete: This allows the deletion of any 
name. Sort is not needed after this program 
option. 

Add: New names may be added to the 
class. When names are added after grades 
have been recorded, the missing grades are 
entered as asterisks so they will not be 
counted in that student's average. 

Load transfers the student file into the 
computer from disk. (Caution— remember 
the file name.) The program can easily be 
changed to operate on a tape system. 

Save will store the student file on disk. 
The file name selected is automatically ex- 
tended with a DAT to separate it from any 
other program files you might have. 

Print either allows the printing of the 
grade report, or a work sheet with only the 
name and spaces for grades. Student grade 
averages are calculated as each name is 
printed to speed up the operation. In using 
total points, the printout will not occur until 
you have a chance to determine the order 
desired, by name or by point value. 

Program Description 

The string S$(S) stores the student name 
(first 20 spaces), and the associated grades 
(five spaces for each grade). The major 
variables used are in Table 1. The program 
treats this as a two dimensional string; S 
being the student, and A being the location 
of the grade in the string. This approach re- 
duces the amount of memory required. With 
the remarks deleted the program should 
easily run in a 16K tape system. The only 
changes needed are the replacement of the 
load and save routine, and the Line Input. 

Changes for Different Systems 

The program is well documented with re- 
marks for changes to make the system 
operate with different equipment configura- 
tions. The following is a summary of the 
changes required for different systems: 

16K, Level II: POKE 16526,0: POKE 

16527,127 

Memory Size 32512 

Change all 255's in machine 

language section to 127. 
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Special Deals 
*°° of the Month *»» 

Attentionl SALE Attention! 

- This Month Only- 

Our 40 Track Disk Drive, w/ power supply & case* 

$260.00 

Our 80 Track Disk Drive, w/ power supply & case* 

Please state machine when ordering. y wOOiUU 'Add $5.00 shipping per drive. 

40 Track Bare Disk Drive* $225.00 

80 Track Bare Disk Drive* $350.00 

80/160 Track Bare Disk Drive* $475.00 

2 Drive Cables, Mod I or III $25.00 

4 Drive Cables, Mod I only $35.00 

Printer Extender Cable $18.00 

Lynx Modem List $299.00 $218.00 



- Printer Special - 



OKIDATA 82A 

Performance 

Print speed, cps - 120 
Print technique - Bidirectional 
Short line seeking - Standard 
Columns, Standard Characters- 80 

Condensed characters- 132 
Printing Characteristics 
Matrix standard caracters -9x9 
Character set- Full 96 character ASCII plus 64 

block graphics shapes 
Ribbon 

Media - Standard four mil, W wide on 2" spools 
Interfaces 

Parallel, Centronics-compatible - Standard 
Serial, RS232C 1200 bps- Standard 

Reliability 

MTBF - 4000 hours 
Warranty 

Ninety days parts and labor, one year on print 
head under normal use 

All prepaid orders - cash/MC/Visa 

Price $469.00 

American Express & COD. orders 

Call for Price 




COD. - certified check. MO or cash only. Most orders 
shipped next day. All orders must hove shipping included. 
Please add 2% or $2.50. whichever is higher for shipping. 
Michigan residents, please add 4% tax. Add extra S 1 .50 for 
COD Personal checks take 3 weeks to clear. Out of the 
country orders add S 10.00 extra shipping. 
' TRS-80 is a product of Radio Shack, div of the Tandy Corp. 



SOFT SECTOR MARKETING, 

INCORPORATED 
6250 Middlebelt »Garden City, Michigan 48135 
Order Line 800-521-6504 
Michigan Orders & Questions 313-425-4020 .„ 



The American Express' Card 
Don t leave home wiinoul it •" 



VISA' 



"The resulting printout will show the calculated 
weighted grade average and appropriate letter grade. 



Program continued 



67 CLS:G0SUB9:IFTS<1THENPRINT"N0 STUDENTS" :G0T07ELSEPRINT#-1 ,CL$ 
: PRINT#-1 ,TS : PRINT#-1 f TA: PRINT" . " ; : F0RS=1T0TS : PRINT#-1 , S$ (S) : PRI 
NT" . " ; : NEXTS : PRINT : F0RA=1T0TA: PRINT#-1 , A$ (A) : PRINT" . " ; : NEXTA: PRI 
NT:F0RA=1T0TA:DR$=STR$(W(A) ) :PRINT#-1 ,DR$ 
6 8 PRI NT".";: NEXTA: PRI NT: RETURN 
69 INPUT#-l,A$:PRINTA$:GOT069 



WORKSHEET FOR RKPV3RD 
MARCH 13TH, 1981 

1 BARKER DELFH 

2 BE ITER MNNR 

3 BRETSON KflTHV 

4 BROWN PATTV 

5 COCOA 1MOGEHE 

6 CROSLEV DEBBIE. . . . 

7 CURRV STHCEV 

8 JENKINS JEAN 

9 LANCER DAWN 

10 WHITE NflNCV 

11 YOUNG BOBBV 



I... 
I.. . 

I. .. 



I.. . 

I.. 

I... 

I... 

I.. 



Fig. 1 







Progra 


m Listing 2 










10 


CLS: CMD"T" 














20 


PRINT 














30 


PRINT TAB(20) "GRADE BOOK " 










35 


REM FOR 32K 


POKE 


L6561,254 


AND 


16562, 


190 






FOR 16K POKE 


16561,254 


AND 


16562 


,126 




40 


POKE 16561, 


254 












50 


POKE 16562, 


254 












60 


CLEAR 6000 














70 


DEFINT A-C 














80 


DEFINT X-Z 












Program continues 



Change line 310, the POKE I-257.A 
to: POKE I +32511, A 
Disk entry point &H7F00 

For 32K, disk system: POKE 16526,0: 

POKE 16527,191 

Memory Size 48895 

Change all 255's in machine 

language section to 191 's 

Change line 310, the POKE I-257, A 

to: POKE 1-1 6641, A 

Disk entry point &HBF00 

Included in the program is a short sound 
routine that tells the operator when the 
computer is ready to accept the next grade. 
Due to the extensive use of strings to store 
student data, garbage collection would be- 
come a problem when entering grades. It is 
easy when typing fast to lose a grade. The 
Ready beep from the computer solves this 
problem. 

The data for the sound program is includ- 
ed in line 295. The sound is called through 
the USR command in line 2455. 

The 16K (packed) version of the Grades 
program is available from the author. ■ 

Ben Pugsley is a graduate of Boise State 
University holding a Bachelors and Masters 
degree in Business Education. He is cur- 
rently teaching Introduction to Computers 
and Data Processing, and other business 
subjects at Meridian Sr. High, Meridian, 
Idaho. 



ONINITERNI 

What is OMNITERM? 

OM NITERM is a professional communications package for the TRS-80 that allows 
you to easily communicate and transfer files or programs with almost any other 
computer. We've never found a computer that OMNITERM can't work with. It's a 
complete package because it includes not only the terminal program itself, but also 
conversion utilities, a text editor, special configuration files, serious 
documentation and serious support. 

Why do I need it? 

You need OMNITERM if you need to communicate efficiently with many different 
computers, or if you want to customize your TRS-80 for use with one particular 
computer. You need OMNITERM to SOLVE your communications problems once 
and for all. 

What do I get? 

The OMNITERM package includes the OMNITERM terminal program, lour 
conversion utilities, a text editor, and setting files for use with popular computers 
such as CompuServe, the Source, and Dow Jones — just as samples of what you can 

[lindbergh Systems 



The ULTIMATE TRS-80 Terminal Package 



do for the computer you want to work with. The package includes six programs, seven 
data files, and real documentation: a 76-page manual that has been called "the best in 
the industry." And OMNITERM comes with real user support. We can be reached 
via CompuServe, Source, phone, or mail to promptly answer your questions about using 



What do I need to use OMNITERM? 

A Model I or Model III TRS-80. at least 32K of memory, one disk, and the RS-232 
interface, or Microconnection modem. OMNITERM works with all ROMs and DOSes, 
and will work with your special keyboard drivers. 

What will it do? 

OMNITERM allows you to translate any character going to any device: printer, screen, 
disk, keyboard, or communications line, giving you complete control and allowing you to 
redefine the character sets of all devices. It will let you transfer data, and run your 
printer while connected for a record of everything that happens. OMNITERM can 
reformat your screen so that 80. 32. or 40 column lines are easy to read and look neat on 
your TRS-80 screen. It even lets you get on remote computers with just one keystroke! 
The program lets you send special characters echo characters, count UART errors, 
configure your UART. send True Breaks and use lower case It accepts VIDEOTEX codes, 
giving you full cursor control. It will even let you review text that has scrolled off 
the screen! Best of all. OMNITERM will save aspecial tile with all your changes so you 



can quickly use OMNITERM for any 
one of many different computers by 
loading the proper file. It's easy to use 
since it's menu driven, and gives you a 
full status display so you can examine 
and change everything. 

"OMNITERM has my vote as the top 
TRS-80 terminal program available today" 
Kilobaud Microcomputing, June 1981. 
pages 16-19. 

OMNITERM is $95 (plus shipping if 
COD) Call for 24 hour shipment. Manual 
alone Si 5. applied toward complete pack- 
age. Visa, M/C, and COD accepted. MA 
residents add 5% tax. Dealer inquiries 
invited. 

Contact Lindbergh Systems for your 
custom programming needs. We are 
expert at writing software to work with 
YOUR hardware, in assembler, high-level 
language, or Forth. 

v* 135 



41 Fairtlill Road, Holden, MA 01520 (617) 852-0233 Source:TCA818 CompuServe 70310267 TRS-80 is a - of TandyCofD 
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MICRO MAINFRAME 

HARD DISKS 

SETTING THE INDUSTRY 

STANDARD 



Compare MMF's features with those of 
our competitors. All MMF hard disk sys- 
tems feature ECC (error correction 
code). Not all of our competitors can say 
that. Error correction is an absolute 
necessity in the hard disk environment, 
as hard disk media does develop bit pat- 
tern sensitivity with time. 

Mainframe hard disk suppliers have 
been using error correction techniques 
for years, but many of the micro com- 
puter hard disk suppliers are selling 
units with CRC error detection only. This 
means that as the media ages, disk sec- 
tors will become unreadable and valu- 
able data will be lost. This operating is 
identical to floppy disks and your expen- 



sive hard disk becomes only slightly bet- 
ter than the floppy you replaced. 

All Micro Mainframe units shipped 
after February 1982 will operate in con- 
junction with our Micro Network Mul- 
tiplexer. Each Micro Network will allow 
up to four computers to be connected td 
one of our hard disk systems. Additional 
networks may be connected for further 
expansion. 

MMF is pleased to announce our new 
M200-C series hard disk system con- 
sisting of a 10 Megabyte Removable car- 
tridge, and a 10 Megabyte fixed hard 
disk. This unit functions with the Micro 
Network Multiplexer and features ECC. 



SYSTEM PRICING 



MICRO NETWORK MULTIPLEXER 

10 MEGABYTE REMOVABLE CARTRIDGE WINCHESTERS 

M100-R1 Modi or Mod-Ill version 

M100-R2 Mod II 

5 MEGABYTE FIXED WINCHESTERS 

M50-F1 Mod -I* or Mod-Ill version 

M50-F2 Mod II version 

120 MEGABYTE FIXED WINCHESTERS 

M1200-F1 Modi or Mod-Ill version 

M1200-F2 Mod-II version 

FIXED AND REMOVABLE SYSTEMS 

M200-C1 Modi or Mod-Ill version 

M200-C2 Mod II version 

Call for the location of your nearest Micro Mainframe Dealer. 
Dealers please inquire on your letterhead. 



MICRO MAINFRAME 

2227 McGregor Ave. 
Rancho Cordova, CA 95670 
(916) 635-3997 .«, 



Program continued 



90 DEFINT E-V 

95 REM FOR 32K DEF USR 1=&HBF00 

FOR 16K LEVEL II POKE 16526,0 AND POKE 16527,127 
100 DEF USR 1=&HFF00: DEF USR =&HFFCD 

110 DATA 205, 127, 10, 94, 35, 86, 237, 83, 32, 255, 35, 94 
120 DATA 35, 86, 237, 83, 215, 255, 35, 94, 35, 86, 237, 83 
130 DATA 217, 255, 35, 126, 50, 219, 255, 33, 0, 0, 34, 213 
140 DATA 255, 237, 91, 213, 255, 203, 59, 175, 203, 58, 48 
150 DATA 2, 203, 251, 237, 83, 213, 255, 122, 179, 200, 42 
160 DATA 32, 255, 237, 82, 34, 209, 255, 33, 0, 0, 34, 207 
170 DATA 255, 42, 207, 255, 34, 205, 255, 42, 205, 255, 237 
180 DATA 91, 213, 255, 25, 34, 211, 255, 235, 33, 0, 0, 25 
190 DATA 25, 25, 229, 237, 91, 205, 255, 33, 0, 0, 25, 25 
200 DATA 25, 237, 75, 215, 255, 9, 235, 225, 9, 229, 213, 58 
210 DATA 219, 255, 71, 197, 19, 35, 78, 35, 70, 42, 217 
220 DATA 255, 9, 235, 78, 35, 70, 42, 217, 255, 9 
230 DATA 193, 26, 150, 56, 6, 32, 35, 19, 35, 16, 246 
240 DATA 209, 225, 6, 3, 78, 235, 126, 113, 235, 119 
250 DATA 35, 19, 16, 246, 42, 213, 255, 235, 42, 205 
260 DATA 255, 175, 237, 82, 34, 205, 255, 48, 155, 24, 2 
270 DATA 209, 225, 42, 207, 255, 17, 1, 0, 175, 25, 34, 207, 255 
280 DATA 237, 91, 209, 255, 237, 82, 218, 71, 255, 195, 37, 255 
290 FOR 1=1 TO 234 
295 DATA 205,127,10,62,1,14,255,237,91,61,64,69,47,230,3,179,211,255,13,40, 

4,16,246,24,242,37,32,241,201 

300 READ A 

305 REM FOR 32K POKE 1-16641, A 

FOR 16K POKE 1+32511, A 
310 POKE 1-257, A 
320 NEXT 
330 NS=45 
340 NA=20 
350 T=0 

360 DIM S$(NS), W(NA) , A$(NA) , AV(NA) , X(3) 
370 Z=0 

380 SP$=STRING$(20," ") 
390 L$=STRING$(20,".") 
400 GR$=" *" 
410 B$(l)=" 90" 
420 B$(2)=" 80" 
430 B$(3)=" 70" 
440 B$(4)=" 60" 

450 DATA HELP, PRINT, LOAD, SAVE, NEW, QUIT, GRADES, SORT, NAMES 
460 FOR 1=1 TO 9 
470 READ C$(I) 
480 NEXT I 
490 PRINT 

495 REM COMMAND PROCESSING 
500 C$="" 

510 INPUT "COMMAND OR , HELP'";C$ 
520 FOR 1=1 TO 9 

530 IF C$(I)=C$THEN 560 

540 NEXT 

550 PRINT" INVALID COMMAND — TRY HELP" 

560 ON I GOSUB 630, 680, 1580, 1810, 2100, 2110, 2140, 2880, 3080 

570 GOTO 490 

575 REM DISPLAY COMMANDS 

580 CLS 

590 PRINT C$(I) 

600 PRINT STRING$(LEN(C$(I)) ,"-") 

610 PRINT 

620 RETURN 

625 REM HELP ROUTINE 

630 GOSUB 580 

640 PRINT 

650 PRINT"VALID COMMANDS" 

660 PRINT" 

HELP PRINT LOAD SAVE NAMES 

GRADES NEW QUIT SORT" 
670 RETURN 

675 REM PRINT ROUTINE 
680 GOSUB 580 

690 IF TS<1 THEN PRINT"NO STUDENTS": GOTO 490 
700 PRINT"VALID COMMANDS" 
710 PRINT" 

REPORT WORKSHEET" 

720 GOSUB 4200 
730 IF IN$="END" THEN 490 
735 IF PEEK(16425)<>1 THEN POKE 16425,1 

740 IF IN$="REPORT" THEN CLS: PRI NT" REPORT " : PRINT" ": GOTO 760 

750 IF IN$="WORKSHEET" THEN CLS: PRINT "WORKSHEET" : PRINT" ": GOTO 1 

410 

755 REM PRINT REPORT ROUTINE 

760 PRINT"TYPE IN DATE" 

770 GOSUB 4200 

780 CLS Program continues 
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GARBAGE PROBLEM? 

Memory Loss • Errors • Crashes • Reboots 







Take out the garbage 

with| ta ®yO@Y[LOK]g(! 






SPIKE, SURGE AND 

NOISE SUPPRESSOR 



• Six protected receptacles 

• Load rating of 15 amps 

• Broad band RFI suppression 

• Maximum transient current 
of 6000 amps (8X20jus) 

$^Q95 plus $1.75 

only %J2/ for shipping 

PROTECTS COMPUTERS, TELEVISION, 
PERIPHERALS, VIDEO GAMES, VCR'S 
AND OTHER ELECTRONIC DEVICES. 
SUPPRESSES DAMAGING POWERLINE 
TRANSIENTS AND RF INTERFERENCE. 



BWJ TECHNOLOGY, INC. 



BOX 6214 ARLINGTON, TX 76011 
DEPT. 8 (817)277-2726 



I 



CHECK, MONEY ORDER, VISA, MASTER CHARGE • TEXAS RESIDENTS ADD 5% 



ESTATE PLANNING MODEL — — — ■ 
SAVE TIME AND MONEY 

by using your TRS-80* Model II, 64 K computer 

for professional estate analysis. 

•fr Marital Deduction Formula Analysis Reports 

analyze six formula bequests for both husband 
and wife for both orders of death. 

•fr Estate Tax Return Report computerizes estate 
tax planning for decedents' estates. 

•fr Client-Ready Reports printed. 

ft State (Ohio) and Federal Taxes computed. 

ft Free Updates to reflect legislative changes 
for one year. 

ft Sold and maintained by author: an attorney 
and estate planning professional. 

ft ALREADY REVISED to comply with 1981 
TAX REDUCTION ACT. 

YES, please send me more information on the 
Estate Planning Model. 



Name. 



Name of Firm 

Street 

City State . 

Mail to: Beard Software Development Co. 
59 Skyline Avenue 
Canfield, Ohio 44406 



Zip 



'TRS-80 is a trademark of Tandy Radio Shack. 



k-134 



CANADIANS 

NOW IN STOCK 

ACORN SOFTWARE 

BIG FIVE 

INSTANT SOFTWARE 

CREATIVE COMPUTING 

ADVENTURE 

INTERNATIONAL 

APPARAT INC. 
EPSON PRINTERS 

MANY MORE 

MOD I • MOD III • COLOR 

Excellent 5V*" Diskettes 
S. Den. or D. Den. 
Fully Guaranteed 

Lower Case Mod - Mod I 
One IC $29.95 

IBM Selectric Printer 
Conversion Kit $825.00 

VISA 

Phone or Write for Info. 
(403) 423-3919 

CMD MICRO " 181 

10546- 106 Street 

Edmonton, Alberta 

T5H 2X6 



OMNITEK COMPUTERS " 195 

INTERNATIONAL, INC. 

1899 MAIN STREET 

TEWKSBURY, MASS 

617-851-4580 

Scotch S.S/S.D 5.25" Diskettes 25.00 

Elephant Memory 5.25" Diskettes. 23.00 

1 6I< RAM KITS I 4.00 

TECO I 2" F3&.G Monitor II 9.00 

Okidata Microline 80 329.00 

Okidata Microline 82A 449.00 

Okidata Microline 83A 699,00 

Epson Mx-80 479.00 

Radio Shack Mill w/48K 879.00 

Radio Shack Mill w/48K and 2 40T dr 

1699.00 

40 track 5.25" Tandon TM- 1 00- 1 . 284.00 
80 track 5.25" Tandon Dual Head484.00 

5.25" Power Supply and case 49.00 

8" Power Supply and case 109.00 

Apple II plus w/48K. I drive. RF mod 

1690.00 

Comet I 25 CPS printer 299.00 

TRS-80 is a registered trademark of 
Tandy Corp. 

Prices are for mail order only. 

TERMS: Check, money order, Mastercard 

and Visa accepted. F.O.B. Tewksbury- 

freight extra. Mass residents add 5% 

sales tax. Write for FREE CATALOG. 



^See List of Advertisers on page 402 
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Program continued 



7 90 LPRINT IN$ 

800 LPRINT CL$; n FOR ";TA;" ASSIGNMENTS . .AND ";TS;" STUDENTS, 

810 LPRINT n ASSIGNMENT NO 

820 FOR L=l TO TA 

830 LPRINT LEFT$(SP$ f 5-LEN(STR$ (L) ) ) +STR$ (L) ; 

840 NEXT 

850 LPRINT"" 

860 LPRINT "ASSIGNMENT TITLE "; 

870 FOR L=l TO TA 

880 LPRINT LEFT$(SP$, 5-LEN ( A$ (L) ) ) +A$ (L) ; 
890 NEXT 

900 IF T THEN LPRINT" TOTAL" ELSE LPRINT" AVE.";" TOTAL" 
910 LPRINT 

920 LPRINT" ASSIGNMENT WEIGHT "; 

TO TA 

), 3)+" "; 



930 FOR A=l TO TA 




940 LPRINT RIGHT$(" 


" +STR$(W(A) 


950 NEXT 




960 LPRINT 




970 FOR S=l TO TS 




980 N=0 




990 D=0 




1000 FOR A=l TO TA 





FOR TOTAL POINTS PROCESSING 
" THEN G%=-1 



1010 G%=VAL(MID$(S$(S) , 16+(A*5) , 5)) 

1020 IF T THEN N=N+G%*W(A) : GOTO 1050 

1030 IF MID$(S$(S), 16+(A*5) , 5)=" 

1035 REM TO CALCUALTE WEIGHTED POINTS AND WEIGHTED VALUE 

1040 IF G%>=0 THEN N=N+G%*W(A) : D=D+W(A) : AV(A) =AV(A) +G% 

1050 NEXT A 

1060 A=A-1 

1070 IF T THEN Gl$=" ": GOTO 1120 

1080 IF G%=-1 THEN G1$=GR$: GOTO 1090 

1085 REM TO CALCULATE STUDENT AVERAGE 

1090 G%=N/D+.5 

1100 G1$=STR$(G%) 

1110 S$(S)=LEFT$(S$(S) , 20+A*5)+LEFT$(SP$, 5-LEN (Gl$) ) +G1$ 

1120 N$=STR$(N) 

1130 IF S<10 LPRINT" "; 

1135 REM TO REDUCE STRING LENGTH WHEN USING TOTAL POINTS 

1140 IF T THEN S$(S) =LEFT$ (S$ (S) , 20+5*A) : GOTO 1200 



Program continues 



:■ 



$ LYNN'S A/R SYSTEM $ 

12 Integrated Account Receivable Programs 
Tested In Service For Over 2 Years 



User's Coments: 

• increased cash flow 

• saved over 50 hou 

• almost complete 



rs a month in secretarial hours 
ly eliminated billing errors 



LYNN'S A/R SYSTEM WILL 

• print invoices • store 1 ,100 open invoices • tell you your 
account's receivable total, amount of total invoices out- 
standing, average amount of total invoice's* tell you at any 
time how many invoices an individual account has open, the 
total amount owed, the average per invoice, the invoice date, 
and the invoice amount • total sales on account for given 
month, number of invoices sent, average sale per invoice 

• how much an account purchased during month, how many 



invoices were sent, average invoice for month • tell you 
what percent of sales an account is to total sales by month 

• tell you what percent of accounts receivable an account is 

• print labels for your accounts • print statements at end of 
month and/or beginning of month and/or any time during 
month, (either individual or all accounts)* print alphabetical 
hardcopy of accounts and account numbers • print all items 
sold for the month • AND MUCH MORE!! • 



Only 



$4995 



+ $2.00 Shipping & Handling 

linois Residents Add 6% Sales Tax 



Send $10.00 For Printouts 

And Documentation 

Credit Given On Order 



LYNN COMPUTER SERVICE 

6831 W. 157th St. 

Tinley Park, II 60477 

(312)429-1915 

Send state sales tax rate, company name - address - phone #, TRS-80 model #, number of drives, 
and whether you will be using NEWDOS or NEWDOS80 for model I, or TRSDOS/NEWDOS80 for 
model III. 

Equipment Needed: 48K model I or III, lineprinter, 2 ^ ,1 

disk drives. Model I users will need NEWDOS or NEWDOS- 
80 operating system by APPARAT, INC. 



% 



TRS80 and TRSDOS are trademarks of TANDY CORP 

NEWDOS and NEWDOS80 are registered trademarks of APPARAT iNC 
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CUPEK 

UTILITY ♦ 




SUPER UTILITY + 
<C> <P> 1981 BY 
BREEZE/QBD, INC. 



I 



Byi KIM WATT 



1 



Read Paul Wiener's review on page 366 
in the Jan- '82 80-MICR0C0MPUTING. (tm> 
SU+ ha* even MORE feature* now! ! 



Mod I or II 
♦74-95 
(specify) 







SPECIAL Mod I/I I I 
♦124.95 
Boots on EITHER machine! 



I 



80 Track versions 
AVAILABLE ON 
REQUEST 



NEW BOOK by KIM WATT- M SUPER UTILITY* TECH MANUAL" - «14, 95 



SPEAK! - by Bill Neville 
Mod III only- Add TALKING 
to your games and programs! 
Mod III DISK only 39-95 
MULTIDOS I or III 79-95 
LDOS 5.1-1 or III 129-95 



iii ii iiiiii iii i i ii ni 






PDUERd r h bi 

A SCREEN GRAPHICS UTILITY FOR MOD I or I I I 
SAVE SCREENS IN 6 DIFFERENT FORMATS! 



I 



By» KIM WATT 



] oly 3935 




YOU CAN NOW EASILY CREATE, SAVE, 
OR PRINT GRAPHIC SCREEN DISPLAYS!! 



GREAT for EPSON'S! With or without GRATRAX-80 <tm) 



11500 Stemmons Expressway 



Dallas, Texas 75229 



M/C-VISA 

CARDS 
Accepted 






<214) 484-2976 — MicroNet* 70130,203 
Join OUR Xtra-80 Sig ON MicroNet! 
From the "OK" prompt, types R QSD 






Write for 
our FREE 
Catalog! 



DEALER INQUIRIES INVITED 

TJSTEJWWHS^fSrt^BfrZS 1 Shipping7HamPH"ng J^BRPTBRTadd «10 

using PowerDraw!) iu.S- FUNDS ONLY 
Breeze/QSD, Inc. | for shipping 



(This ENTIRE AD 
PowerSoft is a 
Radio Shack is 
See US at NCC 



was created 
division of 
a TM of the TANDY CORP. 
in Dallas! April 21-25! 



NO personal 
checks PLEASE 



Program continued 



1150 N$=STR$(N) 

1160 1=1 

1170 IF G%<1 THEN Gl$ = " * " : GOTO 1200 

1175 REM TO FIND LETTER GRADE 

1180 IF VAL(G1$)<VAL(B$(I) ) THEN 1=1+1: GOTO 1180 

1190 Gl$= n " +MID$("ABCDF&",I, 1) 

1200 S$(S)=S$(S)+LEFT$(SP$, 6-LEN (N$) ) +N$+G1$ 

1210 PRINT". "; 

1220 IF T THEN 1240 

123 LPRINT S; n ";S$(S) 

1240 NEXT S 

1250 IF T THEN 1350 

1260 LPRINT"AVE. ";SP$; 

127 FOR A=l TO TA 

1280 AV(A)=INT(AV(A)/TS+.5) 

1290 G1$=STR?(AV(A)) 

1300 AV(A)=0 

1310 LPRINT (LEFT$(SP$, 5-LEN (Gl$) ) +G1$) ; 

1320 NEXT A 

1330 LPRINT 

1340 A=A~1 

1350 IF T THEN GOSUB 2880: LPRINT: FOR S=TS TO 1 STEP -1:IF (TS+1)-S<10 LPR 

INT" "; 

1360 IF T THEN LPRINT (TS+l)-S; n n ;S$(S): NEXT S 

1370 LPRINT CHR$(12): REMFOR S=l TO 60-TS 

1380 REM LPRINT CHR$(138) 

1390 REM NEXT 

1400 RETURN 

1405 REM PRINT WORKSHEET 

1410 LPRINT 

1420 LPRINT "WORKSHEET FOR ";CL$ 

1430 PRINT"PLEASE TYPE IN DATE" 

1440 GOSUB 4200 

1450 LPRINT IN$ 

1460 FOR 1=1 TO TS 

1470 IF K10 LPRINT" " ; 

1480 LPRINT I; LEFT$(S$(I) r 20) ; "I I I I I I I 

I I I I I I I" 

1490 NEXT 

1500 REM FOR 1=1 TO 60-TS 

1510 LPRINT CHR$(12): REM LPRINT CHR$(138) 

1520 REM NEXT 

1530 GOSUB 4220 

1540 CLS 

1550 PRINT"WORKSHEET FINISHED" 

1560 PRINT" " 

157 GOTO 4 90 

157 5 REM LOAD DATA 

1580 CLS 

1590 GOSUB 580 

1600 INPUT"ENTER FILE NAME (NO EXTENSIONS) " ;DF$ 

1610 IF DF$="" THEN 1600 

1620 IF DF$="END" THEN RETURN 

1630 OPEN"I",l r DF$+"/DAT" 

1640 INPUT#1, CL$, TS$, TA$ 

1650 TS=VAL(TS$) 

1660 TA=VAL(TA$) 

1665 PRINT CL$;" FOR ";TS;" STUDENTS AND ";TA;" ASSIGNMENTS" 

1670 FOR S=l TO TS 

1680 INPUTS1, DR$ 

1690 S$(S)=DR$ 

1700 NEXT S 

1705 IF TA=0 THEN GOTO 1790 

1710 FOR A=l TO TA 

1720 INPUTS1, DR$ 

1730 A$(A)=DR$ 

1740 NEXT A 

1750 FOR A=l TO TA 

1760 INPUT#1, DR$ 

1770 W(A) =VAL(DR$) 

17 80 NEXT A 

17 90 CLOSE 

1800 RETURN 

180 5 REM SAVE DATA 

1810 CLS 

1820 GOSUB 580 

1830 IF TS<1 THEN PRINT "NO STUDENTS": GOTO 4 90 

1840 INPUT" 

WHICH DRIVE (0 OR 1)";DF 
1850 INPUT" 

FILE NAME";DF$ 
1860 IF DF$="" THEN 1850 
1870 IF DF$="END" THEN RETURN 

1880 DF$=LEFT$(DF$, 8) +"/DAT" +":" +RIGHT$ (STR$ (DF) , 1) 
1890 OPEN"0",l, DF$ 
1900 DR$=CL$ 

Program continues 
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DISPLAYED VIDEO IS DRIVING 
DOWN PRICES ON DISKS 

DISPLAYED VIDEO is now offering TRS-80* MODEL III with disk drives, one of the 

most reliable disk drive systems on the market, for incredibly low prices!! 

MODEL III with 48K ram, dual 80 track double-density disk drives, complete systems 
with Newdos 80 and one box of diskettes 
PLUG IT IN AND GO m . . „ $2,250 

MODEL III with 48K ram, dual 40 track double-density disk drives, complete systems 
with TRSDOS and one box of diskettes 

Hug it in and go $i,850 

Disk Drives: facludes^ase and power supply * £<i 

40 track disk drive jT~V •'» $269 

80 track disk drive • • ■ • • • • W- -1 $385 

80/80 track disk drive. $510 

Disk Drives: Not including case and power supply 

40 track (bare) disk drive $230 

80 track (bare) disk drive $335 

80/80 track (bare) disk drive $440 

Drive Cases and Power Supplies: 

5'/2 inch single drive unit and power supply $ 70 

5Vz inch dual drive unit and power supply §^®® 

8 inch single drive unit and power supply $139 

16K RAM Memory Chip (200 NS) $1.95 each 

TRS-80* MODEL III 16K $849 

MODEL III Internal Drive Kit: Includes controller board, dual drive mounting bracket, 
dual power supply, all hardware, cables and connectors $399 

, We carry a full line of Epson printers 



IMMEDIATE DELIVERY 

90 Days Parts and Labor Warranty 

ar Limited Warranty on Disk Drives 

Dealer inquiries invited 

Free Shipping in U.S. 

48 Contiguous States 
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Displayed Video 

7538 Jackson Road 

Ann Arbor, Michigan 48103 

(31 3) 426-5086 MasterCard & VISA add 3% 

Michigan Residents add 4% Sales Tax 

To Order: Call (313) 426-5086 or (313) 482-4424 or write DISPLAYED VIDEO, 
7538 Jackson Road, Ann Arbor, Michigan 48103 

VrRS-80 is a trademark of the Tandy Corporation Prices subject to change without nol 

sSee List ol Advertisers on page 402 




INTRODUCING THE MEMORY BOX 
MEMORY THAT NEVER NEEDS PROTECTION 

Plugs directly into the CPU or expansion interface. 

Includes its own regulated power supply and ribbon cable. 

1024 bytes of ram in an unused area on the memory map 

(3000-33FF HEX). 

Solves memory allocation problems when using monitor 

programs and utility support routines. 

Programs stay in the memory box even when the CPU is 

turned off. 

For Model I Level II and all DOS systems (4, 16. 32. 48K) 
Price $49.95 

Two utility software programs written for the Memory Box 
are: 

1. Micmon-A powerful machine language monitor (avail- 
able at a keystroke without disturbing main programs). 
Price $19.95 

2. U3000-A utility including cassette level meter program, 
adjustable keyboard debounce, screen print driver, page 
numbering, smart line termination, and more (all available 
at a keystroke). 

Price $12.95 

Special offer complete package $69.95 



<>■ 



< 




THE 2K HIDEAWAY EPROM BOARD 

Accepts 2716 compatible memory chips (not included). 

Includes its own power supply and connector. 

Install a pre-programed eprom or use a ram chip in 

combination with the powerful monitor and utility programs 

sold above "Micmon" or "U3000" (not Included) for Model 

I, Level II and all DOS systems (for 16, 32, 48K) 

2K Hideaay $49.95 

THE EASYGRAMER EPROM PROGRAMER 

Attaches to cassette interface on Model I or III. 

Programs 5 volt IK, 2K. and 4K eproms. 

Includes driver program, instructions, cable, and power 

supply. 

Programmer $69.95 

U.V. Eprom Eraser Lamp $49.95 

2716 Eprom Chip $ 8.95 

2K Ram Chip $29.95 

Z.I.F. (Zero Insertion Force Socket) $14.95 




DISPLAYED VIDEO'S CERTIFIED DATA CASSETTES 

Made of top grade tape formulated by Agfa-Gevaert of 
Germany. 

Cases are of superior grade five-screw construction. 
Guaranteed 100% error-free or your money back. 
Length C-10 C-20 

12 pack .68 .88 ea. 

24 pack .58 78 ea. 

Norelco style hard plastic cassette cases .21 ea. 
Special offer with every order of 24 cassettes: 
a Pilot Razor Point pen will be included. 
DISKETTES (BOX OF 10) 
Verbatim certified diskettes 
Guaranteed 100% error-free or your money back. 
5V» inch MD525-01 
lboxoflO $26.90 

10 boxes of 10 $25.90 
Add $2.00 for shipping & handling. To Order: Send check 
:f iUr money order or call (31 3) 426-5086 or (313) 482-4424^ 
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1910 PRINTtl, DRS 

1920 DR$=STR$(TS) 

1930 PRINTtl, DRS 

1940 DR$=STR$(TA) 

1950 PRINTtl, DR$ 

1960 FOR S=l TO TS 

1970 DR$=S$(S) 

1980 PRINTtl, CHR$(34); DR$; CHR$(34); 

1990 NEXT S 

2000 FOR A=l TO TA 

2010 DR$=A$(A) 

2020 PRINTtl, DR$ 

2030 NEXT A 

2040 FOR A=l TO TA 

2050 DR$=STR$(W(A)) 

2060 PRINTtl, DR$ 

2070 NEXT A 

2080 CLOSE 

2090 RETURN 

2095 REM NEW 

2100 RUN 

2105 REM FOR 32K POKE 16561,190 

FOR 15K POKE 16562,127 TO RESTORE MEMORY 
2110 POKE 16561, 255 
2120 POKE 16562, 255 
2130 END 
2135 REM GRADES 
2140 GOSUB 580 

2150 IF TS<1 THEN PRINT"NO STUDENTS": GOTO 490 
2160 PRINT 
2170 PRINT"VALID COMMANDS: 

ENTER END CHANGE" 

2180 PRINT 
2190 C$="" 

2200 INPUT"COMMAND OR HELP";C$ 
2210 IF C$="END" THEN 490 
2220 IF C$="ENTER" THEN 2280 
2230 IF C$="CHANGE" THEN 2640 
2240 CLS 
2250 PRINT" INVALID COMMAND" 

2260 PRINT" " 

2270 GOTO 4 90 

227 5 REM ENTER GRADES 

2280 IF TA=NA THEN CLS: PRINT"NO MORE ROOM": PRINT" "j GOTO 490 

2290 TA=TA+1 

2300 A=TA 

2310 INPUT"INPUT TOTAL POINTS POSSIBLE" ;Tl 

2320 PRINT"GRADE INPUTS FOR ASSIGNEMNT" ; " t " TA 

2330 PRINT" 4-LETTER NAME OF ASSIGNEMNT"": "; 

2340 GOSUB 4200 

2350 G$=LEFT$(IN$, 4) 

2360 IF G$="" THEN 2340 

2370 A$(A)=G$ 

23 80 PRINT"WEIGHT OF " A$": 

2390 GOSUB 4200 

2400 IN$=LEFT$(IN$, 4) 

2410 W(A)=VAL(IN$) 

2420 PRINT"ASSIGNMENT t :" TA" " A$(A);" WEIGHT: " W(A) 

2430 PRINT"(TYPE * FOR INCOMPLETES) ": PRINT" t NAME GRADE" 

2440 FOR S=l TO TS 

2450 PRINT S; LEFT$ (S$ (S) +" . ",20); 

2455 X=USR(2345) 

2460 GOSUB 4200 

2470 IF IN$="" THEN 2450 

2480 IF IN$="*" THEN 2530 

2490 IF VAL(IN$)>T1 THEN PRINT"> ";T1;"??": GOTO 2450 

2500 IF VAL(IN$)<0 THEN PRINT"<0 ??": GOTO 2460 

2510 IF IN$="END" THEN CLS: TA=TA-1 : PRINT"GRADES ENDED": GOTO 490 

2520 IF TO100 GOSUB 2590 

2530 IN$=LEFT$(SP$, 5-LEN ( IN$) ) +IN$ 

2540 S$(S)=LEFT$(S$(S) , 20+( ( A-l) *5 ) ) +IN$ 

2550 NEXT 

2560 1=1 

2570 GOSUB 580 

2580 GOTO 490 

2585 REM FIND % 

2590 G1=VAL(IN$) 

2600 Gi=( (Gl/Tl) *100) 

2610 G=Gi 

2620 IN$=STR$(G) 

26 30 RETURN 

26 35 REM CHANGE A GRADE 

26 40 PRINT"CHANGE GRADE FOR WHICH ASSIGNMENT t?" 

2650 GOSUB 4200 

2660 IF IN$="END" THEN CLS: PRINT"GRADE CHANGE ENDED": GOTO 490 

2670 INPUT"HOW MANY POINTS MAXIMUM?" ;Tl 

26 80 A=VAL(IN$) 

Program continues 
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Rose 



You've cot 

TOTAL ACCESS 

( specializing In TRS80 *) 

TO YOUR COMPUTER HARD WARE & SOFTWARE 
NEEDS. CALL ROSE TODAY! 



iv'e got 

• DISK DRIVES 

TA400 (40-T) S289 

TA800 (80-T) $419 

TA400 Flippy $319 

TA800 Flippy $439 

TA400-2 Dual Head $439 

TA800-2 Dual Head $549 

complete with silver enclosure & power supply- 
All TA Drives are MPl. 

• CABLES 

2-Drive $23.95 

4-Drive $33.95 

Extender Cable $14.95 

• BARE DRIVES 

TA400B $259 

TA800B $389 

TA400B Flippy $289 

TA800B Flippy $409 

• EPSON PRINTERS 

MX80 $469.00 

MX80F/T $579.00 

MX100 $799.00 

Parallel Cables $29.95 

MX 70-80 Ribbons $12.95 

• OPERATING SYSTEMS 

TRSDOS 2.3 Disk & Manual. . . . $19.95 

LDOS $119.95 

NEWDOS/80 $129.95 

DOSPLUS 3. 3, 3. 3D $89.95 

• IRON 

Disk Drive Power Supply, 

Single $37 

Disk Drive Case (silver)and Base $19 
M emorex Diskettes (bx of 10) . $25 

90 day warranty on DRIVES. Add S5.00 freight per 
drive in cont. U.S. UPS COD charge S1 .50. There is also 
a 15 day FREE trial on TA drives, if not completely 
satisfied I'll refund your money (less shipping). Ill 
take exception to improper use or mishandling. 

• RADIO SHACK COMPUTERS 

26-1061 Mill, LI. 4K $595 

26-1062 Mill, Ul, 16K $835 

26-1065 Mill, 48K, 1 Drive $1695 

26-1066 Mill, 48K-2 Dr-RS232. . $2099 
26-3001 4K Color Computer. . . $315 

26-3002 16K W/ext. Basic $485 

26-3003 32K W/ext. Basic $566 

26-3501 Pocket Computer. . . . $185 
26-4002 Mil, 64K, 1-dr $3288 

• PERIPHERALS - MOdel I, II, III 

26-1140 OK Exp. interface $249 

26-1140 With 16K Mem. Tstd/Cuar 

$299 

26-1140 with 32K Mem. Tstd/Cuar 

$349 

26-1145 Ml RS232 w/ cable $85 

26-1148 Mill RS232 W/cable $89 

26-1172 D.C. Modem I $135 

26-1173 D.C. Modem II $169 

26-1206 CTR-80 Recorder $51 

26-3008 CC Joysticks, pr $21 

26-3010 13" Color Video $353 

26-4150 Mil 8.4MB Disk $3820 

26-4151 Mil Hard Disk N0.2. . . $2970 
16K 200nsec Memory Guar lyr. $29 



The complete line of Radio Shack products is 
available through TA with standard RS limited 
warranty. Call me for price and delivery. Just 
cause you don't see it don't mean we ain't got it. 

R05E 



OTHER PRINTERS & ACCESSORIES 

26-1158 Daisy Wheel ll $1694 

26-1455 Acoustic cover $339 

26-1447 Tractor Assy $208 

26-1448 Sheet Feeder $1111 

26-1165 Line Printer v $1581 

26-1166 Line Printer VI $986 

26-1167 Line Printer VII $339 

26-1168 Line Printer VIII $679 

26-1191 Flat Bed Plotter $1695 

26-1195 Digitizer $379 

ANADEX DP-9500, 9501 $1295 

NEC 7730 Spinwriter, 55CpS. . $2484 
Daisy Wheel Printer, 45cps. . . $1779 

Tractor for above $237 

sheet Feeder for above $1250 

26-1308 Printer Stand $88 

26-4302 printer stand $129 

26-1401 or 4401 printer Cable. . $32 

r NEC COMPUTERS 

PC-8001A Keyboard & Processor. . . 

$1099 

PC80iiA Expansion Unit $699 

PC-8031A 2-drive Expansion 

Unit $1099 

PC-8041A Green Phos. Video. . $225 
PC-8043A HighRes Color Mon. . $925 



ROSES 
SPECIAL 
OF THE 
MONTH 

•AEROCOMPS* 

ALL NEW 

double density 
controller 

•ddc" $149.95 

Here's a Double Density controller for 
Mod. 1 tnat does away with all those data 
separation problems that seem to keep 
cropping up! Rose wouldn't fun ya now, 
would she? Don't be scared of Double 
Density any more. AEROCOMP has design- 
ed some advanced circuitry that even I 
don't understand - but I do know it 
works. Better order now. Ouanities are 
going to be a bit short. 

$189.95 complete 

with Dosplus 3.3D. 

how many do you 

want? 12? 



ZENITH MONITORS 

12" Screen * Green Phospher 
This is the one you have been waiting 
for. Well built, works great with the 
model I. Also has 40/80 column switch so 
the Apple folks can use it. 90 day warran- 
ty good Nationwide. Sell your old Model I 
monitor and be the first on your block to 
have a "real'green screen. 

12" zenith Green Phos. Mon $135 

Cable for Model I $7 



k RADIO SHACK SOFTWARE 

l have most all R/S software instock 
and it can be yours at 15% off tne 
R/S retail price. Call me for the 
latest availibility. 

DOUBLE DENSITY 
DATA SEPARATOR 
FROM AEROCOMP 
$49.95 

if you own a percom 'DOUbler a *. -doubler 
ll" or'LNDoubler ** upgrade it with the "DDS". 
Plugs right in. No more lock-out! you deserve 
one of these. 

ORDER NOW! 
TOLL FREE 
800-527-3582 

write or call ROSE toll free at 
1-800-527-3582. Texas residents call 
214-234-1770. Please use the toll 
free lines for orders and literature 
requests only. Technical help or ser- 
vice use the Texas line. Prices are 
mail order only, you pay by visa or 
mastercard, you can send check or 
money order (allow a couple of 
weeks for personal checks to clear) 
or order COD (we ship COD'S cash, 
certified check or money order on- 
ly). 25% deposit required on all COD 
orders. Rose will take American 
money in just about any form. Add 
freight (UPS where possible) on all 
orders.Texas residents cough up 5% 
sales tax. Allow 2-4 weeks for 
delivery. Order today - l need the 
money! . 

TOTAL ACCESS, 

P.O. BOX 3002 
RICHARDSON, TX 75080 



214-234-1770 



Trademark ot percom DAT£ 



•Trademark of LNW * TRS80 & Radio Shack are trademarks of Tandy Corp. Copyright 1981 total access 
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26 90 IF A<1 OR A>TA THEN PRINT "NO SUCH ASSIGNMENT!": GOTO 2640 
2700 PRINT" ENTER STUDENT NUMBER "; 

2710 GOSUB 4200 

2720 IF IN$="END" THEN 2660 

2730 S=VAL(IN$) 

2740 IF S<1 OR S>TS THEN CLS: PRINT"NO SUCH STUDENT": GOTO 2640 

2750 PRINT"STUDENT ";S;" ";LEFT$(S$(S) , 20); 

2760 PRINT MID$(S$(S), 16+(5*A), 5) 

2770 PRINT"CHANGE GRADE TO: " ; 

27 80 GOSUB 4200 

2790 IF IN$="" THEN 2770 

2800 IF IN$="*" THEN 2840 

2810 IF VAL(IN$)>T1 THEN PRINT" > Tl ??": GOTO 2750 

2820 IF VAL(IN$)<0 THEN PRINT"<0 ??": GOTO 2750 

2830 GOSUB 2590 

2835 REM FOR LEVEL II CHANGE 2840 TO: 

S$(S)=LEFT$(S$(S) , 15+(A*5))+LEFT$(SP$, 5-LEN(IN$))+ 
N$+MID$(S$(S) ,16+5+(A*5) , 5*(TA-A)) 

2840 MID$(S$(S), 16+(A*5) , 5) =LEFT$(SP$ f 5-LEN(IN$) ) +IN$ 
2850 1=1 
2860 GOSUB 580 
2870 GOTO 490 
2875 REM SORT ROUTINE 
2880 GOSUB 580 
2890 PRINT 

2900 INPUT"WHICH FIELD DO YOU WANT TO SORT ON, NAME, AVERAGE, OR POINTS 

; IN$ 

2910 IF IN$="AVERAGE" THEN 2960 

2920 IF IN$="POINTS" THEN 2960 

2930 D1=0 

2940 L1=LEN(S$(1) ) 

2950 GOTO 2980 

2960 D1=21+(5*A) 

2970 Ll=5 

2980 IF TS=0 THEN PRINT"NO RECORDS IN FILE": RETURN 

2990 X(0)=TS 

3000 X(1)=VARPTR(S$(1)) 'ADDRESS OF RECORDS 

3010 X(2)=D1 'DISPLACEMENT 

3020 X(3)=L1 'LENGTH 

3030 Z=USR 1(VARPTR(X(0) ) ) 

3040 FOR 1=1 TO TS 

3050 PRINT I;" ";S$(I) 

3060 NEXT 

3 070 RETURN 

3075 REM NAMES ROUTINE 

3080 GOSUB 580 

3090 PRINT 

3100 PRINT"VALID COMMANDS:" 

3110 PRINT" 

ADD CHANGE DELETE NEW" 

3120 PRINT 

3130 C$="" 

3140 INPUT"COMMAND OR HELP";C$ 

3150 IF C$="END" THEN CLS: 1=1: GOSUB 580: GOTO 490 

3160 IF C$="ADD" THEN 3790 

3170 IF C$="DELETE" THEN 4030 

3180 IF C$="CHANGE" THEN 3560 

3190 IF C$="NEW" THEN 3200 ELSE 3080 

3195 REM NEW CLASS 

3200 CLS 

3210 PRINT 

3220 PRINT 

3230 PRINT"NAME OF CLASS? "; 

3240 GOSUB 4200 

3250 CL$=IN$ 

3260 TS=0 

327 TA=0 

3280 PRINT"YOU MAY NOW TYPE IN NEW NAMES" 

3290 PRINT"TYPE IN 'END' AFTER LAST NAME IS ENTERED." 

3300 TS=TS+1 

3310 IF TS>NS THEN PRINT "CAN'T TAKE ANY MORE STUDENTS": GOTO 3410 

3320 PRINT TS": "; 

3330 GOSUB 4200 

3340 IF IN$="END" THEN 3410 

3350 IN$=LEFT$(IN$, 20) 

3360 L=LEN(IN$) 

3370 IF IN$="" THEN 3320 

3380 IN$=IN$+LEFT$(L$, 20-L) 

3390 S$(TS)=IN$ 

3400 GOTO 3300 

3410 TS=TS-1 

3420 GOSUB 2880 

3430 FOR 1=1 TO 600 

3440 NEXT I 

3450 RETURN 

3460 CLS 



Program continues 
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5MILE 

WHEN YOU 

5AY TAPE ! 

"KWICOS" " 359 

The reasonable alternative to Model I DISK. Software 
only, no mods or add-ons. This is NOT just a simple 
speed-up, but the easy-to-use and reliable KWIK 
Cassette Operating System to upgrade your CTR 

KWICOS acts like part ol Level II to give you: 

• Selectible SAVE 'LOAD speed. 2x through 6x 

• Visual loading guide lor easy volume setting. 

• Control of all features by simple BASIC commands. 

• Write, read, verify, and search capability for all 
BASIC and Machine-Code programs in KWIK format. 

• Up to 32 character program titles, with optional 
password protection and m-title comments 

• Display ol program filespecs. including length 

• No lock-ups or garbage from a busted load. 

• Automatic gaps between each program on the tape. 

• Catalog feature that reads the program names. 

• Test-read of KWIK programs without affecting RAM. 

• Chain (simple merge) of BASIC programs from tape. 

• Full compatability with the Lemon-Au: Loader 
Cassette for Model I. Level II lS\kl\ y 

ik -48k... frrjA f\(\ IxVVliV Software 
ppdu.s. «|>4L*KUU P.O. Box 328 

' Llmo d ns m Tth l "serv,ces *>«ivar. "0- 65613 



Simput 

UTILITY PROGRAM 1 1 FROM HIKARI GROUP 



SIMPUT is a flexible random access 
program for TRS 80 Model I* that lets 
you manage extremely complex data 
with great simplicity. It allows you to 
create records from one byte to more 
than 85,000 bytes long, with as many 
subrecords as you need, and it can be 
used with Microsoft's Basic Compiler. 



TRS-80* MAGIC 




late Ik Load OK (Jou* W 



Virtually Ends Tape Load Woes 
Reliably Loads "Impossible" Tapes 
Ends Tricky Volume Settings 
Invaluable for Regular CLOAD and 
SYSTEM Loads 

Great for High Speed KWICOS" Too 

Install in Seconds ... Simply Plug Between 
Cassette and Computer 

ORDER TODAY FROM: 
LEMONS TECH SERVICES 

DRAWER 429 DEPT. 80-M 

BUFFALO, MISSOURI 65622 

' TRS-80 Is TraderrwK Tgidy Co'p qco 



WILD 
CAT 



REMARKABLE TRS-80 

DISK DIRECTORY 
CATALOGUE SYSTEM 



Catalogue contains Fllespe 
disk ID. disk name.dis 

Model I using TRSDOS 2.3 or any Version NEWDC 
Uses fasl machine code for reading and sorting. 

S39.95 + $2.00 S/H Req. 48K. Two 5" Drives 
Satisfaction guaranteed or return within 1 days 

DONALD M FIELDING 
2207 N.W.61SI PLACE • MARGATE, FL 33063 

(305)972-6744 
Dealer Inquiries Invited 

TRS 80 and TRSDOS Trademark of Tandy Corp 
NEWDOS • Trademark Apparal Inc. 



■See List ol Advertisers on page 402 



SIMPUT has been tested to be 
compatible with TRSDOS* (can be 
compiled), DBLDOS* (also can be 
compiled), NEWDOS+, NEWDOS 80*, 
NEWDOS 80 V.2*, and NEWDOS 80, 
with Double-Zap/IT 

Available on Disk 

$29.95 

(206) 382-6632 




•TRS 80 MODEL I. TRSDOS TMS. TANDY CORP: DBLDOS TM. PERCOM 
DATA CO : NEWDOS*. NEWDOS 80. NEWDOS 80 V.2 TMS. APPARAT. 
INC.. DOUBLE-ZAP/II TM. SOFTWARE. ETC. 



Hikari Group 3032 Fourth Avenue West 
Seattle, Washington 98119 




Encloses LNW and MDX 

P.C. Boards, plus 
Cabling, A/C Cords, etc. 

Silver-Gray Fiberglass 

$32.50 plus $2.50 shipping 
N.Y.S. residents add 7% tax 

SYRACUSE R&D CENTER 

Box 125, Dewitt, N.Y. 13214 
Specializing in Electronic Packaging" 



PAC-A-MAN 

Now the excitement as the most popular arcade game can 
be yours to enjoy anytime on your home computer. 
You guide PAC-A-MAN through a maze, scoring points 
by munching up the squares in his path. Monsters chase 
after PAC-A-MAN Hying to eliminate him. Power cap 
sules enable him to overpower the monsters lor additional 
points $9.50. 

ALL GAMES - MODEL I LEVEL II & 
MODEL III LEVEL III 

OTHER IMS PROGRAMS 

BLACK KNIGHT $795 

ACTION PACKAGE 1 $8.95 

(Bomber & Torpedo) 
ACTION PACKAGE 2 $8-95 

(Star Fighter & Indy 500) 
ACTION PACKAGE 3 $8.95 

(Pinball & Bomb the City) 
ACTION PACKAGE 4 $8.95 

(Space Monsters & Polaris II) 

BERSERK $9.50 

MISSILE DEFENSE $9.50 

FROGGIE $950 

Z-80 DISASSEMBLER $9.50 

All games include graphics and sound. Cassettes Only. 
POSTAGE INCLUDED IN PRICE. PA residents arid 695 tax. 
FAST Delivery. Check or Money Order ONLY. 

JMS CORP 

BOX 18053 PITTSBURGH, PA 1523G 



W 



microcomputing 



Back Issues 

January 1980 $5.00 

February to June 1980 3.00 

Single back issue 
July 1980 on 3.50 

Single back issue 

Add $7.00 per magazine for shipping. 

10 or more back issues 

add $7.50 per order for shipping. 



STARK SOFTWARE 

introduces 
TIME-TABLE 

A NEW CONCEPT IN 
MICRO-COMPUTFR SOFTWARE 



TIME-TABLE is a tested, interactive time manage 
ment program developed tor the TRS-80 Models l/lll 
by a leading designer of decision aiding software. 

TIME-TABLE provides the busy manager, pro 
fessional, protect planner, personal user, among others, 
with a versatile tool for maintaining files of time-related 
activities. TIME-TABLE includes features tradition- 
ally associated with computer mainframes, such as; 

• Simplistic user customization - requires no 
programming 

• Conversant menu-driven displays & controls 

• Extensive data entry, edit & updating capabilities 

• Convenient data review, search & documenting 
controls 

• Automatic on-line time sorting 

• Extensive error trapping & user prompting 
lunctions 

• Efficient data storage & file management oper- 
ations 

TIME-TABLE versatility can be illustrated by the 
following list of "designed-for" applications: 

• Business & personal calendar maintenance 

• Project planning & control 

• Construction planning & control 

• Transportation scheduling 

• Production planning & control 

• Professional appointments management 
TIME-TABLE was exhaustively tested and certi- 
fied and includes a comprehensive user's manual. 
Requires (Min.): TRS-80 Model l/lll; Cassette rcdr: 
Tape Ver - 32K RAM, Level ll/Model III ROM. 

Disk Ver. - 48K RAM, 1 Drive. Disk BASIC. 

TIME-TABLE is available on a premium program 
cassette complete with users manual for an intro- 
ductory price of $29.95.* 

To place an order, mail to the below address or use 
the order phone. ^503 



a 



STARK SOFTWARE 

P.O. BOX 695 
RICHBORO. PA 18954 



ORDER PHONE: (215) 493-51 11 

Orders can be placed using bank check, money 

order, personal check (Allow 2 wks. to clear) or 

iC.O.D. Include $1 .50 Postage & Handling. , 

*PA Residents include 6% Sales Tax / 

•TRS-80 is a trademark of Tandy Corp. / 



80 Microcomputing, March 1982 • 201 



Program continued 



3470 PRINT"" CL$ n " 

3480 IF TS<0 THEN PRINT"NO STUDENTS": PRINT" "• GOTO 490 

3490 FOR S=l TO TS 

3500 PRINT S; LEFT$(S$(S) , 20) 

3510 NEXT 

3520 FOR 1=1 TO 600 

3530 1=1 

3540 GOSUB 580 

3550 GOTO 490 

3555 REM CHANGE NAMES 

3560 CLS 

3570 PRINT "CHANGE" 

3580 PRINT" " 

3590 PRINT" 

TYPE IN STUDENT NUMBER:" 

3600 GOSUB 4200 

3610 IF IN$="END" THEN CLS: PRINT"DONE": PRINT" ": GOTO 490 

3620 S=VAL(IN$) 

3630 IF S<1 OR S>TS THEN PRINT"NO SUCH STUDENT NUMBER": GOSUB 4220: GOTO 30 
80 

3640 IF S<=TS THEN PRINT"OLD NAME* n ;LEFT$ (SS (S) , 20) 

3650 PRINT"NEW NAME IS? "; 

3660 GOSUB 4200 

3670 IF IN$="" THEN 3650 

3680 IN$=LEFT$(IN$, 20) 

3690 L=LEN(IN$) 

3700 IN$=IN$+LEFT$(L$, 20-L) 

3710 S$(S)=IN$+MID$(S$(S) , 21, LEN(S$(S))) 

3720 GOSUB 2880 

3730 FOR 1=1 TO 600 

3740 NEXT I 

3750 CLS 

3760 PRINT "NAME CHANGED" 

3770 PRINT" " 

37 80 GOTO 490 

37 85 REM ADD NAMES 

3790 CLS 

3800 PRINT"ADD" 

3810 PRINT" " 

3820 TS=TS+1 

3830 IF TS>NS THEN PRINT" TOO MANY STUDENTS": TS=TS-1: GOTO 3080 

3840 PRINT" 

ENTER NEW STUDENT NAME" 

3850 GOSUB 4200 

3860 IF IN$="" THEN 3840 

3870 G$="" 

3880 FOR 1=1 TO TA 

3890 G$=G$+GR$ 

3 90 NEXT 

3910 S$(TS)=STRING$(20, 32)+G$ 

3920 IN$=LEFT$(IN$, 20) 

3930 L=LEN(IN$) 

3940 IN$=IN$+LEFT$(L$, 20-L) 

3950 S$(TS)=IN$+MID$(S$(TS) , 21, LEN(S$(TS))) 

3960 GOSUB 2880 

3970 FOR 1=1 TO 600 

3980 NEXT I 

3990 CLS 

4000 PRINT"NAME ADDED" 

4010 PRINT" " 

4020 GOTO 490 

4025 REM DELETE STUDENT 

4030 CLS 

4040 PRINT"DELETE" 

4050 PRINT" " 

4060 PRINT 

4070 PRINT"ENTER STUDENT NUMBER TO BE DELETED" 

4080 GOSUB 4200 

4090 S=VAL(IN$) 

4100 IF S<1 OR S>TS THEN CLS: PRINT"NO SUCH STUDENT NUMBER": GOSUB 4220: GO 

4110 PRINT"IS THIS THE NAME YOU WISH DELETED? (Y OR N) " ;LEFT$ ( SS (S) , 20)- 

4120 INPUT IN$ n " ; ' 

4130 IF IN$<>"Y" THEN 490 

4140 S$(S)=S$(TS) 

4150 TS=TS-1 

4160 CLS 

4170 PRINT"NAME DELETED" 

4180 PRINT" " 

4190 GOTO 490 

4195 REM FOR LEVEL II INPUT IN$ 

4200 LINE INPUT IN$ 

4210 RETURN 

4220 FOR 11=1 TO 600 

4230 NEXT II 

4 240 RETURN 
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GOSGB : 



GOSUB'S MX80/70 FRICTION FEED KIT ONLY $49.95 ppd 

• USE SINGLE SHEET PAPER 

• USE INEXPENSIVE ROLL PAPER 

• USE YOUR OWN LETTER HEAD 

• DOES NOT AFFECT PINFEED USE 

PRINTERS PRINTERS PRINTERS 

EPSONMX80 $515 ppd EPSON MX100 $825ppd 

Microtek's BYTEWRITER-1 $299 ppd 

THE PRINTER STAND $29.95 

SAVE MONEY AND SPACE 

Holds almost any printer that uses 9'/2" size paper or forms. 
Made from V*" acrylic, allows 3" of paper or forms to be 
stacked under printer. Great for use with bottom load printers! 
Fits: MX80/70-Microline 80's-BASE 2-850-Bytewriter-1 and many more! 

AUTHORIZED DEALERS FOR THE GOSUB FRICTION FEED KIT 
USA 
OMEGA MICROS 



ALPINE COMPUTER CENTER 

»26 S Alpine HO 
HocKlocO II 61108 
[81SI 229-0200 



3819 West Micniga 
Milwaukee Wiscoi 
i4U. 93*6088 



AUSTRALIA 
COMPUTER CAMPUS Pty. Ltd. 

1 1 Runole Street. Kent Town 

South Ausiiaiia. 506/ 

Ph 08 424826 Ieie> 88156 



EXATRON 

IB' Commercial St 

Sunnyvale. CA 94086 

18001 S3SW5S9/CA l408l 7V " 1 1 

CANADA 
MICROWEST Dist. Ltd. 

1940 Larson HO 
Nonh Vancouver B C 
Canada WM 228 
16041988-9998 or 98868" 



STRATEGY SIMULATIONS 

MERCENARY FORCE 

Command a mercenary army. 
Decide the number ot men, type 
ol weapons, armor, air support, 
medical aid and transports. Bat 
tie the enemy m lungles, under- 
water, on moons and In space 
(1-4 players) 
TRS-80 L2 16K $16.95 



SPACE MERCHANT 

Build an Empire in the stars. 
Choose your cargo, means of 
shipping, and security. Risk 
pirates, ion storms, engine failure 
and other hazards while you try 
to become a Space Merchant 
(1-6 playes) 

TRS-80 L2/16K $9.95 

We have just about everybodys software. 
Call us and tell us what you want. We've got it! 



KANSAS HES ADD 3% SALES TAX 
ALl PRICES SUBJECT TO CHANGE WITHOUT NOTICE 
FREE CATALOG UPON REQUEST 



YTSA 



SEND CHICK OR MONEY ORDER TO: 



GOSUB Int'l. Inc. """ l "" " GOSUB 

501 E.Pawnee, Suite 430 ^irk P.O. Box 275 

Wichita, KS 672 11 Wichita, KS 67201 

(316)265-9858 (316)265-9992 



STOCK MARKET 
SOFTWARE | 

By H & H Trading Company for Mod. I, II, & III TRS-80®s j 

| 

STOCK TRACKER™ times trades on individ- j 
ual stocks and options. Uses a technical volume | 
analysis. Completely objective. Gives buy, sell \ 
signals. 

MARKET TRACKER™ times tops & bottoms \ 
on the Dow Industrials; a composite of six tech- j 
nical indicators. Some judgement required. j 

Gives buy, sell signals. j 

These two programs are accurate. j 

Hundreds of satisfied users. I 



ASK FOR THE EVIDENCE! 



i 



FOR MORE INFORMATION OR TO ORDER. CONTACT: 

H a tjW WIPING CQM34NY 



POST OFFICE BOX 549 

CLAYTON, CALIFORNIA 94517 

Telephone 415/672-3233 

VISA & MASTERCARD 



is 166 



(TRS-80 IS A TRADtMARK OF TANDY CORP.) 



lj 



(siRegd.T.M. of Rodio Shock 



© 



TIME ... 

METHUSELAH has time for you 
and your TRS-80 



The name Methuselah has always been associated with long life. The Methuselah 
computer clock hoard with its 2-1 hour clock and its perpetual calendar is indeed worthy 
of the title. Methuselah puts state of the art technology into action with the on board four 
year lithium battery back-up to keep it running even when _,our computet- is off. That 
means no more fooling around with the software or hardware "clocks" that become Kip 
Van Winkles when the computer is reset or turned off. 

Methuselah has many other timely features. Software patches keep the DOS and BASIC 
time and clock commands ticking. Only two screws mount Methuselah inside the expan- 
sion interface without soldering, clipping, cutting, or jumpering. There is even a spare 
1/0 port and four different interrupts available for people who love to tinker. 

SPECS: MM 1)1)- YY, HH:MM:SS and day of the week. Four year lithium battery 

back-up. Crystal controlled timing (adjustable 32.768 oscillator). Twenty four 
hour clock and perpetual calendar. 



Send check or money order to 



nftan 

NDM DESIGNS 

6330 W. North Ave. 

Wauwatosa, Wl 53213 

(414) 259-0120 



M-Sl $97.00 

(add $4.50 P and H) 

S-Sl $17.50 

(add $2.50 I' and H) 
(If you wish to use Methuselah 
and the RS-232 board (26-1145) 
together, order this option which 
includes a new cover and con- 
nector.) 
Wl residents add 1% sales tax. 



METHUSELAH is a 
le mark ot NDM Designs 



The 
Intersoft 



C 



Compiler 



for the TRS-80 Model I and Model III 

* Fully compatible with all known TRS-80 Disk Operating 
Systems 

* Compiles C programs into a form which may be assem- 
bled into a cmd file on disk 

* No knowledge of assembler required 

* Compatible with disk EDTASM or Radio Shack Disk 
Editor-Assembler 

* Features Unix-style parsing of command lines, with full 
i/ o redirection for all C programs 



* detailed Users Manual 

* sample programs 



Package includes: 

* ready-to-run compiler 

* source code for all support 
libraries 

library contains over 30 functions, including: 

* memory allocator * string manipulation functions 

* numeric functions * DOS interface routines 

* and a complete i/ o package, including print(f) 

Also available for CP/M and 6809/Flex systems 
Available soon for OS-9 

Price: $75.00 for complete package; manual available separately for 
$15.00 (applicable towards purchase of complete package.) 
Ontario residents please add 7% Provincial Sales Tax. 

Please specify your operating system and assembler when ordering. Personal 
cheques take 15 banking days to clear. Send cheque or money order to: 

Intersoft Unlimited ,« 

Box 383 Station C, Kitchener- Waterloo Ontario, N2G 3 Y9, Canada 

Unix is a trademark of Bell Labs 
OS-9 Microware Systems Corp. Flex Technical Systems Consultants 

CP'M Digital Research Corp. TRS-80 and FDT ASM Tandy Corp. 



■See List ol Advertisers on page 402 
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AUTOMATIC 

DENSITY 

RECOGNITION 

for Newdos/80 Version 2.0 



I 



The evolving line of Apparat operating 
systems has constantly met with cus- 
tomer approval. However, with the ad- 
vent of double density, many N/80 V2.0 
owners were chagrined by the lack of 
Automatic Density Recognition -- the 



capability to recognize both single and 
double density diskettes. Both can be 
online at the same time, but we have to 
reconfigure the PDRIVE parameters as 
we change density. That is no longer a 
problem. Headaches gone! 

DDSD/CMD was designed by Allan J. 
Domuret, noted author for many pop- 
ular computer magazines. DDSDisno 
more complicated than just executing 
it from DOS READY. No disk ZAPS of 
any kind are required. DDSD can even 
be an "AUTO" file. This program func- 
tions with all TRS-80 DOS systems and 
will not adversely affect fast CPU clock 
systems. DDSD will load itself at top of 
available memory, respecting any and 
all programs present. DDSD is compa- 
tible with both Mods I and III. 



DDSD is available only on cassette, but 
will easily convert to a disk file by use 
of LMOFFSET, a utility available to any 
NEWDOS owner. 

The general availability of this utility is 
exciting news for all N/80 V2 persons!! 
Even more exciting is the price: $1 9.95, 
less than half the price of similar utili- 
ties. And that's not all... 

For a limited time, DDSD can be yours 
for just $10 -- if you subscribe to TAS at 
the same time. Twelve issues are $24, 
DDSD is $10. For maximum value, our 
special FLY offer is still available ($45 
for 24 issues, FLY is free). There is no 
better time to check out this journal, so 
do it now! TAS focuses exclusively on 
the Mods I and III. DDSD/CMD, alone, 
is $19.95 plus shipping. 



TASMON: 

History of a 

Powerful Monitor 



About a year ago, Bruce Hansen, engi- 
neering student at MSU, found himself 
more and more involved with machine 
language programming. This involve- 
ment precipitated the need for a good 
monitor/debugger package. So he got 
one. Not satisfied, he bought another. 
Still not happy, he purchased a third. 
After the SEVENTH package, he gave 
up looking. 

What Bruce wanted was ONE package 
that would fulfill all his needs. So what 



commands and features does the ideal 
monitor/debugger/disassembler pack 
have? He sat down, made a list, made a 
few inquiries, and set to work. 

A couple of months later, he had what 
he wanted and needed. He was proud, 
but needed assurance. So he put it into 
the hands of several key people — from 
experts at Z-80 programming to people 
who had never used a monitor before. 
In exchange he got feedback; he heard 
about errors, improvements were sug- 
gested, additional features were asked 
for, he found out which parts of the in- 
structions weren't clear enough. 

He appreciated all the comments, and 
stood up to all the criticisms. He acted 
on them all, until he was satisfied. 

Today, the final version of TASMON 
has more than proven itself. Hundreds 
of people use it and love it, for 3 main 



reasons: it's very easy to use and un- 
derstand, it's very powerful & versatile, 
and all the features are right there, in 
one neat, well-implemented package. 
TASMON has received thumbs-up ap- 
proval from such people as Bill Barden, 
Jr of Assembly Line fame, Roger Fuller 
of Soft Bits fame and Roxton Baker of 
TRAKCESS fame. 

So rather than buying a disassembler, 
a single-stepper, a monitor, and a file 
transfer utility, why not spend less and 
get it ail in one package? TASMON, its 
52 page User's Guide, a handy refer- 
ence card, and tape or disk media, is 
just $29.95 plus shipping. Works on I 
or III. We guarantee: you will NOT find 
more powerful features for less money! 
A strong statement, but hard to prove 
wrong. Watch for reviews coming up in 
several major magazines for more de- 
tailed information. 



NEWS FLASH: 



The SMARTEST of all 

Terminal Packages 

is also the 

LEAST EXPENSIVE 

III! 



Attention wise shoppers! Looking for 
the most features and capabilities per 
dollar? Then add Modem 80 to your list 
for comparison. Dollar for dollar, byte 
for byte, Modem 80 will work its way to 
the top of your list! 



The Modem 80 package contains sev- 
en programs to meet all of your needs. 
MODEM80/CMD is the main terminal 
and file transfer program. HOST1 per- 
mits remote control of the computer. A 
file transfer utility called XMODEM is 
included. SAVE permits off-line text 
preparation. TEXTFIX is a program to 
clean up text files so they'll load into a 
word processor; it removes extra line- 
feeds, control characters, etc. HEX is 
the program to convert binary files to 
ASCII hex characters, and the reverse. 

These seven programs (collectively, 
"Modem 80 Communications Pack", 
feature all of the capabilities of pro- 
grams currently costing up to $200. 
COMPARE: does the competitive pro- 
gram limit file-receiving and transmit- 
ting to the amount of available MEM? 
COMPARE: does the competitive pro- 
gram include a file to "clean up" messy 
transmissions? COMPARE: does the 



competitive program permit single line 
transmissions, for computers not able 
to accept full-speed data? COMPARE: 
are you able to execute, from within the 
program, DOS commands? Does the 
competitive program support ALL the 
popular DOSes (including CP/M)?? 
COMPARE!! 

The Modem 80 Communications Pack 
contains all these features, and plenty 
more. It's wise to shop around before 
making a decision, especially when it's 
possible to save over $100! To make it 
easy for you, purchase the Modem 80 
User's Guide for $5.00. Compare fea- 
tures and prices. When you've made a 
decision, the $5 will be applicable to- 
wards the purchase price. Modem 80 
sells for $39.95. The User's Guide is in 
a sturdy notebook for easy storage and 
reference. Modem 80 is compatible on 
either I or III, and with your favorite OS. 
Requires 32K Disk System. 
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Can't afford that trip around the world 
the year? Not going to get to visit the 
Mayan ruins in Mexico? NASA 
rejected your application to take 
the Lunar Cruise Tour? Well, relax. 
Now you can have these and dozens 
more adventures in the comfort of 
your own home, compliments of your 
friendly TRS-80 and TAS. 



The Adventure System is a new concept in adventuring. We supply the 
tools, you supply the imagination. Don't confuse The Adventure Sys- 
tem with lesser quality products: The Adventure System allows you to 
create a data base containing your adventure instructions. This data 
base is then used by the machine language adventure driver to propel 
you into the worlds of your imagination! 

Business folk have their "last one". Now games people can have theirs, 
too! The Adventure System may very well be the last adventure you ever 
buy! Justthink! You can now write your own adventures that take place 
in your own home! Or adventures that feature your friends as charac- 
ters! Write short, simple adventures that your young ones can enjoy, 
or long, tough ones that you can market! The possibilities are endless!! 




What's included in The Adventure System package? A BUNCH: 

■ ADVEDIT, the main adventure editor. This is the program that allows 
you to design and modify yours (or others) data bases. 



ADV/CMD. This is the machine language driver program that reads 
and executes your adventure data base(s). 

Three adventures. Two of them, Miner's Adventure and Burgier's 
Adventure, are complete adventures which will provide hours of fun 
and entertainment. The third, Mugger's Adventure, is a "baby" ad- 
venture which is described step by step in the manual. Can you get 
to your car without getting mugged? 

A complete user's manual, over 50 pages of detailed, easy to follow 
instructions, in a handsome, sturdy notebook. 

An invitation to join the Adventure User's Group. With a System as 
complete as TAS, there is much to explore and learn. We can either 
all reinvent the wheel, or we can share our knowledge. Better adven- 
tures for everybody! 

I ll r^== == 



ISSUES 1 - 6 OF TAS . . . 



in convenient book form! 



Year One of The Alternate Source magazine consists of six issues, over 300 pages, of 
useful, valuable informalion pertaining to your Model I TRS-80. Each issue appears 
just as it did upon release -• no additional editing was performed. Includes articles 
such as PF.NRAM, a scrolling RAM editor; Undocumented Z-80 Opcodes; Making 
Your Machine Language Programs Relocatable; RAMSTl'FF, a summary of the 
RAM memory locations used by Level II BASIC, Disk BASIC& DOS; and others. A 
WEALTH of programming knowledge •• and it's just $14.95!! 



»f> 



< --SSS. 



A 




*% 




OVER 300 
PAGES ! 



□ I'll subscribe to TAS! 12 issues, $24. 

□ I'll subscribe to TAS! 24 issues, $45. Send FLY! 
D I subscribed, send DDSD/CMD for $10. 

□ Send me DDSD/CMD for $19.95. 

D Please send me a TASMON disk for $29.95. 

□ Please send me a TASMON tape for $29.95. 
D Please send me a MODEM 80 disk for $39.95. 

D Please send me The Adventure System on disk for $39.95. 
D Please send me the TAS Bound Volume for $14.95. 



Name: 

Address: . 

City: 

State, Zip: 



Add $3.00 shipping charges. 
Add $1.75 for COD charges. 
NO EXTRA CHARGES for Visa/Master Charge orders! 



Dealer inquiries cordially invited! 

M.TERNKTE 

S#URCE 



New Address! 

The Alternate Source 

704 N. Pennsylvania Ave. 

Lansing, Michigan 48906 

Ph. 517-487-3358 

or 517-485-0344 

Source: TCH565 

Micronet: 70150,255 



^69 



-See List of Advertisers on page 402 



80 Microcomputing, March 1982 • 205 



HARDWARE 



The Key Box 

Basic Level II 

Model I 

48K RAM (or 32K min. for disks) 

TRSDOS, NEWDOS80 

Dual-headed Disk Drive 



Add dual-headed drives to your Model I. 



Hydra-Disk 



Matt Robins 
4101 Arch Dr. #6 
Studio City, CA 91604 



Technology moves fast today. 
Three years after the 35 
track Shugart format we have 
dual-headed 5Va" drives capa- 
ble of up to 80 tracks per side. 
Prices are competitive too. For a 
little more than the price of a 
small drive, you can have near- 
ly five times the capacity. To 
double this again, all you need 
is to add a double density hard- 
ware modification. 

The approach should work 
with the TRS-80 Model III and ex- 
ternal Model I disk drive cable, 
but my experience is limited on- 
ly to the Model I. This article de- 
sribes two methods of interfac- 
ing. The first interface is useful 
with one dual headed drive add- 
ed to the initial 35 track system 
drive. For two or three dual 
headed drives the second meth- 
od works in conjunction with the 
latest NEWDOS80. 

The common 35 and 40 track 
drives are designated as 48 tpi 
(tracks per inch). Evidently, the 
head traverses less than one 
inch of disk surface. In high 
capacity drives there are two 
conventions: The 100 tpi format 
pioneered by Micropolis on their 
77 track drives and 96 tpi format, 
standard on everyone else's 80 
track drives. The 96 tpi format is 
twice the track density of 48 tpi. 
It is impossible to read a 100 
tpi disk in a 96 tpi drive, and 
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vice versa, although some man- 
ufacturers supply a drive in ei- 
ther format. 

The innermost tracks of all 
drives are most prone to errors. 
To minimize problems, use good 
disks. Test questionable disks 
with programs such as The 
Floppy Doctor, Ver. 3.0. Cheaper 
single sided disks usually for- 
mat fine on both sides, but are 
not burnished on the side with 
the more critical pivoting head. 
To minimize wear, the two heads 
are offset from one another by 
eight tracks. Double sided disks 
certified for large capacity 
drives are best: Verbatim MD 
557-01 (double sided, 77 track 
certified, soft sectored) or 
Dysan No. 800438 (double sided, 
96/100 tpi certified, and soft sec- 
tored). Verbatim has a hub rein- 
forcing ring for better disk align- 
ment. Large capacity drive track 
widths are only 6 mils, but man- 
ufacturers rate them equal in 



reliability to 8 inch floppy disks. 

Disk Drive Cable 

Figure 1 shows the pin desig- 
nation and function of the Radio 
Shack disk drive cable for Model 
I. The socket at each drive posi- 
tion has certain pins missing? 
Radio Shack apparently re- 
moved them to make it unneces- 
sary for the disk drive owner to 
open up the unit and cut ap- 
propriate DIP shunts. 

Disk manufacturers use pin 
32 as Head Select (side select) 
for dual headed drives. A high 
logic level selects the usual side 
(side 0), a low level on pin 32 
selects the other side (side 1). 
Before dual headed drives the 
old Shugart standard permitted 
selecting one out of a maximum 
of three drives. To select a 
fourth drive, Radio Shack decid- 
ed to use pin 32. Unfortunately, 
most of industry uses pin 6 for 
this purpose. But the Radio 



Shack assignment makes it 
easy to use Drive Position 2 for 
Side of double headed disk 
and a single wire from pin 32 of 
Drive Position 3 to select Side 1 
of the same drive. 

Adding an extra insulation 
displacement socket between 
Drive Positions 2 and 3 with all 
pins present makes the interfac- 
ing job easier because you will 
not need the extra wire going to 
pin 32 of Drive Position 3. Either 
way, your dual headed drive will 
look to the expansion interface 
as two separate drives, Drive 2 
and Drive 3. 

Diode Interfacing 

The hardware needed is a ger- 
manium diode, an 8, 14 or 16 pin 
DIP header, wire and (for the Ra- 
dio Shack cable) a ribbon cable 
plug to mate with the cable 
socket in Drive Position 3. PC 
fingers from an old printed cir- 
cuit board can be used instead 
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Fig. 1. Radio Shack four drive cable. Numbers on connectors indicate missing pins. 
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PROVEN MONEY MAKERS FOR YOUR TRS-80* 

Tandy Corp. Trademark 



__._., . ______ ( Use alone or with the "\ 

FORM LETTERl mail list system below J $39.95 

( re, itc letters and store on disk just type in your letter con- 
t intjoLJsK as vou would with a typewriter and make corrections 
with almost unlimited use ot the backspace key What you see 
on the s< reen is exactly what vou get in the printout Then print 
the letter-, using vour mailing list You will be able to select 
continuous printing or cut sheet, paging, tabing, test printing, 
i.id <H.ti,m r i| printing on envelopes 



MAIL LIST SYSTEM ( M «L°w" ) W9.95 

Our easy-to-use system will accomodate almost any "custom" 
requirement of even your most demanding c lients A glance 
below will show that we are far ahead of any other system in 
speed, variety of features, and sheer volume of names 
handled but don't let that fool vou. this system can be used 
lust as easily on one disk tor a small Christmas card list 

• Maintain virtually an infinite number ot disks all in con 
tinuous alph 01 zip order essential for large lists 

• Sort 2260 entries (2 full 40 track double density disks) in 
only Y2K or an incredible 4640 entries (2 full 80 track 
double density disks) in only 48K'. Made possible with 
our unique date compression techniques on the Model III 

• Super fast sort by- alph or /ip order (H sec for 1000 
entries) both orders can exist simultaneously on disk 

• High -peed recovery of entries from disk speed of sort is 
meaningless if retreival from disk is slovy ours pulls in 
over 11 per sec! ^^ 

• Transfers old riles over to our systi n -"^^BBM^BI LOOK' 

• In zip order all entries with same zip code are also 
arranged alphabetically 

• I our digit zips have a leading "0" appended on labels 

• Bai kup data disks are easily updated as entries are 
created edited, or sorted extremely useful!! 

• Optional reversal ot name about comma for that non 
computer, personalized look 

• Permits telephone and or account numbers 

• M.ister printouts ot your list in sey-eral formats (not just a 
rehash ot the labels) Optionally continuous or page 
oriented. Your customers will want this! 

• Prints labels 1 . 2, or 3 across 

• All 0's in address labels are replaced by easier to read 0's. 

• All labels optionally support an "Attn " line 

• Many user defined fields with plenty of options tor 
simultaneous purging and selecting., even allovvs tor 
inequalities powerful and easy to use!! 

• Continuous display of numbers of labels envelopes printed. 

• Each disk entry automatically "remembers" how many 
mailings have been made for that particular entry Can 
be tied in with purge select 

• Primarily- written in BASIC for easy modification. . 
embedded machine code for those speed sensitive areas. 

• Editing is simple and fast automatic search 

• Supports the 9 digit zip code 

• Deleted entries have "holes" on disk filled automatically 

and alph order is still maintained' 

• Test label printing lets vou make horizontal and vertical 
adjustments with ease 

• Optional "one time" mailing for some selected entries. 

• I \tensive use of error traps (both operator and machine 
induced) even recovers from a power failure during a 
printout! recycling on disk errors. 

• Patch program allows vou to upgrade the system to 
any DOS 

• Documentation manual available alone for $4.95. 
Hardware requirements: 32K, printer, and 1 or 2 drives. 



Provide vour customers with a C A LE N DAR $9.95 

printed c alendar (along with standard banker s holidays) ol any 
month ot any year .Useful in motivating history students Holds 
the same fascination for students as a game I ape only tor 
Model I or III 



Same features as ( alendar S(J p ER C ALE N DAR 

Additionally prints our large 

graphics type wall calendars (tape only) $1 9.95 
with memos uder each day. Use as a planning calendar with 
optional disk storage require-- !f>K and pr'nter 



Football Scouting Report O $89.95 

Charge local high schools and colleges up to STO(K) per season 
tor these sophisticated reports Documentation manual 
ay a liable alone tnr-n 95 



TRY OUR ONE DAY PC BOARD SERVICE 

Fast service and high quality at a reasonable price 



TlC-TaC-Toe For the kids (Tape only) $9.95 



Loan amortization sche- . _ , . , ...-» — — .— .—.-^..i 

dules are a must for banks, LOAN AMORTIZATION 

S & L institutions, and $29.95 

accounting firms You will 

be able to charge $7 plus per schedule Multiply that times the 
number of al! loans vour clients make per day ..easiest money we 
know of! runs in about 2 minutes and achieves pin point 
accuracy with a built in calendar. This sophisticated program 
produces an exceptionally professional looking printout. 



Sign (Tape only) $9.95 

Produce large (reduced 50% here) attention getting signs with 
your printer, supports most keyboard characters, will print 
multiple lines, use alone or interlace to your own BASIC 
program requires just over TbK and a printer 



SSSSSSSSS TTTTTITU 000000000 1WHW 

ss SJ tttttttti oo ct pp n> 

ss in co to pp pp 

SSSSSSSSS . HI 00 00 PPIWW 

S5SSSS5SS TT! * CO PPPPPfW 



SSSSSSSS: 



00 00 FC 

cnxoooco pp 



xmioco actaac >•■ w 

LL 00 00 00 CO KK KK 

U CO CO 00 00 KK « 

U 00 00 00 CO KXKk 

LL 00 00 CO CO KXKK 

00 Oil CO 00 KK KK 

LL 00 00 00 00 KK W 

lULLLUi 0OO000OCO C0OCO00CO KK KX 



Intertac es to your own 
basic programs .sort with 
the speed ol machine code 
but with the convenience 
of basic lust use vour disk 



FAST SORT 

(handles multiple dim. arrays) 

alpha'betizer 

(disk only) $29.95 

to merge our short basic programs (with embedded machine 
code) with vour own basic program Follow our simple 
instructions to poke several values before making the user call 
from basic The pokes will set up a sort of string, integer, single, 
or double precision arrays (also ascending or descending order). 
Use one of two programs to sort arrays of the form A(1) or 
A(Q(1)). The disk includes 8 simple basic programs that arc- 
ready to merge with the main sort programs Use them for 
learning and evaluation Also included is a ready to use basic 
program (already merged with the ORDfcR program) Use it to 
obtain a printout of alphabetized names 1 his program alone is 
worth $19.95 

Sample Sort Times 
8 sec for 1000 dbl prec. numbers. .50 sec for 5000 integers 
(Ours is one of the only alphabetizes that both ignores non alph 
characters and treats upper and lower case alike ) 



Precision Prototypes 



410 E. Roca 

Refugio, Tx. 78377 

(512-526-4758) 



- Specify Model I or III when ordering 
• Add $2.00 for postage and handling 



Visa 

Mastercharge 

COD. 



-See List ol Advertisers on page 402 
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TO PLUG + 



Fig. 2. Interfacing of Tandon TM 100-4 drives. Dotted lines indicate 
the two jumpers to be wired. One of these, an eight inch lead to the 
plug, connects to pin 32 of #3 cable socket. Pin 6 is not used by 
Radio Shack. Instead, pin 32 is Drive Select 3. 



of the plug. A mating plug will 
have a different pin out than the 
drive, so trace the wiring care- 
fully making sure the single wire 
connects to pin 32 of the drive 
cable socket. Pin 31 accom- 
plishes this on the Kel-Am 
(Eldon, MO) PF-17-2801-0 Rib- 
bon Cable Plug. 

The noise immunity in diode 
interfacing is not great. You may 
find improper drive selection if 
the extender incorporates a PC 
board. Disk drive extenders con- 
sisting of ribbon cable are better 
shielded because every other 
wire of the cable is ground. If 
you make your own disk drive 
extender, beware of the reversed 
pin designation. To compensate, 
do not connect wire no. 1 of the 
ribbon cable to the plug. Leave it 
hanging loose and let wire no. 2 
be crimped to pin 1 of the plug. 
You will be shifting all wire 
designations by one, assuring a 
proper extender cable. 

For interfacing Tandon TM 
100-4 disk units, Fig. 2 shows 
the layout of the drive's PC 
board. Most of the wiring is done 
on the 16 pin header that fits in 
place of the DIP shunt. Remem- 
ber to insert the header into an IC 
socket before soldering or the 
heat will distort the header. A 
germanium diode, 1N270, pro- 
vides a true logic low level of 
about 0.25 V when the Head Se- 
lect (side select) signal is at low 
level at pin 32 of the PC connec- 
tor J1. This will select Side 1 of 
the drive. The shunt between 
pins 4 and 13 of the header as- 
sures the drive will also be se- 
lected as Drive 2 (side 0). 

The MPI Model 92 requires a 
14 pin header with different des- 
ignation (see Fig. 3). Additional- 
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ly, the shunt between pins 1 and 
14 must be present for Head 
Load with Select operation. 

The newly available Micropol- 
is 1015 Mod VI (96 tpi) and Mod 
IV (100 tpi) need an eight-pin 
header. Only the four Drive Se- 
lect lines are available at the 
header. Unlike other manufac- 
turers, Micropolis uses pin 34 of 
the PCB drive connector to se- 
lect Drive Position 3. Since 
Radio Shack does not use this 
pin, you will have to jumper it to 
pin 32. Follow the scheme 
shown for Tandon interfacing 
on Fig. 2. 

Shugart recently introduced 
the SA460, a 96 tpi dual head- 
ed drive. Their pin assignment 
is similar to Tandon's, except 
a 14 pin header is needed. A 
shunt between pins 1 and 14 is 
also required. 

Using Dual Headed Disk Drives 

The advantage of the inter- 
face is you can read large ca- 
pacity disks using TRSDOS or 
any other Model I DOS, provid- 
ing you keep the directory on a 
single track. Unmodified TRS- 
DOS has no trouble reading a 40, 
77 or 80 track disk but will not 
write past track 35. To format 77 
or 80 tracks per side and to write 
data to the disk, you have 
several options. Percom Data 
Company supplies Patchpak #4 
for patching TRSDOS for a 77 
track operation. You need two 
disk drives for this. If neither 
drive is a Micropolis 100 tpi (77 
track) drive, be sure to order the 
Patchpak in 35 track format, 
otherwise you will not be able to 
access the Patchpak disk. 

Once your TRSDOS is patched 
you will end up with a 35 track 
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Fig. 3. Interfacing of MPI Model 92 drives. 



TRSDOS for Drive Position 
that thinks all of the drives are 
77 track. It will give incorrect 
FREE for Drive Position and 
possibly Position 1 if you have a 
second 35 or 40 track drive in it. 
In all other respects it will be 
compatible. With Patchpak you 
can also obtain your patched 
TRSDOS in 77 track format. 

NEWDOS80 lets you custom 
configure your disk system for, 
say, 35 track format in Drive Po- 
sition 0, 40 track format for Drive 
Position 1 and 80 track format in 
Drive Positions 2 and 3. It cor- 
rectly computes FREE and is 
easy to use with multi drive sys- 
tems with a cue card such as 
that supplied for version 1.0 by 
MTC, Incorporated. 

Apparat's Approach 

Apparat recently introduced 
version 2.0 of NEWDOS80, with 
an option specifically for dual 
headed drives. If your NEWDOS- 
80 version 1.0 has all the zaps 
through number 53, you also 
have the option of having up to 
three double sided drives on 
line. Since I do not recommend 
eliminating a 35 track drive from 
your system this approach will 
allow you two additional dual 
headed drives. There is a pen- 
alty for this: You can only ac- 
cess those drives using NEW- 
DOS80. The disks will be un- 
readable by any other DOS, in- 
cluding TRSDOS. 

With the option activated, 
NEWDOS80 redefines a track to 
contain 20 rather than 10 sec- 
tors, with the first 10 sectors on 
Side and the remaining 10 sec- 
tors on Side 1 of the disk. NEW- 
DOS80 looks upon each dual 
headed 80 track drive as a single 
80 track drive with each track 
split between the two sides. Pin 



32 carries the multiplexing sig- 
nal, while pins 10, 12 and 14 of 
the drive cable provide the ac- 
tual Drive Select signal. Each 
dual-headed drive requires two 
simultaneous signals which ex- 
plains why you are limited to 
three drives. Drive 3 is undefined. 

Under NEWDOS80 the inter- 
facing scheme in Figs. 2 and 3 
will work only with one dual 
headed drive in drive position. If 
you need more than one dual 
headed drive, eliminate the 
diode and the wire between pin 
32 of the drive and pin 5 (Fig. 2). 
or pin 6 (Fig. 3) of the header. 
You must also jumper the ap- 
propriate shunts on the DIP 
header for drive selection. With 
a Radio Shack cable with pins 
missing you can jumper all three 
drive select shunts. You will 
have to daisychain pin 32 of 
each dual headed drive PC 
board to pin 32 of Drive Position 
3 socket. 

Although Apparat advises 
buying their disk drive cable 
with pin 32 present in each of 
the sockets, this is not neces- 
sary if you are willing to run the 
single wire instead. With the Ap- 
parat cable you have to cut the 
trace to pin 32 on the PC board 
of any single sided drive, such 
as a 35 track system drive. 

With the interfacing you will 
gain 314 grans (392.5K bytes) of 
user accessible storage in an 80 
track dual-headed drive, or 4.7 
times the capacity of a 35-track 
data disk. You will be up to date 
with today's technology— and 
ready for double density.B 

Matt Robins is a scientist- 
turned-computer specialist. He 
gained experience with floppy 
disks in the R&D department of 
Compucorp in Los Angeles. 



PROGRAMMING TOOLS FOR YOUR 
TRS-80® MODEL I AND MODEL III 



INSIDE LEVEL II 

The Programmers Guide to the TRS-80 ROMS 

INSIDE LEVEL II is a comprehensive relerence guide to the Level II ROMs which allows 
the machine language or Basic programmer to easily utilize the sophisticated routines 
they contain Concisely explains set-ups. calling sequences, and variable passage (or 
number conversion, arithmetic operations, and mathematical functions, as well as 
keyboard, tape, and video routines. Part II presents an entirely new composite program 
structure which loads under the SYSTEM command and executes in both Basic and 
machine code with the speed and efficiency of a compiler. In addition, the 18 chapters 
include a large body of other information useful to the programmer including tape 
formats. RAM useage, relocation of Basic programs. USR call expansion, creating 
SYSTEM tapes of your own programs, interfacing of Basic variables directly with ma- 
chine code, a method of greatly increasing the speed at which data elements are stored 
on tape, and special precautions for disk systems. INSIDE LEVEL II is a clearly organized 
reference manual. It is fully typeset and packed with nothing but useful information. It 
does not contain questions and answers. ROM dumps, or cartoons. 
Includes updates for Model III. INSIDE LEVEL II S15.95 

SINGLE STEP THROUGH RAM OR ROM 

STEP80 allows you to step through any Basic or machine language program one 
instruction at a time and see the address, hexadecimal value, Zilog mnemonic, register 
contents, and step count for each instruction . The top 14 lines of the video screen are left 
unaltered so that the target program may perform its display functions unobstructed. 
STEP80 will follow program flow right into the ROMs, and is an invaluable aid in learning 
how the ROM routines function Commands include step (trace), disassemble, run in 
step mode at variable step rate, display or alter memory or CPU registers, |ump to 
memory location, execute a CALL, set breakpoints in RAM or ROM, write SYSTEM 
tapes, and relocate to any page in RAM The display may also be routed to your line 
printer through the device control block so custom print drivers are automatically sup- 
ported. 
Specify Model I or Model III. STEP80 $16.95 

TELECOMMUNICATIONS PROGRAM 

This machine language program may be used as a smart terminal with time share 
systems or for high speed file transfers between two disk- based micros over modems or 
direct wire. It is menu driven and extremely simple to use. Functions include real-time 
terminal mode, save RAM buffer on disk, transmit disk file, receive binary files, examine 
and modify UART parameters, program 8 custom log-on messages, automatic 16-bit 
checksum verification of accurate transmission and reception, and many more user 
conveniences Supports line printers and lowercase characters. With this program you 
will no longer need to convert machine language programs to ASCI I for transmission, and 
you will know immediately if the transmission was accurate. This program comes on a 
formatted disk. 
Specify Model I or Model III. TELCOM $39.95 

PROGRAM INDEX VERSION 2.0 

Assemble an alphabetized index of your entire program library from disk directories 
Program names and free space are read automatically (need not be typed in) and may be 
alphabetized by disk or program. The list may also be searched for any disk, program, or 
extension, disks or programs added or deleted; and the whole list or any part sent to the 
printer. Printer output may be requested in three different formats including labels. The 
hst itself may also be stored on disk for future access and update. It also includes a 
PURGE mode for quickly killing unwanted files. Directory reads and alphabetizing is 
done in machine code for speed 1.000 programs may be sorted in less than 10 seconds 
Works with TRSDOS. NEWDOS. and NEWDOS 80 single or double density. One drive 
and 32K required 
Specify Model I or Model III. INDEX $24.95 

4 SPEED OPTIONS FOR YOUR TRS-80 

The SK-2 clock modification allows CPU speeds to be switched between normal, an 
increase of 50°o. or a 50% reduction, selectable at any time without interrupting execu- 
tion or crashing the program. Instructions are also given for a 100% increase to 3.54 MHz 
The SK-2 may be configured by the user to change speed with a toggle switch or on 
software command. It will automatically return to normal speed any time a disk is active, 
requires no change to the operating system, and has provisions for adding an LED to 
indicate when the computer is not at normal speed. It mounts inside the keyboard unit 
with only 4 necessary connections for the switch option (switch not included), and is 
easily removed if the computer ever needs service. The SK-2 comes fully assembled 
with socketed IC's and illustrated instructions. 
Model I only. SK-2 $24.95 



INSTANT ASSEMBLER 

The INSTANT ASSEMBLER is a new, powerful tape- based assembler and debugger for 
the TRS-80. Now you can assemble directly to memory and immediately debug your 
program with the built in single stepping debugger. Quickly switch from assembler to 
debugger and back again without losing the source code. This feature makes INSTANT 
ASSEMBLER an excellent learning tool for assembly language programming. 
INSTANT ASSEMBLER is absolutely unique among tape based assemblers in that it 
produces relocatable code modules that can be linked with the separate LINKING 
LOADER, which is supplied in two versions for loading programs into either high or low 
RAM. This lets you build long programs with small modules. INSTANT ASSEMBLER also 
features immediate detection of errors as the source code is entered, a compactly coded 
source format that uses 1 3 as much memory as standard source, and many operational 
features including single stroke entry of DEFB and DEFW, pinpoint control of listings, 
alphabetic listing of symbol table, separate commands for listing error lines or the symbol 
table, block move function, and verification of source tapes. 

INSTANT ASSEMBLER s debugger provides single stepping with full register displays, 
decimal or hex entry of addresses, forward or backward memory displays, disassembly 
of object code in memory, memory display in ASCII format, and hex-to-decimal or 
decimal-to-hex conversion. The single-stepper will step one instruction at a time or at a 
fast rate to any defined address. 

INSTANT ASSEMBLER occupies less than 8400 bytes of memory In a 16K machine this 
will leave you enough memory to write assembly language programs of around 2000 
bytes. This and its module-linking feature make INSTANT ASSEMBLER ideal for users 
with only 16K machines. The instruction manual may be purchased separately for $3. 
which will apply towards the purchase of the INSTANT ASSEMBLER. 
Specify Model I or Model III. INTASM $29.95 

RAM SPOOLER AND PRINT FORMATTER 

This program is a full feature print formatting package featuring user defmeable line and 
page length (with line feeds inserted belween words or after punctuation), screen dump, 
printer pause control, and baud rate selection. In addition, printing is done from a 4K 
expandable buffer area so that the LPRINT or LLIST command returns control to the user 
while printing is being done. Ideal for Selectnc or other slow printers. Allows printing and 
processing to run concurrently. Output may be directed to either the parallel port, serial 
port, or the video screen 
Specify Model I or Model III. SPOOLER $16.95 

MACHINE CODE FAST FOURIER TRANSFORM 

This complete package includes 3 versions of the machine language FFTASM routine 
assembled for 16, 32. and48K machines, a short sample Basic program to access them, 
a 10K Basic program which includes sophisticated interactive graphing and data manipu- 
lation, and a manual of instructions and examples The machine language subroutines 
use variables defined by a supporting Basic program to make data entry and retrieval 
extremely fast and easy for custom implementation. They perform 20 to 40 times faster 
than their Basic equivalent (256 points in 12.5 seconds), and require less than 1550 bytes 
of memory. The FFT is useful in analyzing stock market and comodity trends as well as for 
scientific information. 
Specify Model I or Model III. FFTASM $49.95 

DUPLICATE SYSTEM TAPES WITH CLONE 

Make duplicate copies of any tape wntlen for Level II. They may be SYSTEM tapes or 
data lists. The file name, load address, entry point, and every byte (in ASCII format) are 
displayed on the video screen. Model III version allows changing tape speed. 
Specify Model I or Model III. CLONE $16.95 

RAMTEST FOR LEVEL II 

This machine language program is a very thorough test for several types of RAM errors. 
A complete test of each individual bit in a 48K machine takes |ust 14 seconds. Includes a 
separate test for power line glitches. 
Model I only. RAMTEST. ...$9.95 

EDIT BASIC PROGRAMS WITH ELECTRIC PENCIL 

Load Basic programs or any other ASCII data file into the disk version of Electric Pencil 
for editting. One command from DOS quickly modifies existing files to Pencil format. One 
disk and 32K required. 
Model I only. PENPATCH $9.95 



MUMFORD 
MICRO 
SYSTEMS - 



ORDERING: Complete satisfaction is guaranteed or a full refund will be made. All programs 
(except TELCOM) are shipped on cassette unless $5 is included for a formatted (no system) 
disk Include $1.50 for postage and handling. California residents add 6% sales tax. Visa. 
Mastercharge and COD orders accepted. SPECIFY MODEL I OR MODEL III. Dealer 
inquiries invited. 

Box 400-E Summerland, California 93067 (805) 969-4557 



.'See Lisi ol Advertisers on page 402 
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BUSINESS 



A versatile business computer. 



CC— Color Computer or 
Chamber of Commerce? 



Richard S. Adcock 
141 NW Lorna 
Burleson, TX 76028 



A rumor is circulating that 
the Color Computer is not 
intended as a business machine 
and that Radio Shack envisions 
it will find only home applica- 
tions. Is the rumor correct? The 
keyboard, for instance, does ap- 
pear insubstantial — more like a 
calculator than a computer; and 
the low band width gives poor 
resolution to the typical color 
television. However, my clients 
continue to point out a rather 
ideal niche in the business 
world for the machine. Tandy 
may be overlooking some real 
business applications for the 
Color Computer. 

The primary appeal of the Col- 
or Computer is low cost. To 
utilize fully the machine's capa- 
bilities, most home users con- 
nect the device to their some- 
what expensive (though probab- 
ly still fuzzy) color televisions; 
but the Color Computer works 
quite well with $80 black and 
white sets. This gives you a 
rather impressive amount of 
computing power in a fairly 
small package for well under 
$500 (or if you use mail order 
franchise dealers, very nearly 
under $400). Because of this and 
the fact that this machine has a 
built in RS-232 port, the Color 
Computer is an attractive alter- 
native for a variety of applica- 
tions which require smaller 
amounts of internal memory. (If 
you want more memory, devices 
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such as Spectral Associates 
Ramcharger add substantial 
amounts of memory for very lit- 
tle extra cash.) With the RS-232 
port, the computer transfers 
data utilizing an industry stan- 
dard format. The following appli- 
cations all owe their existence 
to the Color Computer's low 
cost. This low cost system per- 
forms well when you use a little 
ingenuity to help it along. 

Employee Monitor 

An architectural firm needed 
a way for the switchboard oper- 
ator to monitor who was in the 
office and who was out. This 
was a serious problem because 
they used a multiplexed, single 
line phone system. The switch- 
board operator needed to keep 
the phone line free. In a firm of 
this one's size, fifty people or so 
are constantly in and out. Trying 
to locate one of these people 
could burden the phone line for 
several minutes. Their office lay- 
out placed the operator at the 
least used company exit. 

Two Color Computers solved 
the problem. The program cre- 
ated a tv typewriter which for- 
matted data and displayed it. 
When leaving, office personnel 
type in pertinent information, in- 
cluding their whereabouts and 
their expected return time. This 
exit procedure works at either 
end of the building. We put a sig- 
nal splitter on the output of the 
Color Computer at the far end of 
the building from the operator 
(the other machine was on her 
desk). One output from the split- 
ter feeds a monitor at the back 
computer allowing exiters to 



see what they are typing. The 
signal runs through 150 feet of 
coaxial cable and combines 
with the output from the second 
Color Computer in a 300 to 75 
ohm transformer and is input in- 
to the second tv. Since the video 
output from a Color Computer 
switches to either tv channel 
three or four the television tuner 
separates the information. The 
operator can check both screens 
by changing channels on the tv 
set. Without this built-in feature, 
screen selection would have 
been more involved. After many 
months of operation, this sys- 
tem works well. This system fills 
a real need in a unique way that 
one could not consider without 
an inexpensive computer. If you 
do not believe this, consider us- 
ing an IBM System 34 to perform 
the same task. 

Job Monitoring 

A local print shop, running 
roughly forty different jobs each 
day, needed to compile in-plant 
information about which jobs 
were running and how much 
time was spent on each until the 
data and a storage procedure 
could be transferred to a host 
computer for processing. The 
economically priced Color Com- 
puter was an ideal choice made 
even easier due to the built-in 
RS-232 port. Connecting a cas- 
sette with the computer allowed 
data to be stored, then fed to the 
host computer over an RS-232 
line. With a Model III as the host, 
data transfer between the two 
machines was easy. The printer 
port (serial port) from the Color 
Computer outputs data at 600 



baud, a figure easily matched in 
the Model III. Since we were us- 
ing a hard wired connection 
rather than modem/phone lines, 
there were no line limitations on 
the baud rate. 

The company starts the Color 
Computers in the morning, and 
runs them all day, accepting 
available job data from several 
locations, then writing this infor- 
mation out as a cassette data 
record. At the end of the day, all 
the cassettes are rewound and 
carried to the Color Computer 
which is wired into the Model III. 
A program reads the data files 
and prints them (using Color 
Basic's PRINT#-2 statement) to 
the serial port. The host Model 
III accepts and saves the data as 
a disk file thus transferring data 
on each cassette. Then the Mod- 
el III processes the information 
as required by the application. 

You can duplicate this ar- 
rangement in almost any situa- 
tion where on-site data can be 
collected for later processing. 
Hardwiring the Model III or prob- 
ably any other RS-232 port to the 
Color Computer is a matter of ty- 
ing pin 1 of the printer port high, 
using pin 3 as ground and pin 2 
as data out. You can change 
baud rates in the Color Comput- 
er by POKEing values into RAM 
as outlined in the operations 
manual. 

In the preceding examples, 
the program resident in the Col- 
or Computer (which could be 
stored in a ROM pack) could 
prompt the user. However, the 
host computer can also prompt 
the user. This approach to re- 
mote data gathering is ideal for 



the Color Computer especially 
since you. can use a Videotex 
Terminal (a Color Computer with 
the Videotex terminal program 
in ROM) instead of the whole 
computer. Since a Videotex ter- 
minal costs about the same (or 
from some sources somewhat 
less) than the Color Computer, 
and since Radio Shack includes 
the terminal software and a built- 
in direct connect modem, this 
approach seems ideal for any 
situation where phone lines 
must transfer data. 

Monitoring Sales Data 

The owners of a chain of six 
convenience stores were inter- 
ested in collecting sales data 
from each of the stores at cer- 
tain times of the day. In this ap- 
plication the host computer 
prompts the sales clerk through 
the Videotex Terminal. It is an 
excellent solution because all it 
requires is that the person re- 
sponsible for data entry turn on 
the machine and type. 

A corollary application would 
allow salespeople at the end of 



a day on the road to call their 
home offices and place orders 
or transfer sales data. They 
could plug their computer or ter- 
minal into the phone jack, and 
send or receive data as required. 
In this instance, they might not 
need to carry a television with 
them since they could attach 
the computer to the one in their 
motel room. 

The combination of small 
size, light weight and low cost 
makes the Color Computer an 
ideal on-the-spot data gather- 
ing/data communications de- 
vice. The machine is also reli- 
able. Add the new software for 
the machine, such as Scripsit 
and Spectaculator, a program 
similar to Visicalc, and this ma- 
chine may prove to be one of the 
most widely and uniquely ap- 
plied computers in the Radio 
Shack lineup. ■ 

Richard Adcock is president 
of Arkyler Computer Services 
Inc., a Fort Worth based com- 
pany specializing in custom ap- 
plications for microcomputers. 



Model 953A EPROM 
PROGRAMMER 




• Programs 2508, 2758, 2516, 2716, 2532 and 2732 five volt EPROMS. 

• Complete • no personality modules to buy. 

• Intelligent - microprocessor based, programs and verifies any or all bytes. 

• RS-232 serial interface • use with computer or terminal. 

• Verify erasure command verifies that EPROM is erased. 

• Extended diagnostics - error output distinguishes between a bad EPROM 
and one which needs erasing. 

• May be used for extremely reliable data or program storage. 

• All power on programming socket under processor control. LED warning 
light indicates when power is applied. 

• Complete with Tex tool zero insertion force socket. 

• High performance/cost ratio. 

• Standard DB-25 I/O connector. 

PRICE $289 



BAY TECHNICAL ASSOCIATES, inc. 




HWY. 603, P.O. BOX 387 

BAY ST. LOUIS. MISSISSIPPI 39520 

(601)467-8231 



T80-FS1 



Simulator 



Available for Model I or Model III. $25.00 
on cassette or $33.50 on disk (with 
enhancements) All versions require 16K. 




See your dealer! 



If you order direct, please specify whether you have Model I or 
Model III (the media are different) and whether you want disk or 
cassette. Include $1.50 and indicate UPS or first class mail. Illinois 
residents add 5% sales tax. Visa and Mastercard accepted. 

If you don't yet own a disk, don't fret. You can upgrade anytime. 
Cassette users may send back their cassette (but not the manual) 
along with $10 (first class shipping included) and receive the disk 
version. 



LOGIC 

Communications Corp. 
713 Edgebrook Drive 
Champaign, I L 61820 
(217) 359-8482 
Telex: 206995 



-See List ot Advertisers on page 402 
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UTILITY 



A monitor for your Color Computer. 



COLORMON 



Douglas R. Cook 

3895 West Wetland Drive 

West Jordan, UT 84084 



I wrote the program Colormon 
to answer the need for moni- 
tor systems and other programs 
for the TRS-80 Color Computer. 
It will aid programming and ex- 
ploration of the Basic color com- 
puters. A small portion of it can 



run on an Atari. Colormon runs 
with Extended Color Basic and 
16K of memory. Though it is too 
large for the 4K computer, sec- 
tions can be removed and run on 
systems without Extended Col- 
or Basic, 4K of memory, or both. 
You can PEEK and POKE all 
addresses with ease. I have run 
this monitor for several months 
with success. It is clean and 
there are no areas of memory 
locked out by this program or 



Basic. You may work any area of 
memory. 

Machine-code programs and 
data may be placed into memory 
and changed. You can save to 
tape either data or programs. 
Later, you can load your saved 
data or program with the 
monitor. Colormon puts infor- 
mation into correct format to 
save to tape. The load command 
expects data or programs to be 
in uniform format when loading. 



The PEEK and Print com- 
mands allow you to retrieve pro- 
grams, data or Basic by dense- 
ly filling the screen with 
characters. ■ 



The Key Box 

Color Computer 
Extended Color Basic 
16K RAM 



Color Monitor Instructions 






CLOAD 


Load this program from 


End address - &H8100 


expects data to be in the 




cassette. It occupies ap- 


Start address - 32768 


format used in the Save 




proximately 4K of memo- 


End address - 33024 


■ command. Enter key to re- 




ry and starts at Hex 1 E00 


Enter key returns you to 


turn to selections. 




with Extended Color 


selections. 


(PE) PEEK— displays decimal 




Basic. Extended Color 


(EN) ENTER— enters machine- 


address, hex address, 




Basic is required to run 


language programs or 


decimal data and hex 




parts of the program. 


data in hex or decimal. 


data, in that order. When 






For example: Start ad- 


cursor returns, Enter key 


SELECTIONS: 


Dump, Enter, Save, Load, 


dress - &H1E00 Enter 


returns you to selections. 




PEEK, Examine, Print 


data, either hex or deci- 


(EX) EXAMINE— displays dec- 




and Instructions. 


mal, then hit Enter key 


imal address, hex ad- 


(IN) 


INSTRUCTIONS — Input 


again to continue or R 


dress, decimal data and 




decimal or hex numbers 


(Enter key) to REDO. End 


hex data, in that order. 




(decimal numbers direct- 


(Enter key) returns you to 


You have the option to 




ly, hex numbers preceded 


selections. 


change data: Y (Enter 




by &H, i.e. &H8000). Shift 


(SA) SAVE— saves data or 


key) to change data; 




@ will stop execution of 


programs from memory 


Enter key to go to next 




program and any key will 


to cassette. Enter start 


address; End (Enter key) 




resume. Enter key re- 


address and end ad- 


returns you to selections. 




turns you to selections. 


dress. When cursor re- 


(PR) PRINT— displays hex ad- 


(DU) 


DUMP— a hex dump. It 


turns, save is completed. 


dress and print charac- 




displays the first address 


Enter key returns you to 


ters of data in memory 




in decimal and then eight 


selections. 


between selected ad- 




bytes of data. For ex- 


(LO) LOAD— loads data or pro- 


dresses. When cursor re- 




ample: 


grams from cassette to 


turns, Enter key returns 




Start address - &H8000 


the selected address. It 


you to selections. 
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IB ' TRS-80 COLOR COMPUTER 


480 INPux'LOAD ADDRESS"; AD 


20 ' MONITOR PROGRAM (C) BY 


490 OPEN"I",-l,"DATA" 


30 ' DOUGLAS R COOK WB7SOW 


500 FOR C=AD TO 32767 STEP 16 


40 ' 3895 WEST WESTLAND DR 


510 INPux#-l,A(l) ,A(2) ,A(3) ,A(4) ,A(5) ,A(6) ,A(7) ,A(8) ,A(9) ,A(10) , 


50 ' WEST JORDAN, UTAH 84084 


A(ll) ,A(12) ,A(13) ,A(14) ,A(15) ,A(16) 


60 ' 801-561-4005 


520 FOR J=0 TO 15:POKE C+J ,A( J+l) :PRINT C+J;HEX$(C+J) ,A(J+1) :NEX 


70 CLS:DIM A(16) 


T J 


80 INPut"SELECT- DUMP, ENTER, SAVE, LOAD, PEEK, EXAMINE, 


530 IF A(l)+A(2)+A(3)+A(4)+A(5)+A(6)+A(7)+A(8)+A(9)=18 THEN GOTO 


PRINT OR INSTRUCTIONS" ;C$ 


550 


90 IF LEFT$(CS,2)="DU" THEN 190 


540 NEXT C 


100 IF LEFTS(CS,2)="EN" THEN 310 


550 CLOSE-1 -.INPUTQ: GOTO 80 


110 IF LEFT$(C$,2)="SA" THEN 390 


560 REM PEEK SUBROUTINE 


120 IF LEFT$(C$,2)="LO" THEN 480 


570 INPUT"START ADDRESS"; AD 


130 IF LEFT$(C$,2)="PE" THEN 570 


580 INPur'END ADDRESS"; EN 


140 IF LEFTS(CS,2)="IN" THEN 620 


590 FOR D=AD TO EN 


150 IF LEFT$(CS,2)="PR" THEN 680 


600 S=PEEK(D) :PRINT D;HEXS (D) ,S; HEXS ( S) ; " " ;CHRS ( S) : NEXT D 


160 IF LEFT$(C$,2)="EX" THEN 790 


610 INPUT Q:GOTO 80 


170 GOTO 80 


620 CLS: PRINT" INPUT DECIMAL OR HEXADECIMAL NUMBERS THIS W 


180 ' DUMP SUBROUTINE 


AY-" 


190 INPUx"START ADDRESS", -AD 


630 PRINT" DECIMAL NUMBERS DIRECT" 


200 INPUT" END ADDRESS", -EN 


640 PRINT" HEX NUMBERS PRECEEDED BY- SH LIKE THIS &HA7A7 


210 FOR A=AD TO EN STEP 8 


SHIFT @ WILL STOP PROGRAM AND ANY KEY WILL CONTINUE 


220 PRINT A; 


PROGRAM" 


230 FOR D=0 TO 7 


650 PRINT:PRINT" THIS PROGRAM WILL NOT RUN THE PEEK, SAVE OR DU 


240 F=PEEK(A+D) 


MP FUNCTION WITHOUT EXTENDED COLOR BASIC!" 


250 PRINT HEXS(F) ;" 


660 PRINT: PRINT" ***ENTER KEY FOR SELECTIONS***" 


260 NEXT D 


670 INPurQ:GOTO 80 


270 PRINT 


6 80 INPUr'START ADDRESS"; AS 


280 NEXT A 


6 90 INPUT" END ADDRESS", -ES 


290 INPUTQ:CLS:GOTO 80 


700 FOR A=AS TO ES STEP 25 


300 REM ENTER SUBROUTINE 


710 PRINT HEXS(A) ;" "; 


310 PRINT" Y=YES, ENTER KEY FOR NO, END TO END" : INPUT"START A 


720 FOR D=0 TO 24 


DDRESS";AD 


730 S=PEEK(A+D) 


320 FOR A=AD TO 32768:' 32K 


740 PRINT CHRS(S) ; 


330 PRINT A;" ";: INPUT H 


7 50 NEXT D 


340 POKfc A,H 


760 PRINT 


350 PRINT A;H;:INPUT" ENTER KEY TO RESUME, Y TO REDU, END TO STO 


770 NEXT A 


P ";QS:IF Q$="Y" THEN GOTO 330 


780 INPUTQS:CLS: IF QS="END" THEN END ELSE GOTO 80 


360 IF QS="END" THEN CLS: GOTO 80 


790 INPUT "START ADDRESS" ;AF 


370 NEXT A 


800 INPUT" END ADDRESS", -EF 


380 REM SAVE SUBROUTINE 


810 EF=32768 


390 INPUT"START ADDRESS"; AD 


820 FOR A=AF TO EF 


400 INPUT"END ADDRESS"; EN 


830 C=PEEK(A) :PRINTA;HEXS(A) ,C;" ";HEXS(C);" " ;CHR$(C) : INPUT'CHA 


410 OPEN"0",-l,"DATA" 


NGE";QQS:IF LEFTS ( QQS , 1 ) ="Y" THEN 850 


420 FOR B=AD TO EN STEP 16: FOR J=0 TO 15 


840 IF LEFT$(QQ$,1)="E" THEN GOTO 870: 


430 A(J+1)=PEEK(B+J) :NEXT J 


845 IF LEFTS (QQS, 1)="" THEN GOTO 860 


440 PRINT#-1,A(1) ,A(2) ,A(3) ,A(4) ,A(5) ,A(6) ,A(7) ,A(8) ,A(9) ,A(10) , 


850 INPUr'CHANGE TO ";D:POKE A,D:PRINT A;HEXS(A) ,D; " ";HEXS(D);" 


A(11),A{12) ,A(13) ,A(14) ,A(15) ,A(16) :CLS:PRINT B;A(1):NEXT B 


";CHRS(D) :INPUTQS: IF QS="END" GOTO 870 




860 CLS:NEXT A 


460 CLOSE-1: INPUTQ:GOTO 80 


870 CLS: GOTO 80 


470 GOTO 80 


880 END 


Program 


Listing 



Z8 BASIC 
COMPUTER/CONTROLLER 




As featured in 
Byte Magazine, July and August 1981 

• On board tiny BASIC Interpreter. 

• 2 on board parallel ports. 

• Serial I/O port 

• 6 interrupts. 

• Just attach a CRT terminal and 
immediately write control programs 
in BASIC. 

•BAUD RATES 110-9600 BPS. 

• Data and address buses available for 
124K memory and I/O expansion. 

•4K RAM, 2716 or 2732 EPROM 
operation. 
•Consumes only 1 Vz WATTS 
Z8 Basic Microcomputer/Controller 

Assembled & Tested $195.00 

Complete Kit $165.00 

Universal Power Supply 

( + 5, + 12, &-12v) $ 35.00 

Z8 is a trademark of Zilog Inc. 



SWEET-TALKER, 

IT GIVES YOUR COMPUTER 

AN UNLIMITED VOCABULARY. 




As Featured In 
Byte Magazine, September 1981 

• Utilizes VORTRAX SC-01 A speech 
synthesizer chip. 

• Unlimited vocabulary. 

• Contains 64 different phonemes 
which are accessed by an 8-bit code. 

•Text is automatically translated into 
electrically synthesized speech. 

• Parallel port driven or 

Plug-in compatible with APPLE II. 
•On board audio amplifier. 
•Sample Program for APPLE II on 

cassette 
SWEET-TALKER 
Assembled and Tested 

Parallel Port Circuit Card $139 

APPLE II Plug-in Card $149 

VORTRAX is a trademark of Federal Screw Works 



To Order: Call Toll Free • 1-800-645-3479 
(In N.Y. State Call: 1-516-374-6793) 
For Information Call: 1-516-374-6793 



DISK-80 

EXPANSION INTERFACE 

FOR THE 

TRS-80 MODEL I 




4 s Featured In 
Byte Magazine, March 1981 

• Disk controller (4 drives) 

• Hardware data separator 

• Buffered TRS-bus connector 

• Real-time clock 

• Printer port (optional) 

DISK 80-ASSEMBLED & TESTED 

with 32K RAM $329.95 

Centronics Printer 

Port add $ 50.00 

DISK-80 pc board $ 48.00 

Printer/Power Supply 

pc board $ 16.00 

Complete Kit with 32K 

RAM and Printer Port $275.00 

TRS-80 is trademark of Tandy Corp. 



MICROMINTINC. 
917 Midway 
Woodmere, N.Y. 11598 
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UTILITY 



LOAD 80 



Screen dumps whenever you want them. 



Base 2 Screenprinter 



William S. Kent 

22315 6th Avenue, S. 

HB-304 

Des Moines, WA 98188 

I have wanted a Screenprinter 
for my Base 2 lineprinter for 
some time; Ruth Lewart's article 
"Paper Tiger Screenprinter" (80 
Microcomputing, February 1981) 
inspired the Program Listing. 

I used a slightly different al- 
gorithm to generate the alpha- 
numeric strings. Since the Base 
2 uses 7-bit characters in the 
graphics mode, things were a lit- 
tle easier than for the 6-bit Paper 



Tiger. I used a 3-line rather than 
a 4-line format. ■ 

Mr. Kent is an engineering 
manager with The Boeing Com- 
pany and works in Flight Sim- 
ulation. 



The Key Box 

Basic Level II 
Model I 
48K RAM 
NEWDOS 
2 Disk Drives 
Base2 Printer 



10000 
10001 
10010 

10020 

10030 

10040 

10050 

10060 

10070 

10080 

10090 

DER 

10100 

10110 

)AND4 

10120 

10130 

10140 

10150 

114162 

10170 

10180 

10190 

10200 

10210 

10220 

10230 

10240 



'SCREENPRINTER FOR BASE 2 MODEL 80 LINEPRINTER 

'WRITTEN BY W.S.KENT, DES MOINES, WA 

IFQ1=0GOSUB10190 

LPRINTQ6$;Q7S 

QV=15360 'START OF VIDEO MEMORY 

LPRINTQ1S;Q2S|Q4$;Q4S)Q2$ 'DRAW UPPER CORNERS AND BORDER 

FORQI=0TO15 

FORQJ=0TO63:QN(QJ)=PEEK(QV+QJ) : NEXT 'READ ONE LINE 

FORQK=0TO2 

IFINKEY$="B"THENLPRINTQ8$:RETURN 'LEAVE GRAPHICS 

LPRINTQ1$;Q2$;Q3$; 'ENTER GRAPHICS MODE AND DRAW LEFT BOR 

FORQJ=0TO63 

IFQN(QJ) >127THENLPRINTQG$(QM(QN(QJ) AND21) ,QK) ;QG$ (QM (QN(QJ 
2) ,QK) ;ELSELPRINTQZ$;QA$(QN(QJ)-32,QK) ; 
NEXTQJ 

LPRINTQ3$;Q2$ 'DRAW RIGHT BORDER 
NEXTQK : QV=QV+Q8 : NEXTQI 

LPRINTQ1$;Q2$;Q5$;Q5$;Q2$ 'DRAW LOWER CORNERS AND BORDER 
LPRINTQ8$:RETURN 'RESET LINEPRINTER AND RETURN TO PROGRAM 



' INITIALIZATION 

DEFINTQ:Q1=1:Q8=64:QZ$=CHR$(128) :Q1$=CHR$ (27) +CHR$(99) 
Q2$=STRINGS(3,255) iQ3$=STRING$( 21,128) 
Q4$=STRING$(213,135) :Q5$=STRING$(213 ,240) 
Q6$=CHR$(27)+CHR$(48) :Q7$=CHR$ (27) +CHRS ( 98) +CHRS (14) 
Q8$=CHRS(27) +CHR$(74) 



10>50 DIMOG$(7,3) ,QAS(90,3) ,QM(42) ,QN(90) 

10260 ' 

10270 FORQJ=0TO7:FORQK=0TO2 'CREATE GRAPHIC STRINGS 

10280 READQC:QG$(QJ,QK)=STRING$(3,QCOR128) 

10290 NEXTQK, QJ 

10300 ' 

10310 FORQJ=0TO90:FORQK=0TO4 'CREATE GRAPHICS STRINGS 

10320 READQC:QW=(12*(QCAND1)+24*(QCAND2)+16*(QCAND4) )OR128:QA$(Q 

J,0)=QA$(QJ,0)+CHR$(QW) 

10330 QW=(.25*(QCAND4)+.75*(QCAND8)+1.5*(QCAND16)+3*(QCAND3 2) ) OR 

128:QA$(QJ,1)=QA$(QJ,1)+CHR$(QW) 

10340 QW=((3*(QCAND64) )/64) OR128:QA?(QJ ,2) =QA$(QJ ,2) +CHR$ (QW) 

10350 NEXTQK, QJ 

10360 ' 

10370 QM(0)=0:QM(1)=1:QM(4)=2:QM(5)=3:QM(16)=4:QM(17)=5:QM(20)=6 

:QM(21)=7 

103 80 QM(2)=1:QM(8)=2:QM(10)=3:QM(32)=4:QM(34)=5:QM(40)=6:QM(42) 

=7 

10390 RETURN 

10400 ' 

10410 ' 

10420 DATA 0,0,0,127,0,0,0,127,0,127,127,0 

10430 DATA 0,0,127,127,0,127,0,127,127,127,127,127 

10440 DATA 0,0,0,0,0,0,0,95,0,0,0,7,0,7,0,20,127,20,127,20 

10450 DATA 36,42,127,42,18,35,19,8,100,98,54,73,86,32,80,0,0,7,0 

,0 

10460 DATA 28,34,65,0,0,0,0,65,34,28,34,20,127,20,34,8,8,62,8,8 

10470 DATA 0,64,48,0,0,8,8,8,8,8,0,0,64,0,0,32,16,8,4,2 

10480 DATA 62,81,73,69,62,0,66,127,64,0,98,81,73,73,70,33,65,73, 

77,51 

10490 DATA 24,20,18,127,16,39,69,69,69,57,60,74,73,73,49,1,113,9 

,5,3 

10500 DATA 54,73,73,73,54,70,73,73,41,30,0,0,20,0,0,0,64,52,0,0 

10510 DATA 8,20,34,65,0,20,20,20,20,20,0,65,34,20,8,2,1,89,5,2 

10520 DATA 62,65,93,89,78,124,18,17,18,124,127,73,73,73,54,62,65 

,65,65,34 

1053 DATA 127,65,65,65,62,127,73,73,73,65,127,9,9,9,1,62,65,65, 

81,113 

10540 DATA 127,8,8,8,127,0,65,127,65,0,32,64,64,64,63,127,8,20,3 

4,65 

10550 DATA 127,64,64,64,64,127,2,12,2,127,127,4,8,16,127,62,65,6 

5,65,62 

10560 DATA 127,9,9,9,6,62,65,81,33,94,127,9,25,41,70,38,73,73,73 

,50 

10570 DATA 1,1,127,1,1,63,64,64,64,63,31,32,64,32,31,127,32,24,3 

2,127 

10580 DATA 99,20,8,20,99,3,4,120,4,3,97,81,73,69,67,4,2,127,2,4 

10590 DATA 16,32,127,32,16,8,28,42,8,8,8,8,42,28,8,64,64,64,64,6 

4 

10600 DATA 62,65,93,89,78,32,84,84,84,120,127,40,68,68,56,56,68, 

68,68,40 

10610 DATA 56,68,6 8,40,127,56,84,84,84,24,0,8,126,9,2,76,82,82,8 

2,60 

10620 DATA 127,8,4,4,120,0,6 8,125,64,0,0,32,64,6 8,61,0,127,16,40 

,68 

10630 DATA 0,65,127,64,0,124,4,120,4,120,124,8,4,4,120,56,68,68, 

68,56 

10640 DATA 126,12,18,18,12,12,18,18,12,126,124,8,4,4,8,72,84,84, 

84,40 

10650 DATA 0,4,63,68,32,60,64,64,32,124,28,32,64,32,28,60,64,48, 

64,60 

10660 DATA 68,40,16,40,68,14,80,80,80,62,68,100,84,76,68 



Program Listing 
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SPEAK 
-EAZY 


HARDWARE 

The HUMAN QUALITY VOICE SYNTHESIZES for your 
MODEL I or III computer. The complete 297 word 
vocabulary Is contained In ROM. Ready to use 
HARDWARE and SOFTWARE for ONLY $229.95 


DD-SO 


A DOUBLE DENSITY adapter for the MODEL I that 
allows you to write and read twice as much data 
on a disk. Plugs into your EXPANSION INTERFACE 
and is compatible with all existing SINGLE or 
DOUBLE DENSITY software and hardware. $129.95 


TRANS 
-DATA 


Now an inexpensive means to TRANSMIT- RECEIVE 
data over the phone lines WITHOUT Expansion 
Interface, RS232, or software. DIRECT CONNECT 
to phone lines and your cassette port. $59.95 


EAZY 
LOADER 


EAZT LOADER is a signal conditioner for your 
MODEL I TAPE STSTEM that CORRECTS the volume 
sensitivity problems associated with tape 
loading on the MODEL I. 

CAN BE USED EXTERNAL or INTERNAL 
$24.95 $12.50 


PROGRESSIVE ELECTRONICS 

Hours 643 E Chestnut St. 
9-6 Lancaster, Ohio, 43130 
Hon - S*t Phone 6U-687-1019 ^143 




SOFTWARE 



1607 North Cochran 

Hutchinson, Ks. 67501 

(316) 663-1047 




ANNOUNCING 

* A Club for all TRS-80 Computer Owners. 

Wholesale prices on popular products, saving up 
to 50% of retail prices. 
Objective, Unbiased, Tough Reviews of Hardware 
Sofware, Systems, Supplies, Critical Analysis 
of products: revealing what they can and can not 
do. 
*Newsletters with your stories, Articles, Industry 
Reviews, Practical Uses for Business, Personal, 
Professional, Hobby and Entertainment. 

* Programing Support for Compilers, Basic, etc., 
Beginners and advanced. 

* Comparisons of Product Groups by cost, Cap- 
abilities, Etc. 

* A source for selling your own Programs and In- 
ventions. Up to 80% Royalty. Why let others 
have the lions share? 

* Membership- - * $25.00 per year. 

*WANT MORE INFORMATION? Please send $1.00 
to cover cost of Info.& Postage. 

,-171 




A NEWSLETTER FOR POCKET COMPUTER USERS 
This timely, compact publication provides up to the minute 
information on pocket computers, including models such as 
the Radio Shack TRS-80 PC, Sharp Electronic's PC-1211, the 
Casio FX-702P, Panasonic's RL-H1000, and others as they are 
announced. We only cover pocket computers that are capable 
of executing a high level language such as BASIC. 
D Up to the Minute News D Product & Equipment Reviews 

□ Important Operating Tips D Practical Programs □ More 
By Subscription Only: for a calendar year period (January - 
December). You get all issues published to date for the calen- 
dar year in which you subscribe, at the time you subscribe. 

MC/VISA Phone Subscriptions: (203) 888-1946 

□ 1981/82 Charter Subscriber (Issues 1 20). $40.00 in U.S. 
(U.S. $48.00 to Canada. U.S. $60.00 elsewhere.) 

D 1982 Regular Subscriber (Issues 11 - 20). $30.00 in U.S. 
(U.S. $36.00 to Canada. U.S. $45.00 elsewhere.) 

□ Sample issue. S3. 00 in U.S. (U.S. $4.00 elsewhere.) *Due to 
credit card minimum, this item cannot be charged. 

Orders must be accompanied by payment in full. We do not 
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all hardware Model I Lowercase 


TRS-80 is a TradOn 


ark o( Tandy Corp 


DUALCASE 


"THE PATCH" is compatible 


UPPER/lowercase. full time 


with any word processor, any DOS 


from power-up: NO software; 


and also other languages which use 


Standard typewriter keyboard 


ROM sub-routines. 


operation (shift to UPPER- 


"THE PATCH" unit plugs into 


CASE); Control characters can 


the ROM sockets (does not replace 


be displayed; 128 Total char- 


existing ROM). Lowercase does re- 


acter set plus full graphics. 


quire installation of the extra video 


ELECTRONIC SHIFT-LOCK 


ROM (supplied with "THE PATCH"). 


No extra keys or switches. Sim- 


Detailed instructions guide 


ply tap either shift key, UPPER- 


even the most inexperienced owner 


CASE lock, normal Shift un- 


to complete installation in about 30 


locks. 


minutes. 


DE-B-B-BOUNCE At no extra cost 




(At your option) 


Assembled and tested . .$127.00 


BLOCK CURSOR If you like (No chg) 


Texas residents add 5% sales tax. 


SWITCHABLE from key board 


WHEN ORDERING SPECIFY: 




"Mem Size" D "Memory Size" D 


jEX 


To order, send payment plus $2.00 


fiS¥k 


shipping and handling. 


/#ll\\\ 


HACKS 


/jP"»V\ 


P.O. BOX 12963 


/ ^ V V 


Houston. Texas 77017 


"THE PATCH" is covered with a 




one year limited warranty on materi- 




als and workmanship. (Does void 




Radio Shack's 90 day warranty.) 


National Dist. for CECDAT. Inc. 


"THE PATCH" is a trademark of 




CECDAT.INC. 


713-455-3276 
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UTILITY 



LOAD 80 



Hide sensitive data, protect your software. 



Secrets 



Stephen Mills, Ph.D. 
611 Wood I awn Ave. 
Springfield, OH 45504 



Even users of microcom- 
puters sometimes need a lit- 
tle privacy. You may have made 
your computer do some things 
you don't want just anyone to 
know about. In the case of a 
small business, the confiden- 
tiality of financial records or 
clients is essential, but even for 
the personal computerist and 
hobbyist, privacy might be 
valuable: perhaps in personal 
finance or your computerized 
"little black book." Perhaps you 
and your spouse have your own, 
no-holds-barred counterpart to 
Interlude, which you don't want 
the kiddies to run when they're 
tired of Star Trek. Perhaps you 
simply want to keep everyone 
from meddling with your Basic 
software when you're not super- 
vising things. 

But as computers go, the 
TRS-80 is not particularly good 
at keeping secrets. Of course 
any computer has some intrin- 
sic inclination to keep a secret. 
For many people a computer is a 
mysterious and unapproach- 
able keeper of information. 
Totally lacking in finesse, a 
computer is by nature unforgiv- 
ing of syntactical errors; you 
cannot coax, persuade, flatter 
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or seduce any computer into giv- 
ing up secrets unless you speak 
the language fluently. Unfor- 
tunately, the TRS-80 has "been 
around." Its popularity, along 
with the general popularity of 
Basic, make this the least 
mysterious of all computers. All 
too many people know how to 
load and run a program. Fewer, 
but still many, can list and an- 
alyze a Basic program that is 
not working right, and defeat the 
computer's tendency to keep 
the secret. 

One obvious and inelegant 
way of ensuring secrecy is simp- 
ly to hide the software under 
lock and key. As the critical 
need for security— and the 
likelihood of deliberate meddl- 
ing—grows, this technique may 
become more and more tempt- 
ing. But it has two drawbacks. 
First, it may be inconvenient. It 
clearly breaks with the ritual of 
cassette-based software if you 
cannot quickly pull your pro- 
gram out of the rack or storage 
box beside the computer. A 
lockable storage compartment 
may not be conveniently nearby. 
Second, it is obvious. Anything 
that has to be hidden or secured 
behind lock and key automati- 
cally provokes interest and 
curiosity. What better way is 
there to advertise that some- 
thing is secret, than to hide it 
physically? If the hidden soft- 
ware is found, whether by acci- 

1982 



dent or by design, you can be 
pretty sure what the finder will 
do next. 

How to Keep a Secret 

This article presents a soft- 
ware alternative for keeping 
secrets. It is subtler, cleverer 
and (for the programmer) more 
interesting than physically 
hiding things. It avoids the two 
shortcomings of hiding: The 
secured software can be stored 
conveniently with non-secured 
programs and, even when 
loaded, it is not apparent that a 
security program is operating. 

The alternative is Censor, a 
utility program which, when ad- 
ded to the resident Basic pro- 
gram, produces special format 
cassette recordings of your pro- 
gram. These programs can be re- 
loaded by theTRS-80's normal in- 
put operations, but they will not 
run until a correct security code 
is entered. Incorrect responses 
or attempts to perform any oper- 
ation before the code is given will 
cause program memory to be 
wiped out. Included are versions 
for Level I (any size RAM) and 
Level II 16K Basic; DOS is not 
covered, but such systems have 
far more elaborate security 
techniques available. 

Although the Level I and Level 
II versions are quite different, 
they have several common char- 
acteristics. Both are machine 
language utilities which can be 



loaded while the Basic program 
to be secured is already in mem- 
ory. Both will accept a security 
code up to 20 characters in 
length for that program. They 
will make as many cassette 
dumps as required, using a sin- 
gle keystroke command (Break 
will return to command mode). 
In addition, in both formats the 
output code includes a control 
program. When the secured 
tape is reloaded, the control pro- 
gram snatches control from the 
ROM-based command mode. 
However, the correct command 
mode prompt is displayed, to 
mislead the would-be tamperer; 
the only cue for the initiated is 
the absence of the underscore 
cursor. The control program 
tests for a correct security code, 
and returns control to command 
mode when it is received. Both 
versions feature checksum 
testing of the load (a feature not 
part of Level II CLOAD). 

Both versions of Censor are 
relatively short and simple. 
Their brevity represents a com- 
promise: convenience and ver- 
satility against complexity and 



The Key Box 

Model I 
Level I and II 
16K 




Does your CP/M** or TRS-80* Word Processor need help? 
Aspen Software has the finest document proofreading tools available. 



QKAMMATik 

Beyond Spelling Checking 

Spelling checkers are useful, but they are not enough! 
Grammatik can find many errors that a spelling checker can't. 
It detects many errors commonly found in text entered on 
computers, such as doubled words ("the the"), inconsistent 
capitalization ("STicky shift key"), incorrect punctuation, and 
others. That's not all! Grammatik also checks your document 
for good writing style using a dictionary of over 500 misused 
phrases as defined in many writer's style manuals. It marks 
and classifies the problems it finds in the document file for 
easy correction with your word processor, and provides sug- 
gestions for correcting the problems. The phrase dictionary 
can be easily extended to include checking for esoteric jargon 
or your own pet peeves. Grammatik also collects other stylistic 
information that can be used to revise the document to im- 
prove its readability such as average sentence and word 
length. It can produce a profile with the number of times each 
unique word in the document was used, helpful for identifying 
overworked vocabulary. Grammatik is not only a valuable 
proofreading tool, it is also a useful learning tool. You will 
notice significant improvements in your own writing style after 
using Grammatik for only a short time. Grammatik is fast, 
easy to use, and works with all popular TRS-80 and CP/M 
word processors. Model I/III version requires a minimum 
32K, 1 drive system. Model II TRSDOS* version requires 
64K and 1 drive. CP/M version requires CP/M release 
2.2and48K. 



The Aspen Software Company Spelling Checker. 

Don't buy a spelling checker until you've considered Proof- 
reader. Recently, several ads for other spelling checkers have 
compared themselves to "others". They weren't comparing 
themselves to Proofreader! Proofreader has all the features 
you need for checking your documents for spelling errors and 
typos. Proofreader looks up every word in its 38,000 word 
dictionary, and does not increase its "vocabulary" by using 
less accurate root word analysis like some others do. You 
won't need to spend as much time adding new words as you 
would with a smaller dictionary. Proofreader is easy to use -- 
you can start checking your documents immediately. Proof- 
reader is fast - it can check even your largest document (20 
pages or more) in less than 5 minutes! Unknown words are 
listed on the screen, and can be saved in a file for later 
manipulation. The Proof-Edit feature (optional on the Model 
I/III version, included with Model II and CP/M) allows you to 
interactively correct the unknown words in context. New 
words can easily be added to the dictionary, and expansion is 
limited only by disk capacity. Proofreader works with all 
TRS-80 operating systems and word processors, so if you 
change svstems, you won't need a new spelling checker. On 
the TRS-80 Model I/III, only 32K RAM and 1 disk drive are 
needed. Proofreader also works with all popular CP/M word 
processors. Add up the facts and the low price, and you will 
conclude that Proofreader is the best value available in 
spelling checkers. 



Aspen Software programs are professional quality, reliable software 
tools developed for the TRS-80 and CP/M by a Ph.D. in Computer 
Science. All software is protected by Aspen Software's low cost 
upgrade privilege for new versions. Other tools include: 

— SOFT-SCREEN™, a powerful, state of the art full screen text 
editor. Over a year in development, Soft-Screen is compatible with 
all TRS-80 programming languages, including BASIC, FORTRAN. 
MACRO, Raifor, and COBOL. Commands are easy to learn, yet 
versatile and complete to satisfy the most experienced user. Soft- 
Screen is also available for P&T Model II CP/M. 

— SOFT-TFXT™. Aspen Software's text formatter. When used 
with Soft-Screen, provides a powerful word processing system. Full 
featured, including automatic pagination, even and odd page 
headings, underlining, index generation, footnotes, support for 



advanced printer capabilities, and much more. Model I/III version 
supports serial printers at full speed. Soft-Text offers a real alter- 
native for Model II TRSDOS users. Please write or call for 
more details. 

— RATFOR. a structured language preprocessor for Fortran de- 
veloped at Bell Labs. Aspen Software Ratfor is one of the best 
versions available, and the only one with a pretty printer option. 
Totally compatible with Microsoft F80. Includes several extensions, 
including "case", "string", and conditional compilation. User's 
manual contains all information needed to learn and write Ratfor 
programs. Requires FORTRAN. 

— PP-RATFOR. a pretty printer. Automatically formats and 
indents Aspen Software Ratfor source programs. An essential 
program development tool. 



Proofreader 

Proof-Edit 

Grammatik 

Soft-Screen 
Soft-Text 

both 
Ratfor 
PP-Ratfor 

both 

IMPORTANT t Specify computer model, operating system, memory size, and number of drives when ordering! For CP/M, 
currently only 8" single density CP/M versions available. Please inquire about other CP/M disk formats. All TRS-80 ver- 
sions available. Manual only orders can be applied to final purchase. CP/M prices are introductory. 

Orders sent postpaid by first class mail. Terms: Cash, check, money order, VISA, or Master Card. NM residents add 4% tax. 

Proofreader, Grammatik, Soft-Screen, and Soft-Text are trademarks of Aspen Software. 

**trademark of Digital Research ""trademark of Tandy Corp. 

sT.M. 



Model I 


Model II 

(64k, Id) 


Model 111 


CP/M 

(2.2,48k) 


Manual only 


$54.00(32kld) 

$30.00 

$59.00(32kld) 


$119.00 

incl. 

$99.00 


$64.00(32kld) 

$30.00 

$59.00(32kld) 


$129.00 

incl. 

$149.00 


$8.00 

incl. 

$8.00 


$69.00<48kld) 
$69.00(48kld) 
$129.00 


$99.00 

$99.00 

$179.00 


$75.00(48kld) 
$75.O0(48kld) 
$139.00 


$99.00(P&T) 
$99.00 
$179.00 


$15.00 
$15.00 
$25.00 


$49.00(48k2d) 
$30.00(48k2d) 
$74.00(48k2d) 


$99.00 

$49.00 

$139.00 


$59.00(48kld) 

$34.00 

$84.00 


$99.00 

$49.00 

$139.00 


' $15.00 




P.O. Box 339 -M Tijeras, NM 87059 (505) 281-1634 
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tightness of security. Because 
of this, it can hardly be claimed 
that Censor has undefeatable 
security, but its features should 
make it an adequate resource 
for many personal computer- 
ists. It automatically usurps 
control from ROM, requiring im- 
mediate input of the correct 
security code (out of billions of 
possibilities); and it operates 
secretly. 

Level I Censor 

The Level I version of Censor 
is given in Program Listing 1. 
The Basic program to be cen- 
sored is not at all modified (or 
encrypted); it is merely made 
inaccessible by the control pro- 
gram. Both Censor and the con- 
trol program which it attaches 
to Basic are loaded in a pro- 
tected area below the RAM dedi- 
cated to Basic programming. 
Thus Level I Censor has no 
special memory requirements. 

Producing Censor requires 
the Radio Shack Editor/ 
Assembler program, orT-Bug, or 
some equivalent. Whichever 



method is used, producing Cen- 
sor is a two-step process. Cen- 
sor cannot be directly tran- 
scribed by T-Bug because they 
both occupy the same region of 
memory, and T-Bug would 
destroy itself in the process. It 
cannot be loaded under System 
program control for the same 
reason. The first step, then, is to 
prepare a program which will 
produce a properly formatted 
version of Censor. When this 
program (Program Listing 1) is 
executed, Censor itself will be 
recorded on tape. This second- 
generation Censor may then be 
CLOADed with a Basic program 
already in memory; it is self- 
starting and does not conflict 
with any program RAM. 

Listing 1 clearly shows the 
second-generation source file 
for Censor (lines 25-118). To pro- 
duce the working version of Cen- 
sor, this file is shifted to its 
proper location, 4107H-41FEH. 
The displacement for this move, 
2304 bytes (or 900H bytes), is 
represented by the label DIS, 
which is used in assembly to 









Program Listing 1. 






00000 




LISTING 1. LEVEL I A. L. VERSION 






00001 


.****** 


************************************* 






00002 
00003 
00004 
00005 
0001)6 
00007 
00008 
00009 
00010 


: 


LEVEL I CENSOR PROGRAM 
(C) 1981 STEPHEN MILLS 

; CENSOR SECURITY PROGRAM 

; PREVENTS UNAUTHORIZED LOADING OF ' 

; LEVEL I BASIC PROGRAMS. CENSOR IS 


E 




00011 




; LOADED OVER BASIC. MACHINE LANGUAG 


D 




00012 
00013 
00014 




;ROUTINE WRITES OUT SECURITY CODE AN 
; SAVES BASIC PLUS SECURITY BOOTSTRAP 
;WHEN PROGRAM IS LOADED A FAKE PROMP 


T IS 




00015 




; DISPLAYED (THERE IS NO CURSOR) . AT 


THIS 












00016 




; POINT PROPER SECURITY CODE MUST BE 


ENTERED 












00017 




;OR ENTIRE MEMORY CONTENTS DESTROYED 






00018 




;EDTASM VERSION PRODUCES A 250 BAUD 






00019 




; PROGRAM TO LOAD BELOW BASIC 






00020 










00021 


;2 N D 


GENERATION SOURCE F 


I L E 








K E 




00022 
00023 




FOR CENSOR BEGINS HE 


4A07 




00024 




ORG 4A07H 


4107 




00025 


ENTRY 


DEFL HEAD-DIS 


4A07 


310041 


00026 


HEAD 


LD SP,4100H ;MOVE STACK 


4A0A 


0605 


00027 




LD B,5 


4A0C 


115B41 


00028 




LD DE,DISPLA-DIS 


4A0F 
p 


CD5109 


00029 




CALL 09 51H ; LEVEL 1 DISPLAY LOO 


4A12 


10FB 


00030 




DJNZ S-3 ; RETURNS EACH 13 


4A14 


2A6840 


00031 




LD HL,(4068Ii) ;GET CURSOR 


LOC 










D 




00032 

00033 
00034 


; NOTE 


AFTER THE DISPLAY ROUTINE IS EXECUTE 

THE CURSOR LOCATION RESIDES IN THE 
ALTERNATE HL REGISTER 

Program continues 



FREE EPSON MX-80 PRINTER 



With the 
purchase of a 

TRS 80, Model III. 



For a limited time, Data Services, Inc., will 
give you a FREE Epson MX-80 Printer ($645 
value), when you buy a TRS 80 Model III, 48k, 
with 2 PERCOM 40 track drives, at a regular 
price of $2,495. 

(Optional P.S 232, $90 extra. Radio Shack w/IXS 232 - $1 70 
extra. Printer cable - add $35.00) 

The perfect system, the perfect price! 

TRS 80 Model III, 48k - two PERCOM 40 

track drives - EPSON MX-80 Printer. 

Data Services offers more — APPARAT'S 
NEWDOS80, version VER 2.0, regularly $149.95 
— now only $129.95 

Up to 20% savings on TRS computers — 
accessories — programs, Plus: EPSON / 
PERCOM / APPARAT / HAYES SMARTMODEM / 
VERBATIM DISKETTES. 

*TR5-80 is a trademark of Tandy Corporation. 




■ FREE SHIPPING in 48 contiguous states. 

■ No Soles Tax on out-of-state orders. 

■ Visa /Master Cord welcome. 

■ Personal checks, allow 3 weeks to clear. 

■ (International orders, freight F.O.D. Wichita, 
Kansas) 

CALL TOLL FREE: 1 -800-835-1 1 29 
or order by mail from: 

DflTfl SEBIWCEB, IMC. 

COMPUTER, SERVICES SINCE 1 970 ^ n 8 

P.O. Box 1 1 57 Wichita, Kansas 67201 -1 1 57 
(In Kansas, call 1-016-838-9021) 
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PROFESSIONAL 




INCOME TAX SYSTEM 

FOR TRS-80* MODEL I, II or III 

For four successive years! 



Our system, running on the magnificent line of TRS-80 computers, has 
prepared thousands of lightning-fast, error-free tax returns a day in 
accounting offices nationwide. 

Now we introduce! 

SYSTEM THREE! 

SYSTEM THREE is an improved, still more interactive version — Totals W-2's and 
computes FICA overpayment — Includes "QWIKTAX," a fast tax calculator for tax 
planning — Has automated Client Billing — More! 

And, as always— 

1. Full interactive user control, in tax-form language only, line-by-line. 

2. Screen display of full 1040 and all schedules, prior to printout. 

3. All formats IRS and State approved. 

4. Schedule amounts automatically entered on Form 1040. 

5. Your Preparer's Information automatically printed at bottom of Page 2, Form 1040. 

6. Built-in Validation Check tests entire system, hardware and software. 

7. Special printer adjustment routines: Margin Offset, Text Position, etc. 

8. Fills in pre-printed forms (we supply) or use overlays. Your choice. 

9. AUTOMATICALLY COMPUTES: Tax — Earned Income Credit — Maximum/Minimum Tax — Least Tax 
Method — All Percentage of Income Limitations — All Fixed Limitations. 

DOES INCOME AVERAGING IN EIGHT SECONDS! 

10. Full support through the tax season, no charge. 

11. Inexpensive yearly updates in accordance with tax-law changes. 

SYSTEM THREE comes in four modules. You select the ones you need. There is no 
system like it, for any computer, and the cost is literally nothing. In one season, our users 
have paid, out of savings, for the software and the computer. 

35-page Descriptive Manual ■ $7.50 

(Refundable on order) 

MINIMUM SYSTEM REQUIRED: Model I, 48K, 1 Disk Drive 

CONTRACT SERVICES ASSOCIATES 6 

706 SOUTH EUCLID • ANAHEIM, CA 92802 • TELEPHONE: (714) 635-4055 



'TRS-80 is a trademark of Tandy Corp 
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Program continued 




















4ADA 2009 


00099 


JR NZ, CANCEL 


4A17 D9" 


00035 INPIJT1 


EXX 


;DO THIS TO GET CURSOR 


4ADC 23 


00100 


INC HL 


4A18 362A 


00036 


LD 


(HL),2AH ; ASTERISK 


4 ADD 13 


00101 


INC DE 


4A1A D9 


00037 


EXX 


;BACK TO OTHER REGS 


4ADE 10F8 


00102 


DJNZ COMPAR 


4A1B CD400B 


00038 INPUT2 


CALL 


0B40H ; INPUT LOOP 


4AE0 Fl 


00103 


POP AF ; RESTORE FLAGS FROM LOAD 


4A1E 28FB 


00039 


JR 


Z r INPUT2 


4AE1 El 


00104 


POP HL ; RESTORE END OF PROG ADDR 


4A20 FE0D 


00040 


CP 


13 ; INPUT RESETS ON <BREAK> 








4A22 38E6 


00041 


JR 


CHEAD + 3 ;OR <CLEAR> & 


4AE2 CAEC0E 


00105 


JP Z,0EECH 


4A24 20F1 


00042 


JR 


NZ,INPUT1 .-TERMINATES ON <EN 


4AE5 219140 


00106 CANCEL 


LD HL,4091H 


TER> 








4AE8 119240 


00107 


LD DE,4092H 


4A26 119E4A 


00043 


LD 


DE, BUFFER 


4AEB 016F3F 


00108 


LD BC,8000H-4091H 


4A29 011400 


00044 


LD 


BC,20 


4AEE EDB0 


00109 


LDIR 


4A2C EDB0 
4A2E 115441 
4A31 CD4F09 
4A34 21BA41 
4A37 22FE41 
START 
4A3A 3A4038 


00045 

00046 DUMP 
00047 
00048 
00049 


LDIR 

LD 

CALL 

LD 

LD 


;MOVE THE INPUT TO BUFFER 

DE,CA5MES-DIS 

094FH ;DISPLAY LOOP 

HL,NEWADR-DIS 

(41FEH) ,HL ;PUT IN NEW 


4AF0 0000 
4AF2 0000 
4AF4 0000 
4AF6 0000 
4AF8 0000 
4AFA 0000 


00110 CKSUM 

00111 

00112 

00113 

00114 

00115 


DEFW 
DEFW 
DEFW 
DEFW 
DEFW 
DEFW 


00050 EDGE 


LD 


A,(3840H) 


4AFC 0000 
4AFE 07 


00116 
00117 TAIL 


DEFW 

DEFB ENTRY&0FFH 


4A3D FE04 


00051 


CP 


4 ; BREAK? 


0900 


00118 DIS 


DEFL S-41FFH 


4A3F CAC901 


00052 


JP 


Z,01C9H 




00119 ,- 

00120 ;T H E 




4A4 2 IF 


00053 


RRA 


;TEST ENTER BIT 




FIRST GENERATION PR 


4A43 30F5 


00054 


JR 


NC r EDGE 


G R A K 






4A45 CDE90F 


00055 DOW) 


CALL 


0FE9H ;TURN ON CASSETTE 


00121 ,- 

00122 ;THE F 




4A48 219E4A 


00056 


LD 


HL, BUFFER 




OLLOWING SECTION TRANSFORMS THE ABOVE 


4A4B ED5B6C40 


00057 


LD 


□E,(406CH) 


SOURCE 






4A4F CD4B0F 


00058 


CALL 


0F4BH ;DUMP BASIC £c LEADER 


00123 ,- 


CODE INTO A LEVEL I READABLE PROGRAM 


4A52 18DA 


00059 


JR 


DUMP 


TAPE 






4A54 43 


00060 CASMES 


DEFM 


'CSAVE?' 




00124 ; 




4A5A 0D 


00061 


DEFB 


13 




00125 ; 


**** IMPORTANT **** 


4A5B 0C 


00062 DISPLA 


DEFB 


12 ; CLEAR SCREEN 




00126 ; 




4A5C 0D 


00063 


DEFB 


13 




00127 ;USER 


MUST PREPARE BLANK TAPE FOR OUTPUT B 


4A5D 43 


00064 


DEFM 


'CENSOR SECURITY CONTROL' 


E F R E 






4A7 4 0D 


00065 


DEFB 


13 




00128 ; 


RUNNING THIS PROGRAM! 


4A75 46 


00066 


DEFM 


'FOR LEVEL I BASIC PROGRAMS' 


4AFF 31FF4A 


00129 ; 

00130 ADJ 


LD SP,$ 


4A8F 0D 


00067 


DEFB 


13 


4B02 11FE41 


00131 


LD DE,41FEH 


4A90 0D 


00068 


DEFB 


13 


4B05 21FE4A 


00132 


LD HL,TAIL 


4A91 45 


00069 


DEFM 


'ENTER CODE (UP TO 20 CHARAC 


4B08 01F800 


00133 


LD BC,TAIL-HEAD+1 


TERS) ' 








4B0B AF 


00134 


XOR A 


4AB1 0D 


00070 


DEFB 


13 




00135 ; 






00071 










00136 ,-MOVE 


CENSOR INTO PLACE & CALC ITS CHECKSUM 




00072 


THE CENSlv: .'VN'.'iiu: l --y.v- ;-.y :■:,)](:]'. r;7, :;\Y : -': 




00137 i 






00073 




ALONG 


WITH BASIC BEGINS HERE 


4B0C 96 


00138 LOOP 


SUB (HL) 




00074 








4B0D EDA8 


00139 


LDD 


419E 


00075 BUFFER 


DEFL 


S-DIS-20 .-OVERWRITES 


4B0F EA0C4B 


00140 


JP PE,LOOP 


DISPLA 








4B12 D641 


00141 


SUB 41H ; CORRECT FOR MSB OF STAR 


4AB2 52 


00076 READYM 


DEFM 


'READY' 


T ADDR 






4AB7 0D 


00077 


DEFB 


13 


4B14 32F041 


00142 


LD (CKSUM-DIS) ,A ;ADJUST ITS CK 


4AB8 3E 


00078 


DEFM 


■>' ;FAKE PROMPT 


SUM 


00143 ; 




4AB9 00 


00079 


DEFB 


,-END OF MESSAGE 






4ABA E5 


00080 NEWADR 


PUSH 


HL ; START OF BOOTSTRAP 




00144 ; 


PREPARE TO MAKE MULTIPLE 


4ABB F5 


00081 


PUSH 


AF 




00145 ; 


250-BAUD DUMPS OF CENSOR 


4ABC 2027 


00082 


JR 


NZ, CANCEL 




00146 ; 




4ABE 21B241 


00083 


LD 


HL.READYM-DIS ;FAKE PROMPT 


4B17 11544A 


00147 LP2 


LD DE, CASMES 


4AC1 3E0D 


00084 


LD 


A, 13 ,-LOAD CARRIAGE RETURN C 


4B1A CD4F09 


00148 


CALL 094FH 


ODE 










00149 ; 




4AC3 D7 


00085 FAKEIT 


RST 


10H 




00150 ,- TURNING ON CASSETTE BEFORE KEYSCAN LOOP 


4 AC 4 7E 


00086 


LD 


A, (HL) 




00151 ; 


WRITES EXTRA LEADER BETWEEN DUMPS 


4AC5 23 


00087 


INC 


HL 




00152 ; 




4AC6 B7 


00088 


OR 


A 


4B1D CDE90F 


00153 


CALL 0FE9H 


4AC7 20FA 


00089 


JR 


NZ, FAKEIT 


4B20 0600 


00154 


LD B,0 


4AC9 D9 


00090 


EXX 


;GET CURSOR POSITION 


4B22 CD400B 


00155 LP3 


CALL 0B40H 


4ACA 3620 


00091 


LD 


(HL) ,20H ;KILL CURSOR 


4B25 FE03 


00156 


CP 3 ; TERMINATE ON <BREAK> 


4ACC CD400B 


00092 WTZ 


CALL 


0B40H 


4B27 CAC901 


00157 


JP Z,01C9H 


4ACF FE0D 


00093 


CP 


13 ;DO KEYBOARD INPUT 


4B2A 10F6 


00158 


DJNZ LP3 


4AD1 20F9 


00094 


JR 


NZ.WTZ ;TIL <ENTER> 


4B2C 2107/.1 


00159 


LD HL, ENTRY 


4AD3 0614 


00095 


LD 


B,20 ; COUNT FOR TEST 


4B2F 11FF41 


00160 


LD DE,41FFH 


4AD5 119E41 


00096 


LD 


DE, BUFFER 


4B32 CD4BKF 


00161 


CALL 0F4BH 


4AD8 1A 


00097 COM PAR 


LD 


A,(DE) ;FETCH CODE 


4B35 18E0 


00162 


JR LP2 


4AD9 BE 


00098 


CP 


(HL) ; COMPARE TO WHAT'S ON S 


4AFF 


00163 


END ADJ 


CREEN 















correct all direct addresses (cf. 
lines 25, 28, 46, etc.) in the file. 
The first-generation program 
(beginning at line 120) will per- 
form the block move, and cal- 
culate and adjust the checksum 
of the file. Level I's CLOAD func- 
tion will be storing the check- 
sum in the stack area (at 
41FFH); this value must be 41 H 
if Censor is to be self-starting. 

Once the program is 
transcribed and checked, it 
should be saved to ensure 
against untrapped errors (ED- 
TASM users use the W com- 
mand; T-Bug users execute P 
4A07 4B37). Now you are ready 
to prepare Censor. Load the 
first-generation program but, 
before executing it, put a blank 
tape in the recorder and press 
the record and play keys. Once 
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prepared, execute the program 
by entering / for the System ver- 
sion, or J 4AFF for the T-Bug ver- 
sion. The recorder will start up 
right away, recording the final 
version of Censor. Note that, as 
written, the first-generation pro- 
gram will record Censor over 
and over again. Output for each 
complete recording will only 
take about seven seconds (and 
about half that is leader!). You 
will be prompted for each 
recording with the appearance 
of the message CSAVE? which 
will help you count the record- 
ings, but the program does not 
wait for your response. When 
you have as many dumps as you 
want, press and hold down the 
Break key. When the current out- 
put is completed, control will be 
passed back to the Basic com- 

1982 



mand mode. 

When you are ready to save a 
program that is to be Censor- 
protected, CLOAD the Censor 
tape. The process will not affect 
the resident program in any way, 
as loading another Basic pro- 
gram would do. The program will 
start itself, clearing the screen 
and displaying: 

CENSOR SECURITY CONTROL FOR 
LEVEL I BASIC PROGRAMS 

ENTER CODE (UP TO 20 CHARAC- 
TERS) 

The asterisk which appears here 
is your cursor, which will move 
along the screen as you type in 
the code. If you press Break or 
Clear, the coding routine will 
start anew. When the code is 
entered, the program will ask if 
you wish to save the coded ver- 



sion. When you are ready, press 
Enter and the program will be 
CSAVEd. When that is com- 
pleted, another Enter will cause 
another recording to be made, 
while Break will return to the 
command mode with the Basic 
program undisturbed. 

To run the Censored program, 
CLOAD it. When the recorder 
stops, the screen will show the 
usual Ready prompt. The only 
clue that things are not as they 
seem is that there is no cursor 
('_') after the prompt. At this 
point, enter your security code. 
Do not type List, Run or even 
press Break before you have 
done so. If this is done correctly, 
command mode will be returned 
with the Basic program ready to 
run. If there has been a CLOAD 
checksum error, the user will not 



Now my accounting systems 
run on CP/M as well asTRSDOS. 

So they'll work with your micro, 
no matter which it uses. 



I'm Irwin Taranto, and I originally designed my 
Model II systems to work with TRSDOS, the operating 
software Radio Shack supplies with the TRS-80. 

I designed them extremely carefully, with features 
other microcomputer accounting systems don't have. 
Mine all integrate with the general ledger, and, 
where it helps, they integrate with each other. 

My general ledger system gives year-to-year 
comparisons, in dollars and percentages. It figures 
budgets and it even has a report generator. 

My accounts receivable systems can do sales 
analysis by product code and figure in salesmen's 
commissions. They generate mailing lists by customer 
code or zip code for up to 2000 customers. 
You can choose either an open item system or a 
balance forward system which works on a cash or 
an accrual basis. 

My payroll system can handle up to 600 
employees in multiple departments, with any state 
tax routine (we provide them all). It can make any 
miscellaneous deductions you ask it to —it even 
does tips and meals. 



■ ; 






; . ,, 




TRSDOS and TRS-80 are trademarks of the Tandy Corporation. 
CP/M is a trademark of Digital Research Corporation. 



My inventory control system stores up to 5000 
items. It can report by vendor, tell you when you're 
out of stock or when you need to reorder. It can 
update price or cost automatically, and integrates 
fully with my invoicing system. 

There's a lot more, too. Over the years, I've 
had thousands of phone conversations with 
my customers, working out the bugs and kinks and 
adding desirable features. Everybody talks about 
"user-oriented" systems, but because of all these 
phone calls, it really means something when I say it. 
These may well be the most thoroughly researched 
small business accounting programs in the world. 

They're also the best supported, at least as 
far as microcomputer systems go. If you have a 
problem, just call. If your problem is tough enough, 
I'll get on the phone myself. There's no charge for 
phone assistance, ever. 

All these calls keep me upgrading my systems 
constantly If you own one, you're eligible for a 
standing offer I've made all along: send me your 
diskette, and I'll send you the latest upgrade for 
only $25. 

Now I've taken another step. More and more 
owners are switching over to CP/M software these 
days. It seems to be where the whole microcomputer 
industry is heading. 

That's fine with me, because I've just converted 
all these accounting systems, and can sell them for 
the prices I've listed: 

General Ledger/Cash Journal $ 299 

Accounts Payable/Purchase Order 349 
Open Items Accounts Receivable/Invoicing 349 

Balance Forward Accounts Receivable 399 

Payroll 299 

with Job Costing Option 399 

Inventory Control 399 

For mail-order programs, these prices may seem 
high. But for serious accounting programs, nothing 
can touch them. 

Michael Tannenbaum, the "80 Accountant" 
in 80 Microcomputing, just called them "a very 
impressive product at a very reasonable price." 

Our TRS-80 Model I and Model III systems 
aren't quite as sophisticated. But they're tremendous 
buys at $99 each ($149 for general ledger). 

So call me and take your choice —CP/M or 
TRSDOS. Same price, same support. My systems 
are ready and waiting. 



Taranto 

.wo & ASSOCIATES, INC. 



121 Paul Drive, San Rafael CA 94903 

Outside California, toll free (800) 227-2868. In California, (415) 472-2670. 



■See List ol Advertisers on page 402 
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Program Listing 2. 



; LISTING 2 



ASSEMBLY VERSION OF LEVEL II 



310 ; 

320 ;LEVEL II CENSOR VERS. 2 

330 ; SECURED ACCESS PROGRAM FOR LEVEL II BASIC 

340 ; (C) 1981 STEPHEN MILLS 

350 ; 

060 ; CENSOR CONVERTS BASIC PROGRAMMING INTO 

070 ;A SECURITY CODED SYSTEM TAPE, WHICH CAN 

080 ;BE LOADED UNDER SYSTEM AND DECODED BY 

090 ; PROPER < = 20 CHARACTER CODE. 



R. 



00100 ; 

00110 ; WITH BASIC IN MEM, SYSTEM LOAD CENSO 

00120 ; ENTER TAPE FILENAME & SECURITY ACCESS CODE 
00130 ;CENSOR WILL SAVE CODED BASIC AS SYSTEM TAPE 

00140 ;TO RECOVER BASIC, LOAD <FILENM> UNDER SYSTE 



H, 


00150 ;AND RESPOND TO '" PROMPT WITH SECURITY COD 


E . 


00160 ; 








002E 


00170 KEY 


EQU 


2EH 




41E3 


00180 


ORG 


41E3H 


;PUT ADDRESS IN PLAC 


E TO MAKE 










41E3 BF7E 


00190 


DEFW 


ENTRY2 


•OUTPUT CODE SELF-ST 


ARTING 










4016 


00200 


ORG 


4016H 


;RE-INITIALIZE KEYBO 


ARD DCB (TO 










4016 E303 


00210 


DEFW 


3E3H 


; AVOID CRASHES W/ HI 


-MEM KB ROUTINES 








40A4 


00220 BASBEG 


EQU 


40A4H 


; START OF CODE 


40F9 


00230 BASEND 


EQU 


40F9H 


;END+3 OF BASIC HERE 


7E12 


00240 


ORG 


7E12H 




7E12 C7 


00250 INIT 


RST 







7E13 0000 


00260 PROLEN 


DEFW 


; PROGRAM LENGTH BUFFER 




00270 ,- 










00 280 ; 


SUBROUTINES USED BY CENSOR OUTPUT WH 


ICH 












00290 ; 


WILL 


INITIALLY 


BE SCRAMBLED ARE STAC 


KED 


00300 ; 
00310 ; 




HERE 




7E15 E5 


00320 INPUT 


PUSH 


HL 


;HL HAS BUFFER ADDR 


7E16 C5 


00330 


PUSH 


BC 




7E17 CD2B00 


00340 INL1 


CALL 


2BH 


;KEYSCAN 


7E1B 


00350 DSABL 


EQU 


S+l 


; DISABLE BREAK HERE 


7E1A FE01 


00360 


CP 


1 


•TEST FOR BREAK 


7E1C CA191A 


00370 


JP 


Z,1A19H 




7E1F FE0D 


00380 


CP 


13 


;CAR RET? 


7E21 282A 


00390 


JR 


Z, INDONE 


7E23 FE20 


00400 


CP 


' ' 


; LOWEST ALLOWED 


7E25 38F0 


00410 


JR 


C,INL1 


;AS INPUT 


7E27 77 


00420 


LD 


(HL) ,A 


;PUT IN BUFFER 


7E28 23 


00430 


INC 


HL 




7E29 CD3300 


00440 IN2 


CALL 


33H 


.•DISPLAY IT 


7E2C 10E9 


00450 


DJNZ 


INL1 




7E2E CI 


00460 


POP 


BC 




7E2F El 


00470 


POP 


HL 




7E30 C9 


00480 


RET 






7E31 CDD67E 


00490 ACCODE 


CALL 


PRINT 


SCRAMBLED KEYWORD W 


ILL BE HERE 










7E34 42 


00500 


DEFM 


'BASIC 


SPOILED 1 


7E41 0D 


00510 


DEFB 


13 




7E42 C37200 


00520 


JP 


72H 




0014 


00530 ACLEN 


EQU 


$-ACCODE 


7E45 0B 


00540 CTDONE 


DEC 


BC 


;THIS ROUTINE PERFOR 


MS THE 










7E46 23 


00550 


INC 


HL 


.-COUNTING FOR 'DIVID 


E' AND 










7E47 78 


00560 


LD 


A,B 


; PROVIDES EXIT FROM 


THAT 










7E48 Bl 


00570 


OR 


C 


; SUBROUTINE 


7E49 C0 


00580 


RET 


NZ 


; RETURN TO 'DIVIDE' 


IF NO CHANGE 










7E4A El 


00590 


POP 


HL 


;UNSTACK RET ADDR 


7E4B El 


00600 


POP 


HL 


.•RESTORE POINTER 


7E4C C9 


00610 


RET 


; EXITS 


FROM 'DIVIDE' SUBROUT 


INE 










7E4D 3620 


00620 INDONE 


LD 


(HL) , ' 


' ;FILL BUFFER 


7E4F 23 


00630 


INC 


HL 


;WITH SPACES 


7E50 10FB 


00640 


DJNZ 


INDONE 




7E52 04 


00650 


INC 


B 


;ADJ FOR INL1 


7E53 18D4 


00660 


JR 


IN2 






00670 












00680 




FOLLOWING CALCULATES A ONE BYTE 




00690 




NUMERICAL KEY TO START ENCODING 




00700 






OR DECODING 




00710 










7E55 AF 


00720 CODEWD 


XOR 


A 


;MAKE CODE FROM BUFF 


ER 
7E56 C5 


00730 


PUSH 


BC 


;SAVE WHAT'S THERE 


7E57 E5 


00740 


PUSH 


HL 


;SAVE BUFFER ADDR 


7E58 0613 


00750 


LD 


B,ACLEN-1 


7E5A 86 


00760 


ADD 


A, (HL) 


[ACCUMULATE CODE 


7E5B 23 


00770 


INC 


HL 




7E5C 10FC 


00780 


DJNZ 


$-2 




7E5E El 


00790 


POP 


HL 




7E5F CI 


00800 


POP 


BC 




7E60 0F 


00810 


RRCA 


; ADDTL 


CHANGE 


7E61 C9 


00820 


RET 






7E62 AF 


00830 KILL 


XOR 


A 


; GENERATES CRASH ON 


BAD INPUT 










7E63 67 


00840 


LD 


H,A 




7E64 4C 


00850 


LD 


C,H 


;SET UP FOR 


7E65 69 


00860 


LD 


L,C 


; BLOCK MOVE OF 


7E66 5C 


00870 


LD 


E,H 


;RAM 


7E67 163C 


00880 


LD 


D,3CH 




7E69 45 


00890 


LD 


B,L 




7E6A EDB0 


00900 
00910 ; 


LDIR 








00920 ; 


NEXT 


SUBROUTINE MODIFIES FILE. ON E 


NTRY: 


00930 ; 




(HL) = 


START ADDR OF CODE 




00940 ; 




(BC) - 


NUMBER BYTES TO CODE 



AL, SAME 

SOURCE. 

7E6C ED4B137E 
7E70 E5 
7E71 7E 
7E72 AA 
7E73 77 
7E74 CD457E 
7E77 7E 
7E78 ED67 
7E7A CD457E 
7E7D 7E 
7E7E 2F 
7E7F 77 
7E80 CD457E 
7E83 18EC 



00990 DIVIDE 

01000 

01010 ENCDL 

01020 

01030 

01040 

01050 

01060 

01070 

01080 

01090 

01100 

01110 

01120 

01130 ; 

01140 ; 



(D) = A KEYWORD 
SINCE THESE OPERATIONS ARE SYMMETRIC 



ROUTINE WILL SCRAMBLE OR UNSCRAMBLE 



LD BC, (PROLEN) ;GET LENGTH 

PUSH HL ;SAVE START OF PROG 

LD A,(HL) ; FIRST BYTE 

XOR D ;D HAS CODE WORD! 

LD (HL) ,A 

CALL CTDONE 

LD A,(HL) ;GET IT 

RRD ; JUMBLE BITS 

CALL CTDONE 

LD A, (HL) ;BYTE 3 

CPL ; INVERT IT 

LD (HL) ,A 

CALL CTDONE 

JR ENCDL 

MAIN OPERATION OF OBJECT PROGRAM BEG 



INS i 


ERE 


01150 ,- 




NOTE: THIS SECTION OF CODE IS ALSO S 


CRAMBLED 














01160 ; 




ON TAPE. IT IS DECODED BEFORE EXE 


CUTION. 














01170 ; 








7E85 


CDD67E 


01180 CONT2 


CALL 


PRINT 


7E88 


0A 


01190 




DEFB 


10 ;LINE FEED 


7E89 


2A 


01200 




DEFM 


' *? ' 


7E8B 


0D 


01210 




DEFB 


13 


7E8C 


21E27E 


01220 




LD 


HL.HIGH ;LOAD ACCESS 


7E8F 


0614 


01230 




LD 


B, ACLEN 


7E91 


CD157E 


01240 




CALL 


INPUT 


7E94 


CD557E 


01250 




CALL 


CODEWD ; DECODE INPUT 


7E97 


11317E 


01260 




LD 


DE, ACCODE 


7E9A 


4F 


01270 




LD 


C,A 


7E9B 


1A 


01280 CLP 


LD 


A,(DE) 


7E9C 


13 


01290 




INC 


DE 


7E9D 


A9 


01300 




XOR 


C ; CORRECT IT 


7E9E 


AE 


01310 




XOR 


(HL) 


7E9F 


20C1 


01320 




JR 


NZ.KILL 


7EA1 


23 


01330 




INC 


HL ;BUMP BUFFER 


7EA2 


10F7 


01340 




DJNZ 


CLP 


7EA4 


51 


01350 




LD 


D.C 


7EA5 


2ABD7E 


01360 FOLLOW 


LD 


HL,( LOWPT) 


7EA8 


CD6C7E 


01370 




CALL 


DIVIDE 


7EAB 


ED4B137E 


01380 




LD 


BC , ( PROLEN) ; COUNTER 


7EAF 


ED5BA440 


01390 




LD 


DE, (BASBEG) ; STORAGE PLACE 


7EB3 


EDB0 


01400 




LDIR 


;MOVE IT BACK 


7EB5 


ED53F940 


01410 




LD 


(BASEND) ,DE 


7EB9 


C37200 


01420 




JP 


72H 


00A6 




01430 FIRST 


EQU 


S-INPUT-1 ; LENGTH OF S 


CRAMBLED FILE 










7EBC 


78 


01440 TERM 


DEFB 


78H 


7EBD 


0000 


01450 LOWPT 


DEFW 


;LOW ADDR HERE 






01460 ; 












01470 ; 




INITIAL 


DECODING OF OBJECT FILE DONE 


HERE 














01480 ; 








7EBF 


3EC9 


014 90 ENTRY2 


LD 


A, 201 ;RETURN OPCODE 


7EC1 


32E241 


01500 




LD 


(41E2H),A ;CORRECT AUTOSTART 


7EC4 


06A6 


01510 




LD 


B, FIRST ; COUNT 


7EC6 


21147E 


01520 




LD 


HL,INPUT-1 .-LESS FOR INC 


7EC9 


0E2E 


01530 




LD 


C,KEY ;GET UNSCRAMBLER 


7ECB 


23 


01540 UNSCR 


INC 


HL ;BUMP PTR 


7ECC 


7E 


01550 




LD 


A,(HL) ;GET MODIFIED BYTE 


7ECD 


F5 


01560 




PUSH 


AF ,-SAVE IT 


7ECE 


91 


01570 




SUB 


C ; SUBTRACT OLD BYTE 


7ECF 


77 


01580 




LD 


(HL) ,A [RESTORE LOCATION 


7ED0 


Fl 


01590 




POP 


AF 


7 EDI 


4F 


01600 




LD 


C,A 


7ED2 


10F7 


01610 




DJNZ 


UNSCR 


7ED4 


18AF 


01620 CONVRT 


JR 


CONT2 .-CONTINUE EXECUTION 


OF DECODE 










7ED6 


E3 


01630 PRINT 


EX 


(SP) ,HL ;GET BUFFER ADDR 


7ED7 


7E 


01640 PL1 


LD 


A, (HL) 


7ED8 


23 


01650 




INC 


HL 


7ED9 


CD3300 


01660 




CALL 


33H 


7EDC 


FE0D 


01670 




CP 


13 


7EDE 


20F7 


01680 




JR 


NZ,PL1 


7EE0 


E3 


01690 




EX 


(SP) ,HL 


7EE1 


C9 


01700 




RET 




7EE2 


00 


01710 HIGH 


NOP 








01720 ; 












01730 ; 




CASSETTE OUTPUT CONTROL OF INITIALIZ 


ING 
















01740 ; 




PROGRAy 


UTILIZES THE FOLLOWING SUBRO 


UTINES 














01750 , 












01760 , 




'BLOCK 


DOES MEMORY OUTPUT. ON ENTR 


Y: 




01770 
01780 






(HL) = START ADDRESS OF MEM 
(B) = COUNT FOR OUTPUT 






01790 




RUNNING SUM KEPT IN (C) 






01800 








7EE3 


7E 


01810 BLOCK 


LD 


A, (HL) ;GET NEXT 


7EE4 


F5 


01820 




PUSH 


AF 


7EE5 


81 


01830 




ADD 


A,C ;CALC CKSUM 


7EE6 


4F 


01840 




LD 


C,A ; STORE IT 


7EE7 


Fl 


01850 




POP 


AF 


7EE8 


CD6402 


01860 




CALL 


26 4H ,-SAVE IT 


7EEB 


23 


01870 




INC 


HL 


7 EEC 


10F5 


01880 




DJNZ 


BLOCK 


7EEF 


C9 


01890 
01900 




RET 








01910 




' CSAVE 


CONTROLS ' SYSTEM ' -FORMAT 






01920 




OUTPUT 


USES 'BLOCK' 






01930 




WRITES 


LINK CODE, STARTING ADDRESS 






01940 






AND CHECKSUM 






01950 








7EEF 


3E3C 


01960 


.'SAVE 


LD 


A,3CH ;LINK CODE 



Program continues 
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MIKEEANGEL 



BRINGS 



Graphic 



LIFE 



TO 



TRS-80 

Model I and Model III 
Must have Level II 
Basic or Model 
III basic. 





FEATURES 
YOU'VE NEVER SEEN BEFORE. 

• Hardware total screen inverse video 

• Two modes of density: 

384 x 192 or 192 x 192 for Model I 
512 x 192 or 256 x 192 for Model III 

• Every dot can be set, reset or tested. 

• 12288 bytes Video Memory 

• Select normal, high or very high resolution with or 
without inverse video via output port. 

• Disable Mikeeangelo's memory via output port. 



*1 MIKEEANGELO is a trademark for Mikee Electronics Corp. 

*2 TRS-80 is a trademark for the Tandy Corp. 

*3 Opening your TRS-80 will void the limited warranty. 

*4 90 day warranty, full refund or replacement. 

"5 The manual is available separately for $15. The full price of this manual wil 

be deducted from the purchase price of MIKEEANGELO when ordered. 



■See List ol Advertisers on page 402 



WERE GOING TO CHANGE THE 
WAY YOU SEE THINGS! 

Designing a computer that people could use in business and leisure, 
without spending alot of money was once a problem. Thanks to the 
TRS-80* there are now over 200,000 Microcomputers in homes and 
business today. 

Unfortunately in keeping the price of the TRS-80 down, the Random 
Access Memory was kept down to only 17K. Yes. 17K. (16K User Memory 
and IK Video Memory. 128 x 48 or 6,144 Independently controlled dots.) 
BUT WE'VE CHANGED ALL THAT. 

NOW HIGH RESOLUTION GRAPHICS 
ARE HERE! 

MIKEEANGELO is 16 times better with the Model III 
and 12 times better for the Model I. 

That's 512 x 192 or 98,304 dots for Model III, 
and 384 x 192 or 73,728 dots for Model I. 

MIKEEANGELO connects to your TRS-80 easily, -s You can 
do it yourself with our instruction book -s in minutes and a 
handy tool kit is available, if you need one for $15. Please 
specify Model I or III TRS-80. 

Order Now For Only $369. Complete 

Order today complete with power supply, case, software and excellent manual for $369. Check, 
Money Order, Master Charge, Visa, Mastercard or COD's accepted. *4 

Or write for free booklet and more information. 



MIKEEANGELO 

MIKEE ELECTRONICS CORPORATION 

P.O. Box 3813 Bellevue, Washington 98009 

Telephone 206/451-0574 

Stcx^k to 30 days for delivery. 
Washington residents must add sales tax. 

"Dealers Inquiries Invited" 



«W2 
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Program continued 






7F91 0A 


02690 


DEFB 


10 ;LINE FEED 










7F92 4C 


02700 


DEFM 


'LOAD CASSETTE' 


7EF1 CD6402 


01970 


CALL 


26 4H 


7F9F 0D 


02710 


DEFB 


13 


7EF4 78 


01980 


LD 


A,B ; RECORD COUNT 


7FA0 CD2B00 


02720 WAIT 


CALL 


2BH 


7EF5 CD6402 


01990 


CALL 


264H 


7FA3 FE01 


02730 


CP 


1 ; BREAK? 


7EF8 7D 


02000 


LD 


A,L .-STARTING ADDR 


7FA5 284C 


02740 


JR 


Z, FINAL 


7EF9 4F 


02010 


LD 


C,A ; START CHECKSUM 


7FA7 B7 


02750 


OR 


A ; ANYTHING? 


7EFA CD6402 


02020 


CALL 


264H 


7FA8 28F6 


02760 


JR 


Z,WAIT 


7EFD 7C 


02030 


LD 


A,H 


7FAA 3EC3 


02770 


LD 


A,0C3H ;JP OPCODE 


7EFE CD6402 


02040 


CALL 


264H 


7FAC 32E241 


027 80 


LD 


(41E2H) ,A 


7F01 81 


02050 


ADD 


A,C 


7FAF AF 


02790 


XOR 


A 


7F02 4F 


02060 


LD 


C,A 


7FB0 CD1202 


02800 


CALL 


212H ;DEFINE DRIVE 


7F03 CDE37E 


02070 


CALL 


BLOCK 


7FB3 CD8702 


02810 


CALL 


287H ;WRITE LEADER 


7F06 79 


02080 


LD 


A,C ;GET CKSUM 


7FB6 210A7F 


02820 


LD 


HL, FILNAM 


7F07 C36402 


02090 


JP 


26 4H ; WRITE & RET 


7FB9 0607 


02830 


LD 


B,7 ; WRITE HEADER 


7F0A 55 


02100 FILNAM 


DEFB 


55H ; SYSTEM TAPE INDICAT 


7FBB CDE37E 


02840 


CALL 


BLOCK ;W/0 CHECKSUM 


OR 








7FBE 21127E 


02850 


LD 


HL.INIT 


7F0B 11127E 


02110 RUN 


LD 


DE,INIT 


7FC1 06D1 


02860 


LD 


B,HIGH-INIT+1 ,-COUNTER 


7F0E 2AF940 


02120 


LD 


HL , ( BASEND) ; CONFLICT 


7FC3 CDEF7E 


02870 


CALL 


CSAVE 


7F11 E5 


02130 


PUSH 


HL ;SAVE IT A WHILE1 


7FC6 0603 


02880 


LD 


B,3 


7F12 ED52 


02140 


SBC 


HL,DE 


7FC8 21E241 


02890 


LD 


HL,41E2H 


7F14 El 


02150 


POP 


HL 


7FCB CDEF7E 


02900 


CALL 


CSAVE 


7F15 D2317E 


02160 


JP 


NC,ACCODE ;AT 1ST HAS CODE 


7FCE 2ABD7E 


02910 


LD 


HL, (LOWPT) 


7F18 ED4BA440 


02170 


LD 


BC,(BASBEG) ;GET START 


7FD1 ED5B137E 02920 


LD 


DE, (PROLEN) 


7F1C 3F 


02180 


CCF 


; CLEAR CARRY 


7FD5 14 


02930 


INC 


D 


7F1D E5 


02190 


PUSH 


HL ;SAVE FOR BLOCK MOVE 


7FD6 15 


02940 OUTLP 


DEC 


D ; DECREMENT MSB OF CT 










7FD7 2807 


02950 


JR 


Z, FINISH 


7F1E ED42 


02200 


SBC 


HL,BC ;CALC PROG LENGTH 


7FD9 0600 


02960 


LD 


B,0 ;0 FOR MAXIMUM DUMP 


7F20 22137E 


02210 


LD 


(PROLEN) ,HL 


7FDB CDEF7E 


02970 


CALL 


CSAVE ;SAVE A BLOCK 


7F23 3E02 


02220 


LD 


A, 2 ,- RESULT IF 


7FDE 18F6 


02980 


JR 


OUTLP 


7F25 84 


02230 


ADD 


A,H ;NO PROGRAM 


7FE0 7B 


02990 FINISH 


LD 


A,E ;GET REMNANT 


7F26 AD 


02240 


XOK 


L ;IN MEM 


7FE1 43 


03000 


LD 


B,E 


7F27 CA7200 


02250 


JP 


Z,72H 


7FE2 B7 


03010 


OR 


A ;TEST FOR 


7F2A CDD67E 


02260 


CALL 


PRINT 


7FE3 C4EF7E 


03020 


CALL 


NZ, CSAVE ;SAVE ODD BYTES 


7F2D 46 


02270 


DEFM 


'FILENAME?' 


7FE6 21BC7E 


03030 


LD 


HL,TERM 


7F36 0D 


02280 


DEFB 


13 


7FE9 0603 


03040 


LD 


B,3 


7F37 0606 


02290 


LD 


B,6 


7FEB CDE37E 


03050 


CALL 


BLOCK ,-WRITE AUTO START 


7F39 210B7F 


02300 


LD 


HL,FILNAM+1 


7FEE CDF801 


03060 


CALL 


1F8H ;TURN OFF CASSETTE 


7F3C CD157E 


02310 


CALL 


INPUT ;PUT FILENAME 


7FF1 189B 


03070 


JR 


DUMP 


7F3F CDD67E 


02320 


CALL 


PRINT 




03080 ; 






7F42 0A 


02330 


DEFB 


10 




03090 ; 


FOLLOWING CONVERTS fcEGODTNG PROGRAM 


7F43 41 


02340 


DEFM 


'ACCESS CODE?' 


INTO 








7F4F 0D 


02350 


DEFB 


13 




03100 ; 


A SUBROUTINE IN ORDER TO RESTORE BAS 


7F50 21317E 


02360 


LD 


HL,ACCODE 


IC 








7F53 0614 


02370 


LD 


B,ACLEN 




03110 ; 


PROGRAM IN MEMORY. IT CALLS THE DEC 


7F55 CD157E 


02380 


CALL 


INPUT 


ODE 








7F58 CD557E 


02390 


CALL 


CODEWD ;GET CODE VALUE 




03120 ; 


SEGMENT, SUPPLIES THE KEYCODE IN (D) 


7F5B 327B7F 


02400 


LD 


(SPOT1) ,A 


AND 








7F5E 32FC7F 


02410 


LD 


(SPOT2) ,A 




03130 ; 


JUMPS INTO THE UNSCRAMBLED DECODING 


7F61 57 


02420 


LD 


D,A ;PUT IT IN D 


SECTION 








FIELD OVERFLOW 








03140 ; 


RETURN 


TO BASIC IS AUTOMATIC 


7F62 3EFF 


02430 


LD 


A,-l JDISABLE BREAK 




03150 ; 






7F64 321B7E 


02440 


LD 


(DSABL) ,A ;IN INPUT 


7FF3 3EC9 


03160 FINAL 


LD 


A,0C9H ; RETURN OPCODE 


7F67 7E 


02450 ENCL 


LD 


A,(HL) ;GET BYTE 


7FF5 32D47E 


03170 


LD 


(CONVRT) ,A 


7F6 8 AA 


02460 


XOR 


D jMODIFY IT 


7FF8 CDBF7E 


03180 


CALL 


ENTRY2 


7F69 77 


02470 


LD 


(HL) ,A ;1ST CHANGE FOR 


7FFC 


03190 SPOT2 


EQU 


S+l 


7F6A 23 


02480 


INC 


HL 


7FFB 1600 


03200 


LD 


D,0 ;CODE WORD IS RECOVERED 


7F6B 10FA 


02490 


DJNZ 


ENCL ; TRANSMITTED CODE 


7FFD C3A57E 


03210 


JP 


FOLLOW 


7F6D ED4B137E 02500 


LD 


BC, (PROLEN) ;MOVE LENGTH 


3C00 


03220 


ORG 


3C00H ;VIDEO MESSAGE 










3C00 20 


03230 


DEFM 




7F71 11117E 


02510 


LD 


DE,INIT-1 








' 


7F74 El 


02520 


POP 


HL 


3C40 20 


03240 


DEFM 


i * * * LEVEL I 


7F75 2B 


02530 


DEC 


HL ;BACK UP ONE TO PROG 


I BASIC CENSOR * * * 




1 


RAM 








3C80 20 


03250 


DEFM 


' VERS. 2 (C) 


7F76 EDB8 


02540 


LDDR 


; BLOCK MOVE IT 


1981 STEPHEN MILLS 




' 


7F7 8 13 


02550 


INC 


DE ;BUMP UP 


3CC0 20 


03260 


DEFM 


' CONVERTS RESIDENT BASIC 


7F79 EB 


02560 


EX 


DE,HL ;GET LOW IN HL 


PROGRAM TO 


LIMITED ACCESS 


SYSTEM 


' 


7F7B 


02570 SPOT1 


EQU 


$+1 


3D00 20 


03270 


DEFM 


' FORMAT OUTPUT. USER H 


7F7A 1600 


02580 


LD 


D,0 ;CODE WORD IS HERE 


UST SUPPLY SYSTEM FILENAME 


(UP TO 


' 


7F7C 22BD7E 


02590 


LD 


(LOWPT) ,HL 


3D40 20 


03280 


DEFM 


' 6 CHAR) AND SECURITY CO 


7F7F CD6C7E 


02600 


CALL 


DIVIDE ; ENCODE 


DE (UP TO 26 


CHARACTERS) . 




' 


7F82 06A6 


02610 


LD 


B, FIRST 


3D80 20 


03290 


DEFM 


1 * AFTER ENCODED TAPE I 


7F84 21157E 


02620 


LD 


HL, INPUT 


S RELOADED, 


SECURITY CODE 


MUST BE 


' 


7F87 3E2E 


02630 


LD 


A, KEY ; SCRAMBLER 


3DC0 20 


03300 


DEFM 


' TYPED IN IMMEDIATELY & 


7F89 86 


02640 LOOP 


ADD 


A,(HL) ;MIX IT 


CORRECTLY WHEN *? PROMPT 


APPEARS 


■ 


7F8A 77 


02650 


LD 


(HL) ,A 


4020 


03310 


ORG 


4020H ; CURSOR STORAGE 


7F8B 23 


02660 


INC 


HL 


4020 C03D 


03320 


DEFW 


3DC0H ;SET CURSOR BELOW ME 


7F8C 10FB 


02670 


DJNZ 


LOOP 


SSAGE 








7F8E CDD67E 


026 80 DUMP 


CALL 


PRINT 


7F0B 

00001 TOTAL 


09999 
ERRORS 


END 


RUN 



be informed until after the 
security check. At this point the 
Basic program is in accessible 
memory and everything is nor- 
mal. If the security code is not 
correctly entered, all memory 
(up to 16K) will be erased. 

Level II Censor 

The Level II version of Censor 
(see Program Listing 2) is longer 
and more complex than that for 
Level I, mainly because of the 
greater flexibility of Level II. 
Without software control, the 
Level I user is tightly bound to 
ROM, while the knowledgeable 
Level II user can move about 
freely in the system. I have 
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therefore gone to somewhat 
greater lengths to defeat the 
meddler. In the Level II version, 
the secured program code is 
scrambled. The control pro- 
gram, as it is recorded, is mostly 
encrypted, and the security 
code itself is doubly encrypted 
and never decoded. The Level II 
version has memory require- 
ments: Although it is not 
necessary to reserve memory, 
there must be 500 bytes of 
memory left above the Basic 
program for Censor to occupy. 
Censor does perform a test to 
determine if there is a conflict. 
Censor can be transcribed 
through an editor/assembler or 



a monitor program, or it can be 
produced directly from Basic by 
means of POKEs. The first 
method is most convenient; 
however, because Censor con- 
tains discontinuous sections of 
code, which T-Bug is incapable 
of outputting. Also, the as- 
sembler technique makes it 
easy to revise Censor for dif- 
ferent memory configurations 
(simply change the ORG ad- 
dress in line 240). 

If you are a 16K user, who can- 
not use this method, you have an 
alternative in Program Listing 3. 
This Basic program provides a 
way of producing Censor as a se- 
cond-generation program. Cen- 



sor is contained in the data state- 
ments of Listing 3, along with a 
USR function program that does 
the output (T-Bug users who have 
already put the program in mem- 
ory need only transcribe the first 
two lines of data, if they change 
the value of S in line 140 to 
32273). With memory size set to 
32160, run the program in Listing 
3. It will POKE the Censor pro- 
gram into place, performing a 
checksum test of the data as it 
does so. If all is well, the program 
will allow you to make multiple 
recordings of Censor. During re- 
cording, the video message for 
Censor appears on the screen; it 
should not be omitted because 
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the lower portion of video mem- 
ory is beingdumped onto tape. 

When you are ready to use 
Censor to protect a resident 
Basic program, enter the system 
mode and load Censor from cas- 
sette. During the load, informa- 
tion about the use of Censor will 
be written directly onto the 
screen, cutting down the 
memory requirements for the 
program itself. Also during the 
load, keyboard control (in the 
keyboard Device Control Block) 
is restored to ROM. This last fea- 
ture is important if you are using 
keyboard utilities which reside in 
high memory (like a debounce 
routine or an encoding utility like 
UNIKEY). Without this correc- 
tion, a system crash would prob- 
ably result. 

When the cassette has stopped, 
enter "/" to start the program. 
Because the output of Censor is 
a system tape, it is necessary to 
assign a file name for the record- 
ing. This six-character label is 
not part of the security code, and 
need have no connection at all 
with the code. When that has 



been entered, the program re- 
quests an access code. Here 
type in your security code (up to 
20 characters). Now Censor is 
ready to dump your program in 
encrypted form. It will permit 
multiple dumps, stopping and re- 
turning to the command mode 
when you press the Break key. 

To reload the protected pro- 
gram, you must get into the 
System mode and enter the 
filename you have assigned to 
the program. Censor converted 
your Basic program to this for- 
mat because, unlike Level I, the 
Level II CLOAD function does 
not derive program addresses 
from the cassette itself. Instead, 
Level II simply buffers the pro- 
gram wherever its pointers dic- 
tate. This makes it very easy to 
merge programs in Level II 
Basic, but it also makes it im- 
possible to usurp control from 
ROM during the load. In the 
System format, on the other 
hand, the loaded program is 
stored according to informa- 
tion read from the cassette. 
Therefore, the tape can insert 
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an address which redirects the 
program counter to Censor's 
control program. In this case, 
we do not write directly into 
the stack (as in Level I), but 
change the System vector ad- 
dress 41 E2H to41E4H. 

When the load is completed, a 
bogus System prompt sans cur- 
sor will appear. At this point 
type in the correct security code 
for your program. You will note 
that the control program ex- 
ecutes an automatic carriage 
return after the prompt, a clear 
reminder to the user that a con- 
trol program is operating. This 
input process is very stringent: 
No breaks, clears or backspac- 
ing will be permitted, so be 
careful what you type. 



If the entered security code is 
correct, the Basic program will 
be decoded and transferred to its 
normal location (beginning at 
42E9H), at which point it is ready 
to run. If the control program is 
not satisfied, a system crash will 
result, erasing the program, fill- 
ing the screen with vibrant gar- 
bage and causing an unreset- 
table lock-up. This dramatic 
touch is intended to frighten off 
the more naive meddlers ("Oh- 
oh! I've broken it now!"). If the 
user finds this annoying, a slight 
modification of the Kill routine in 
Listing 2 should take care of it. 

After all, it seems that the 
popular TRS-80 can be trained to 
keep secrets. If only it were so 
easy with all our friends . . . ■ 



LEVEL II CENSOR BASIC VERSION 



IB CLS: PRINT" 

LEVEL II CENSOR (C) 19 81 STEPHEN MILLS 

20 PRINT" 

Basic-based first generation program 
Requires MEMORY SIZE? set to 32160 

30 REM T-BUG USERS WHO HAVE ENTERED MAIN 

PROGRAM INTO 7E12H TO 7FFFH ONLY 
NEED DATA LINES 50-60 * MUST 
CHANGE VALUE OF S TO 32273 (LINE 140) 
40 F0RX=13TO94:SET(X,4) :SET(X,10> :NEXT: FORX=5T09 : SET{ 13 ,X) :SET(9 
4,X) :NEXT 

50 DATA33, 191, 126, 34, 227, 65, 33 ,227, 3, 34, 22, 64, 33, 192, 61 ,34, 32, 64 
,17 5,205,18,2,205,135,2,33,246,125,6,7,205,227,126,33,32,64,6,2, 
205,239,126,33,22,64,6,2,205,23 9,126,33,227,65,6,2,205,239,126,3 
3,18,126,17,238,1,205,253,125,33,0,60,17 

60 DATA0, 2, 205, 2 53, 125, 6, 3, 33, 15, 126, 205, 227, 126, 19 5, 248, 1,85, 67 
,6 9,7 8,83,7 9,82,20,21,40,7,6,0,205,239,126,24,246,123,183,200,67 

,195,239,126 

70 DATA1 20, 11, 127, 19 9, 0,0, 2 29, 19 7, 20 5, 43, 0,2 54, 1,202, 2 5, 26, 2 5 4,1 

3,40,42,254,32,56,240,119,35,205,51,0,16,233,193,225,201,205,214 

,126,66,65,83,73,67,32,83,80,79,73,76 

80 DATA69, 6 8, 13, 19 5, 114, 0,1 1,35, 120, 177, 192, 225, 225, 201, 54, 32, 35 

,16,251,4,24,212,175,197,229,6,19,134,35,16,252,225,193,15,201,1 

75,103,76,105,92,22,60,69,237,176,237,75,19,126,229,126,170,119, 

205,6 9,126,126,237,103,205,6 9,126,126,47,119 

9 DATA2 05, 6 9, 126, 2 4, 23 6, 2 05, 214, 126, 10, 4 2, 6 3, 13, 3 3, 226, 126, 6, 20 

,205,21,126,205,85,126,17,49,126,79,26,19,169,17 4,32,193,35,16,2 

47,81,42,189,126,205,108,126,237,75,19,126,237,91,164,64,237,176 

,237,83,249,64,195,114,0,120,0,0,62,201,50,226,65,6,166,33 

100 DATA20, 126, 14, 46, 35, 126, 245, 145, 119, 241, 7 9, 16, 247, 24, 175, 227 

,126,35,205,51,0,254,13,32,2 47,227,201,0,126,245,129,7 9,241,205, 

100,2,35,16,245,201,62,60,205,100,2,1-20,205,100,2,125,7 9,205,100 

,2,124,205,100,2,129,79,205,2 27,126,121,195,100,2,85,17,18,126 

110 DATA42, 249, 64, 229, 237, 82, 225, 210, 49, 126, 237, 75, 164, 64, 63, 229 

,237,66,34,19,126,62,2,132,173,202,114,0,205,214,126,70,73,76,69 

,78,65,77,69,63,13,6,6,33,11,127,205,21,126,205,214,126,10,65,67 

,67,6 9,83,83,32,67,79,6 8,6 9,63,13,33,49,126,6,20,205,21,126 

120 DATA20 5, 85, 126, 50, 123, 127, 50, 252, 127, 87, 62, 255, 50, 27, 126, 126 

,170,119,35,16,250,237,7 5,19,126,17,17,126,225,43,237,184,19,235 

,22,0,3 4,189,126,205,108,126,6,166,33,21,126,62,46,134,119,35,16 

,251,205,214,126,10,76,79,65,68,32,67,65,83,83,69,84,84,69 

130 DATA1 3, 2 05, 43, 0,2 5 4, 1,40, 7 6, 183, 40, 246, 62, 19 5, 5 0,2 26, 6 5, 17 5, 

205,18,2,205,135,2,33,10,127,6,7,205,227,126,33,18,126,6,209,205 

,23 9,126,6,3,33,226,65,205,23 9,126,42,189,126,237,91,19,126,20,2 

1,40,7,6,0,205,239,126,24,246,123,67,183,196,239 

140 DATA1 26, 33, 188, 126, 6, 3, 205 ,227, 126, 205, 24 8, 1,24, 155, 62 ,201, 5 

0,212,126,205,191,126,22,0,195,165,126 

150 POKE16562,l 25 :POKE16527, 125 :POKE16 526,1 58 :POKEl 6561, 158 :CLEA 

R50:DEFINTN-S:S = 32767:FORL='32160TOS:PEADN:C=C+N:POKEL,N:NEXTL 

160 IFS=32767ANDC=65431THF,N180 

170 IFSO322730RC<>11263THENPRINT"BAD DATA":END 

180 PRINT" 

*** PREPARE FOR CASSETTE OUTPUT ***" 
190 A$ = INKEY$:IFA$OC1IR$(13)THKN190 
200 CLS:PRINTg79,"* * * LEVEL II BASIC CENSOR * * *", 3143 , "Vers . 

2.2 (c) 1981 Stephen Hills" 
210 PRINT@196, "CONVERTS RESIDENT BASIC PROGRAM TO LIMITED ACCESS 
SYSTEM" ,£260, "FORMAT OUTPUT. USER MUST SUPPLY SYSTEM FILENAME 
(UP TO",@324,"6 CHAR) & SECURITY CODE (UP TO 20 CHARACTERS)." 
220 PRINT9388,"* AFTER ENCODED TAPE IS RELOADED, SECURITY CODE 
MUST BE"; @452, "TYPED IN IMMEDIATELY S CORRECTLY WHEN *? PROMPT 
APPEARS" 

230 PRINT0652, "CENSOR SYSTEM TAPE IS NOW BEING RECORDED" : PRINT"T 
HE ABOVE INFORMATION WILL LOADED DIRECTLY ONTO TAPE WHEN CEMSORI 
S USED." 

240 N=USR(0) :M=M+l:CLS:PRlNT'sl92,"Copy";M;"of CENSOR <£ilename> 
has been recorded. ": INPUT"Do you want another copy" ;A$: IFI.EFTSfA 
5,1) <>"Y"THENEND 
250 PRINT"PRESS <ENTER> WHEN CASSETTE IS READY" rGOTOl 90 
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A new adult computer party game that stimulates the 
intellect as well as the libido. How far do you dare to 
go? Your partner? Your friends? It's all under your 
control when you play LIVE DANGEROUSLY. 
LIVE DANGEROUSLY features lively screen 
graphics— though not all the "action" is on the screen. 
As many as 1 2 (or as few as 2) players interact with the 
computer— and with each other. 

LIVE DANGEROUSLY— a game of risk-taking in 
which everybody scores. 

Now available for TRS-80" Model I 
with 32K or 16K and disk (please 
specify). 

Send S19.95 (check, m.o.) to: 
METAPHORICMSOCIATES p;°£M ~ 




'Trademark Ol Tandy C: 



^330 




LOG/CMO create* on a formatted diskette a LOG file <ro<n 1 to I/O pag« 
each page containing 1 full screen of information. Pages ir: ■ 
individually or sequentially. as if thumbing through a book. Inform 
added, updated, or deleted from each page in free form by ar, i 
cursor oriented le.t editor. Each diskette becomes a separate or 
notebook to use arid re use as you please. 



Insert. Delete. Tab, Clear. and full cursor positioning are supi or 
-ell as blinking cursor and auto-repeat. All functions operate ~ith 
uf a single keystroke including Global Search. Output to pri 
provided. LOG can even be accessed from BASIC without loss of prograo 



tion is 
n.egral 
qanired 



n a computer, do you still 
aper ' Use your computer as , 



Call for further infor 

, c .. ^331 

K5of t 

318 Lakeside Dr i ve 

Brandon. MS 39042 



(6011 992-2239 

MasterCard and Vi 
PIS Residents pay 
We pay shipping a 



-idy Corporatl 



PRINTER DRIVER EXTRAORDINAIRE 

wScpSnt 



FDR THE EPSON MX— SO 1 



SUPPORTS «c>i | MX — SO PRINT STYLES 

TOTAL CONTROL PROM TEXT OR MENU 
TRUE PROPORT I ONAL. J UST I P I CAT I ON 
UNDERLINES * SUPERSCRIPTS 

SUBSCRIPTS * CENTERS TITLES 



Maxprint l & an extraordinary printer driver program -for the 
standard Epson MX-80 printer. It allows the user to select print 
types and functions such as underlining on a character by char- 
acter basis from the body of word processing text. A menu mode 
also allows selection of print types, plus choice of margi 
line spacing in 1 / /2 inch increments, and many other featur 

For professional results. Maxprint features true proportio 
right margin justification of printed text in the 10 charac 
per inch emphasized or double emphasized print modes. For ex 
pie, notice the uniform right margin and proportional spacing 
this advertisement text produced entirely with Maxprint and 
MX-80. Justification precludes use of other features. 

This ingenious Liser oriented software consists of over 3K bytes 
of ultra-fast ZOO assembly language for maximum speed printing. 
Minimum system requirements are a '-2k Model I with one disk 
drive. Maxprint will work with most word processing programs 
including Scripsit. Model III version available shortly. 



Unleash the 
suppl l ed or 



.ie potent l al of yc 
ik with extensive i 



Eps 
lual 

«5»5 



HX-80. Max| 

J shipping f< 



Call (408) 737-2233 
Send check or money 

p»aa>'"fcr-o«--»± 

381 First Street, Su 
Los Altos, Call form 



Visa / Mastered 



te 3147 

74022 



1 ol Epson «» 



^333 




QUI GK 

TRS-80# 
Model 
I/III 



Guaranteed to solve any Rubik's 
Cube (TM) or triple your money 
back. Enter 54 color faces of 
cube or let program set up 
random pattern to be solved. 
Program run can be interupted 
to allow user to enter his/her 
own moves. Interesting program. 
Send S19.95 plus ♦1.50 postage & 
handling tos 

Alpha Queue Systems 
Dept. A 

P.O. Box 20885 
Dallas, TX 75220 

Texas residents add 5% ($1.00) 
sales tax. Checks only please. 

# Trademark of Tandy Corp. 

TM Trademark of Ideal Toy Corp. 



■See Lisi ol Advertisers on page 402 



80 Microcomputing, March 1982 • 227 



CALL TOLL FREE ^^^^C V 




SCARF- 
MAN 




From Cornsoft Group 

Action filled arcade game that pits you against 
the monsters. Race your Scarfman around a 
maze, gobbling up scoring dots. You are pur 
sued by five monsters: if you eat a "+" they'll 
lower their eyes and you can eat them, other- 
wise they'll eat you! 

With exciting graphics and sound, SCARF 
MAN may be played using the keyboard or 
Alpha Product's Joystick. WARNING: MAY BE 
HABIT-FORMING! 

Tape. ..16. 95 

Disk (specify mod. I or I II ) . . . $20. 95 

Alpha Joystick 
mod. I: $39.95, mod. Ill: $19.95 

DEFENSE 
COMMAND 




PflOGRflm 
/TORE 

TIME QUEST 

By William Demas from Programmer's Guild 
A classic adventure by one of today's leading 
program authors. You will travel not only 
through space in this game, but through time 
as well. From prehistory to the distant 
future, you must confront many unusual 
dangers as you seek the treasures this prog 
ram holds. Travel through the fourth dimen 
sion for the adventure of a lifetime. 




32K disk. ..$24.95 



DUNJONQUEST 

Sorcerer of Siva 



Crush,Crumble 
and Chomp! 



From Epyx 
It's a monster 



a n ci 



the 




By Hogue £ Konyu from Big Five 
You are the lone defender~of 10 Krotnium fuel 
cells essential for the survival of the planet. 
Aliens swoop down from above to steal the 
fuel; it's your job to destroy them. You can 
still save the cells after a raid, but you must 
shoot the alien and simultaneously move under 
the cell to catch it. If things look bad you can 
set off one of your 4 antimatter bombs and 
destroy all enemies on the screen! Arcade fun 
with action and sound. 

16K tape. ..SIS. 95 32K disk. . . $19. 95 



BRIDGE PARTNER 

By George Duisman from Personal Software 
Whether novice or expert at bridge, this 
program will help you practice and improve 
your play. You and the dummy hand play 
against the computer's skilled defensive 
hands. After a hand is played, the real learn 
ing begins: You can replay the hand to try 
different strategies, replay the two declarer 
hands against new defensive hands, rotate 
the hands, and more. Hands may also be 
saved for future use. Useful and fun. 

Model I 16K tape. .. $19. 95 
Visit our other stores: Seven Corners 



From EPYX 

All the treasures and tools of a Dunjonquest 
await you in the magical mines of Siva. You 
are a wizard in this realtime dungeons £ 
dragons game, wandering through the 
graphic depictions of more than 300 cham 
bers. Your powers are staggering, but not so 
much, perhaps, as the evil wizard. He lurks 
about, hoping to cast his favorite spell, for 
getfulness, which deprives you of your magic. 

16K tape. . .$29.95 
32K disk. ..$29.95 



MEWEV4L 
WAGIC 





monster! You can be The Glob, Kraken, Man- 
tra, Mechismo, Arachnis, or Goshilla -- or 
even design your own "custom" monster (disk 
version only). This hilarious action game is 
loaded with graphics and sound as you prac 
tice your villany. With 6 monsters, t cities, 
and 5 game objectives, you get a choice of 
more than 100 possible scenarios. A monster's 
life is not all carnivorous crunching, though: 
The combined resources of the police, 
science, and armed forces are bent on your 
destruction. 

TRS 80 (16K tape or 32K disk) .. .$29.95 

FORBIDDEN CITY 

By William Demas from Fantastic 
The talking adventure continues, pitting 
your skill against the city's master computer 
and robots. While a continuation of "Forbid- 
den Planet," you don't have to have the 
earlier program to play FORBIDDEN CITY. 

U8K disk... $39. 95 

STONE OF SISYPHUS 

From Adventure Int. 

Relive the wonderment of an ancient era in 
this installment of the Maces £ Magic Series. 
You create your own character using attrib 
utes of IQ, strength, constitution, dexterity 
and charisma. Then arm him and send him into 
a world where man's worth was measured by 
courage and cunning! Includes 2 disks that 
will run on a one-disk system. 
Model I 32K...$29.95 
Model III 48K..$29.95 



MACRO-MONITOR 
...THE SHADOW 



By David Hanes from Liberty 
If you've never tried an adventure came, or if 
you've been "turned off" by the advanced 
games available, here's the adventure for 
you! Designed as an introduction to this form 
of game playing, MEDIEVAL MAGIC allows 
you to develop the approach necessary to 
become an adventurer. Once trapped in the 
ancient castle, you'll not escape until you 
have found all the treasures and tools it 
holds. 

16K tape. ..$13.95 Model I 32K disk. . . $59. 95 

16K disk. ..$17. 95 Model I II 32K disk . . . $69. 95 

Center • Falls Church, VA & W.Bell Plaza • 66OO Security Blvd.- Baltimore, MD 



By Jake Commander from AOS 
A 6K machine language monitor that provide 
incredible power in programming and debug 
aing. In addition to all the monitor functions 
you would expect (like T BUG or DEBUG), 
THE SHADOW gets its name from being able to 
execute programs at a hugely reduced speed. 
This gives you the power to closely monitor 
program flow with complete control. You can 
stop to examine or change registers,' disas- 
semble, or debug. Comes with 2 programs and 
an extensive manual in a sturdy binder. 



EE m TO ORDER CALL TOLL FREE 800 424-2738 



For information 
Call (202)363-9797 



THE PROGRAM STORE ° 

4200 Wisconsin Avenue NW, Dept. 8E03 Box 9609 
Washington, D.C. 20016 



MAIL ORDERS: Send check or M.O. for total purchase 
price, plus $1.00 postage & handling. D.C. residents, add 
6% tax. Charge card customers: include all embossed 
information on card. 



Get the most from your micro with 
software and accessories from one of 
the world's largest selections. 



The 

tTocjram 
Store 



CALL TOLL FREE 

800424-2738 




By Steven Kearns from Acorn 
Gigantic antimatter rocks appear on the Tact 
ical Display Screen of your spacecraft. You 
blast away with lasers and they just explode 
into smaller chunks. To score in this fast ar 
cade game with sound, you must destroy the 
rocks. To stay in the game at all, you must 
avoid them! 

To add to your woes, time bombs appear peri- 
odically. If their timers reach zero BOOM! 
And if that's not enough, the aliens will be 
glad to send out some spaceships loaded with 
antimatter torpedoes. Fire thrusters to move, 
shoot laser cannon, jump to hyperspace — 
anything to avoid the onslaught. One or two 
players can compete, with five levels of diffi- 
culty . 

16K protected tape. . .$19.95 
32K protected disk. ..$19.95 




By John Allen from Acorn 

More features, thrills, and sound than even 
John Allen's famous PINBALL. Once you load 
ASTROBALL into your TRS 80, the arrow 
keys become flipper buttons, the screen be- 
comes the play board, and you become the 
"Pinball Wizard!" 

A flying saucer, spaceships, meteors, and 
black holes add to the fun as your ball realist 
ically zings around the board. ASTROBALL 
will have all your family and friends lining up 
for the pinball action and challenge. Five 
skill levels. 

16K protected tape. ..$19.95 
16K protected disk... $19. 95 




TYPING 
TUTOR 



By Ainsworth 6 Baker from Microsoft 
Speed up your programming and word pro 
cessing with this excellent touch typing in 
structional program. Divided into two sec 
tions, the program first teaches proper finger 
positioning. You practice keying various 
characters, the program adding new ones as 
you progress. In the practice paragraph sec- 
tion, you are evaluated for accuracy and 
rated in words per minute. The program con 
tinuously adjusts to your increasing skill, 
telling you which characters you miss and 
where you are slow. One of the most practical 
programs we know of for TRS 80. 

Model I 16K tape. ..$14.95 



THE 
DOCUMENTER 




From P80NUT Software 

If you would love to De able to document your 
programs with a flowchart but lack the time, 
talent, or inclination, this proqram is for 
you. THE DOCUMENTER will produce a logi- 
cal flowchart directly from any suitable 
BASIC program and print it on the screen or 
most lineprinters. 

You get a flowchart and branch map that will 
help you follow program flow and aid your 
debugging efforts. Even memory-filling pro- 
grams can be broken down into segments and 
flowcharted. 

16K tape. ..$19. 95 32K tape. . .$19.95 

48K tape... $19. 95 

48K tape for disk.. .$29.95 



fvouir. 



r fbi 



By Chuck Acree from Acorn 
A comprehensive genealogical program. It 
quickly and easily sets up a data base that 
holds name, date and place of birth, marriage 
and death information, plus a comment line for 
each ancestor. 

YOUR FAMILY TREE will display/print a com- 
plete ''pedigree" for any family member; a 
3 generation chart may be displayed /printed 
showing the number of known ancestors 
beyond each branch of the tree. The program 
will also display a U.S. outline map showing 
migration across the country. You get full 
search capabilities on any key field. Capaci- 
ties: 16K tape: 15-55 ancestors. 32K tape: 
175, disk: 100. 48K tape: 300, disk: 225. 

16K Tape or Disk.. .$29.95 



PERSONAL 
PROPERTY 
INVENTORY 

By Southern Systems from Hayden 
A special database system for your personal 
effects. This easy to use, easy to maintain 
program holds ITEM, DESCRIPTION, SERIAL 
NUMBER, and VALUE for each item. Especial- 
ly useful for insurance and tax purposes. 
Capacities: 16K-100 records, 32K-300 
records, 48K-500 records. For more storage, 
you can break down items into categories 
(stereo, photography, etc.) and maintain 
separate files. 

16K tape... $14. 95 

ACCEL 2 

BASIC COMPILER 

From Allen Celder 

Turns your BASIC program into a machine 
language/BASIC hybrid that may run many 
times faster. For those who plan to sell their 
programs, compiling by ACCEL 2 offers the 
additional advantage of protection : the source 
code and REMarks are not included in the 
compiled version. 

While all compilers may require some modifica- 
tion of the BASIC program (usually because 
of improper structuring), we have found that 
ACCEL 2 requires the least, and even works 
with program "tricks" like string-packing, 
etc. 

ACCEL 2 works with models I or III, requires 
a minimum amount of memory, supports either 
disk or tape (with TSAVE, optional at $9.95), 
and does not require extensive rewriting of 
your BASIC programs. Unlike other compil- 
ers, no royalty is required when selling 
ACCEL-compiled programs. 

Supplied on tape for 16-48K . . . $88. 95 



EDIT 



From Allen Celder 

A powerful utility for editing BASIC pro- 
arams. Allows full-screen, word processor- 
-type editing to save you time and frustra- 
tion. This machine language program loads 
into upper, protected memory and is invisible 
until invoked from the keyboard. 

EDIT uses a command structure similar to the 
popular SCRIPSIT word processor, so it is 
easy to use right away. Block and global 
commands are supported, so deletions, re- 
placements and other changes to the entire 
proqram are extremely easy to do. 

16-48K relocatable tape for tape or disk 
systems.. .$39.95 



MONEY MANAGER WSASSEMBLER 



By Andrew P. Bartorillo from Acorn 
A complete management tool for the home bud- 
get, it accurately keeps track of your check- 
book and provides an easy method of budget 
allocation. You can store information on up to 
100 checkbook entries per month (250 with 
48K), specify any automatic withdrawals, 
keep records of tax-deductibles, and record 
expenses by category. You can even break up 
charge account payments into the proper 
categories. 

32K disk... $39. 95 

Prices Subject lo Change 



By Roy Soltoff from Misosys £ Acorn 
A two-pass disassembler for TRS-80 that con- 
verts machine code to Z-80 assembly language 
listings. DISASSEMBLER produces symbolic 
labels with output to video, printer or tape 
(or disk in version 2 only) . Radio Shack's 
Editor/Assembler will read and load the tapes 
for easy modification and reassembly. Extend 
the capabilities of Editor /Assembler with this 
utility. On tape for two different memory loca- 
tions. 

Version 1.. .$14.95 
Version 2.. .$19.95 



THE PROGRAM STORE ♦ Pept8E03Box9606- 4200 Wisconsin Ave, NW • Washington, D.C. 20016 



Item 



Price 



Postage $1.00 
Total 

□ CHECK a VISA 
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addr 
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TECHNIQUE 



Use Basic's ON ERROR-GOTO function to get out of trouble! 



To Err Is . . . Okay 



Richard S. Adcock 
141 NW Lorna 
Burleson, TX 76028 

It's 3:10 AM and dark outside. 
It is probably Thursday though 
you're no longer certain. You ac- 
cidentally enter a instead of 
$522.36. Your TRS-80 might re- 
turn a "10" error message. Even 
late at night this may not present 
a severe problem. All you may 
have to do is restart the program 
and be more cautious the next 
time. On the other hand, $522.36 
may have been number 72 of 75 
data entries, 71 of which you 
have just entered for the fourth 
time in your diligent effort to bal- 
ance your checkbook. You again 
type in "RUN", realizing that all 
your variables will be reduced to 
a pile of useless zeros. 

All is not lost. The Basic inter- 
preter inside your TRS-80 allows 
you to bypass its built-in error 
handling routines. You can take 
those errors, slap them around a 
bit and create something which, 
though not always useful, is at 
least somewhat less destruc- 
tive. You will write your own er- 
ror handling routines, in Basic. 

A user written error handling 
routine contains two parts. The 
first part inserts a statement 
early in the program which func- 
tions as the door to an error trap. 
In a TRS-80 this statement takes 
the form of: "On Error GOTO 



nnnn." Most people wish it had 
more teeth. (The device is less 
humane than it appears. I once 
returned to an error trap several 
days after it was sprung to find 
that the error had gnawed off its 
number to escape. All my usual- 
ly verbose Model III could say 
when I asked, "CMD E?" was, 
"NO ERROR FOUND!".) The 
"nnnn" refers to a line number 
which contains the error handl- 
ing routine. It tells the computer 
what to do if any errors are 
caught. Basically, there are four 
options to an error handling 
routine: Print a number related 
to the error which just occured 
using "Print Err." Print the line 
number in which the error occur- 
red using "Print Erl." Take some 
action based on the nature of 
the error. Reset your computer's 
built-in error handling routines. 
You will often use several of 
these options simultaneously. 

Rules 

Building an error trap is not 
difficult, but as with most pro- 
gramming you must follow def- 
inite rules. 

First rule: isolate the error 
handling routine from your pro- 
gram. If you neglect to isolate 
the error handling routine off in 
some corner, you will probably 
generate an RW error. This 
means Resume without Error 
and only including an error 



handling routine in your pro- 
gram can cause it. 

Second rule: the error han- 
dling routine must terminate 
with "Resume." Your 
"Resume" statements may 
assume several forms. "Re- 
sume" prompts the computer 
to pick up where the error oc- 
curred. The "Resume 0" does 
the same thing as the unadorn- 
ed "Resume." "Resume nnnn" 
tells the computer to try 
another part of your program 
where there should be fewer 
bugs. Finally, "Resume Next" 
sends the computer to the 
statement following the one 
where the error occurred. 

If you fail to include a "Re- 
sume" statement of some sort, 
you will have committed "NR", 
no resume, which is an error 
that can only happen when 
handling errors. 

The following program incor- 
porates an error routine: 

5 ON ERROR GOTO 1000 
10 INPUT "INPUT A NUMBER";A 
20 INPUT "INPUT ANOTHER 

NUMBER";B 
30 X = X + 1 
40 B = B + A 

50 PRINT "AVERAGE = ";B/X 
60 GOTO 10 
1000 IF ERR/2 + 1 = 11 THEN PRINT 
"YOUR FIRST NUMBER WAS A 
ZERO. TRY AGAIN. ":RESUME 10 
1010 ON ERROR GOTO 

Line 5 tells the computer to han- 
dle errors your way. No more 
vague messages and zeroed 



variables. The program uses two 
"On Error GOTO nnnn" state- 
ments. This is legal, and quite 
useful. If you have been having 
syntax troubles in a subroutine, 
before you can check that part 
of the program, you must enter 
tedious data. You can use an er- 
ror handling routine which sim- 
ply points out the syntax error 
and then performs a "Resume 
nnnn" at the first line of the sub- 
routine. If another error occurs 
you will still resume at the first 
line of the subroutine. By setting 
several different error traps 
each with its own "nnnn," you 
can utilize a different error han- 
dling routine for each part of the 
program. This enhances the use- 
fulness of an error handling rou- 
tine immensely. In the example, 
if the If ... Then statement in line 
1000 fails, the statement in line 
1010 will restore the computer's 
built-in error handling routines. 
The now enabled built-in rou- 
tines will display both the error 
and its line number. This forces 
a restart which zaps the data, 
but we need to know what the er- 
ror is and often the built-in rou- 
tines are the easiest way to get 
that information. 

The error we are trying to trap 
in the example is division by 
zero. The key to trapping a par- 
ticular error is the "ERR/2 + 
1 =nn" statement. By replacing 
"nn" with one of the numbers in 
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Now NRI takes you inside the 

new TRS-80 Model III microcomputer 

to train you at home as the 

new breed of computer specialist! 



NRI teams up with Radio Shack 

advanced technology to teach 

you how to use, program and 

service state-of-the-art 

microcomputers . . . 
It's no longer enough to be just a 
programmer or a technician. With mi- 
crocomputers moving into the fabric of £ 
our lives (over 250,000 of the TRS-80™ J 
alone have been sold), interdiscipli- 
nary skills are demanded. And NRI can 
prepare you with the first course of its 
kind, covering the complete world of 
the microcomputer. 

Learn At Home 
in Your Spare Time 

With NRI training, the programmer 
gains practical knowledge of hardware, 
enabling him to design simpler, more effec- 
tive programs. And, with advanced pro- 
gramming skills, the technician can test 
and debug systems quickly and easily. 

Only NRI gives you both kinds of 
training with the convenience of home 



Training includes new TRS-80 Model III micro- 
computer. 6-function LCD Beckman multimeter, 
and the NRI Discovery Lab with hundreds of tests 
and experiments. 

(TRS-80 is a Irademark of the Radio Shack division of Tandy Corp.) 





study. No classroom pressures, no night 
school, no gasoline wasted. You learn at 
your convenience, at your own pace. Yet 
you're always backed by the NRI staff and 
your instructor, answering questions, giving 
you guidance, and available for special help 
if you need it. 

You Get Your Own Computer 
to Learn On and Keep 

NRJ training is hands-on training, 
with practical experiments and demonstra- 
tions as the very foundation of your knowl- 
edge. You don't just program your computer, 
you go inside it... watch how circuits in- 
teract . . . interface with other systems. . . 
gain a real insight into 
its nature. 

You also work 
with an advanced liquid 
crystal display hand- 
held multimeter and 
the NRI Discovery Lab, 
performing over 60 
separate experiments. 
You learn troubleshoot- 
ing procedures and gain 
greater understanding of 
the information. Both 
microcomputer and 
equipment come as part 
of your training for you 
to use and keep. 



Send for Free Catalog. . . 
No Salesman Will Call 

Get all the details on this exciting 
course in NRI's free, 100-page catalog. It 
shows all equipment, lesson outlines, and 
facts on other electronics courses such as 
Complete Communications with CB, 
TV/Audio and Video, Digital Electronics, 
and more. Send today; no salesman will ever 
bother you. Keep up with the latest technol- 
ogy as you learn on the latest model of the 
world's most popular computer. If coupon 
has been used, write to NRI Schools, 3939 
Wisconsin Ave., Washington, D.C. 20016. 




NRI Schools 

McGraw-Hill Continuing 

Education Center 
3939 Wisconsin Avenue 
Washington, D.C. 20016 



NO SALESMAN WILL CALL. 

Please check for one free catalog only. 

□ Computer Electronics including 
Microcomputers 

□ Color TV, Audio, and Video System 
Servicing 

□ Electronics Design Technology 

□ Digital Electronics 

□ Communications Electronics • FCC 
Licenses • Mobile CB • Aircraft • Marine 




□ Basic Electronics 

□ Small Engine Servicing 
D Appliance Servicing 

D Automotive Servicing 

□ Auto Air Conditioning 

□ Air Conditioning, Heating. 
Refrigeration, & Solar Technology 

□ Building Construction 



.Name 



Street 



(('lease Print) 



■ City, State/Zip 

I Accredited by the Accrediting Commission of the National Home Study Council 



#179-032 
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AND 



, ,■ COLOR 

ALL PROGRAMS USE TESTED 

MICRO -TYPIT A text editing program that uses the keyboard 
"as is" like a typewriter. All edit and prompt functions are 
"built in" so instruction or learning is minimum. Text can be 
generated three pages at a time and printed either numbered, or 
unnumbered single or double spaced. Also, right justification 
is optional. Does not require substitution of <s> for commas or 
any other character revision. Slowest function is transferring 
text to and from tape. Neat error free text with large print 
titles. Excellent for specifications, agreements, instructions, 
form letters or announcements. Complete with sound for TRS-80 
I, III & COLOR and Microteck printer easily adaptable to most 
other printers. PRICE $25.00 

CLIENT FILES Allows keeping several contracts for up to 20 
clients. Enter contracts including either payment amounts or 
percentages. As bills are sent out and payments received, the 
programis a record by contract of amounts outstanding and not 
billed including a summary of receivables and work in progress. 
Works well with one to 3 projects for a dozen or so clients. 

PRICE $25.00 

ENGINEERING PROGRAMS 

LIGHTING CALCULATIONS Calculates the required number of 
fixtures for a room given the dimensions and reflectances by 
the zone cavity method. _ Three standard fixtures are "built in" 
so that 8 room calculations are made to compare results such as 
watts, foctcandles and number of fixtures. PRICE $30.00 

HVAC PROGRAM This program calculates sensible and latent 
cooling and heating load by zone each two hours of the typical 
hottest and coldest days. Equations per 19?? ASHRAE Fundamental 
Guide page 25.2. Three programs are: Calculations, Geographic 
and Variable Data and Data Generator. PRICE $35.00 

All tapes furnished with full documentation and instructions. 
Documentation, Instructions and Source List alone $15.00 

All programs on tape require Level II and 16K. Printer is 
required for MICRO-TYPIT and optional on all others. Do not 
forget to include the Model Type with your order. 

Send Check or Money Order (no COD's please) to: 

Coolidge St Associates 



2050 S. LAMAR #10 



AUSTIN , TEXAS 78704 



(512) 443-5329 
^170 



the appendix of your reference 
manual under error codes you 
can set the number for any spe- 
cific error. If you check the ap- 
pendix, 11 corresponds to a "10" 
error. A lot of other numbers and 
error codes are also back there. 
They are why it is often easier to 
resort to the "On Error GOTO 0" 
statement rather than trying to 
cover all possibilities yourself. If 
you don't expect any particular er- 
ror and use a simple "Resume", 
you could put the computer into 
the endless loop of error, resume, 
commit error. . . . You might as 
well let the computer handle the 
problem. The results will be about 
the same. 

The formula "ERR/2 + 1 " iden- 
tifies which error has occurred. 
If you include a "Print Erl" 
statement in your error handling 
routine it will tell you the line 
where the error occurred. This 
can be useful information espe- 
cially in the event that your ex- 
pected error occurred but not 
where you think it did. It is easy 
to spend a lot of time looking for 
a bug at one point which is really 



somewhere else. The "Print Erl" 
statement can help you avoid 
trying to fix something that's 
not broken. 

One final trick is available to 
you when you're setting up an 
error handling routine. The "Er- 
ror nn" statement makes the 
computer think a specific error 
has occurred. By inserting the 
"Error nn" statement in your 
program and replacing "nn" 
with the numeric code for the er- 
roryourroutineishandling(11 in 
my example), you can check 
the routine long before you need 
it. This gives the computer a 
chance to practice, and helps 
you avoid another source of in- 
finite frustration, the error trap 
that won't. 

Error trapping is a useful addi- 
tion to any program and can 
save time and frustration when 
you debug or run the thing that 
you have newly created. ■ 

Richard Adcock is president of a 
Fort Worth-based company spe- 
cializing in custom applications 
for microcomputers. 



TELEWRITER 



Word Processing for the Color Computer 



51 column x 24 line screen display Real lower case characters 
Sophisticated full screen editor Powerful format features 
Works with any printer Special MX-oO driver 
Runs in 1 6K or 32K Disk and cassette I/O 
Absolutely no hardware modifications required 



As a Color Computer 
owner, you know you've got 
the most powerful lo-cost 
computer available today. 
You also know that its one 
glaring weakness is its too 
small (32 by 16) screen 
display. For serious word 
processing, that's simply 
inadequate. And reverse 
video in place of lower case, 
just makes things worse. 

Telewriter eliminates these 
shortcomings by creating a 

Apple II is a trademark of Apple Computer 



whole new character set 
that gives you real lower 
case letters, and a 51 x 24 
screen display. That's more 
on-screen characters than 
Apple II, Atari, or the Model 
III. That's more than double 
the Color Computer's 
standard display. And, 
because Telewriter solves 
the screen display problem 
entirely in software, there 
are no expensive hardware 
mods to install. Telewriter 



is ready to use the moment 
you receive it. 

Telewriter's feature-packed 
full screen editor lets you 
enter and edit text quickly 
and simply. The powerful 
text formatter lets you 
specify exactly the way 
your final manuscript will 
look — using any printer. 
The disk and cassette 
handlers painlessly store, 
retrieve and append your 
text files and let you 



transfer easily between 
media. 

You can no longer afford to 
be without the power and 
efficiency word processing 
brings to everything you 
write. The TRS-80 Color 
Computer is the lowest 
priced micro with the 
capability for serious word 
processing. Telewriter is the 
only software that fully 
unleashes that capability. 



Inc.; Atari is a trademark of Atari. Inc.' TRS-80 is a trademark of Tandy Corp.; MX-80 is a trademark of Epson America. Inc. 



Available now ior $49.95 from: 

Cognitec 

704 Nob Ave. 

Del Mar, Ca. 92014 



. . . a state of the art word processor . . . Outstanding in every respect. 

— the RAINBOW 
The 51 x 24 display is very legible . . . 

— Coloi Computer News 

(Free shipping in U.S.. California residents add f>'i sales tax. Personal checks require 2 weeks to clear.) 



w 121 



Or call (714) 755-1258 

for more information. 

We will gladly 

answer your questions. 
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NIX-80 



emse 



HUX-80F/T 



MX-100 

E.llL'liUf'ilhviI 
i 



MM 




25cps parallel S 1380 ascps parallel 

TYPEWRITER QUALITY » FRICTION FEED • DAISYWHEEL 



MICR0LINE80 $385 



MICR0LINE82A 5 529 



MICR0LINE83A 5 755 



JDS MODEM 
UDS MODEM 
LEXICON MODEM 



10SIP 
105JLP 
IEX-11 



MICROLINE 82A & 83A 
FEATURES: 120cps • 
9x9 dot matrix 
• true lower descenders 



■M.^lrUMlWrPJETOE 



DIRECT 
AUTOANSWER 
ACOUSTIC COUPLED 



s 169 
s 210 

s 125 



SC OTCH 5M D ISK ETTES 

P.O. BOX 305 
MASSAPEQUA, NY 11758 



TERMS: M.O.. Certified or Cashier's Check 
Allow 2 weeks for personal checks. 
NY Stale residents, add sales tax 



8 "SSSD 10/52.79 ea. 50/$2.69ea. 
5V4"SSSD 10/52.69 ea. 50/52.59 ea. 



(516)798-7048 



visa/MasterCard: Add 2% 
FOB. Shipping Point 
PRICES SUBJECT TO CHANGE. 



THE BIGGEST NAME IN LITTLE COMPUTERS" 

TRS-80 Model H— Your Best Buy 
In a Business Microcomputer 




TRS-80 computers, on 
software and peripherals 

Similar values on all merchandise 
CALL COLLECT: 

800-351-1580 

Texas Residents call: 915-283-2920 

Van Horn Office Supply ^ 

701 W. Broadway - P O Box 1060 
Van Horn, Texas 79855 

DEALER G055 ^g" 

Form F48 Provided aam BB 

Standard Warranty in Effect 

THE NATIONWIDE SUPERMARKET OF SOUND' 




VERBATIM 
DATALIFE 



A FREE plastic box of Verbatim Data-Life Diskettes 
when you purchase an APPARATS NEWDOS/80, 
2.0 for only $149.95. 

Copy Model III Scripsit© 
and Visicalc -$20.00 

Works with the New Model III Visicalc/Scripsit and 
allows unlimited backups of master disks. Works 
even if you have already backed up twice. Comes 
as a simple 17 line basic program. 



ST80D© Patch, 
only $20.00 

Makes your Model I ST80D 
work on Model III. Comes as 
a simple 30 line basic pro- 
gram. (Version 1.3/1.4 only.) 



Layman's Guide 
toNewdos$7.50 

An easy-to-understand, plain 
English guide to the most 
commonly used features of 
NEWDOS/80. 



VISA - Mastercard - Money Orders - COD - Allow 2 weeks for 
personal checks. Kansas residents add 3.5% sales tax. 




J* XL, 
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.TJiL.xurc 

526 E. 4th / Hutchinson, Kansas 67501 / 316/665-3611 




■<^ 



<^ 




RS201 



Attache style cases for carrying and protecting a complete computer set-up. 
Constructed of the highest quality luggage material with saddle stitching Will 
accommodate equipment in a fully operational configuration along with 
manuals, working papers and disks. Never a need to remove equipment 
from case. Simply remove lid, connect power and operate. Lid can be 
replaced and locked for security and protection without disconnecting 
cables Fully tested 

• RS201 TRS-80 Model I, Expansion Unit & Drives . . $109 

• RS202 TRS-80 Monitor or TV set 84 

• RS204 TRS-80 Model III 129 

• RS205 Radio Shack Color Computer 89 

• P401 Paper Tiger 440/445/460 99 

• P402 Line Printer ll/IV 89 

• P403 Epson MX70 or MX80 89 

• P404 Epson MX1 00 99 

• CC90 Matching Attache Case 75 

compuTer case company 

5650 INDIAN MOUND CT COLUMBUS, OHIO 43213 (614) 868-9464 

^ 139 



■See Lis! ol Advertisers on page 402 
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GENERAL 



When one-way is the wrong way. 



Two- Way ANOVA 



Richard C. McGarvey 
221 Hirsch field Drive 
Williamsville, NY 14221 

I bought my first computer in 
order to speed up my study 



time while taking some re- 
quired courses in Statistical 
Analysis. When I bought the 
computer I expected to be able 
to find the necessary statistical 



Harmonic Mean 








p = # of Factors (cells) Level A 








q = # of Factors (cells) Level B 








N sub n = number of scores in cell n 








p • q 1 

Pn " _L_ , _i_'N n 
N, + N 2 








Sum of Squares 








•* ■ »£# -(£)! -e . B „c# 


<f 


o: 




•*--*&(«?)♦(£) -(f)-(£ 


)1 






ss w = ** - ea? 








Degrees of Freedom MS of Cells 






df A = p - 1 MS A = 


SS A 

df A 






df B = q - 1 




MS W = 


SSy^ 

df w 


d, AB = d, A ' d, B MS 8 = 


SS B 

df B 






dfw = N - pq (Error) 








df total = N - 1 MS AB 


_ 5?AB 
d, AB 






Calculated 'F 








MS A 

A ~ MS W F A6 - 


msab 

MS W 






f b = -Mia 

B MS W 








Table 1. Formulae 









programs, but I was wrong. I did 
find many programs but I was 
unable to find some of the more 
important ones. 

One example of a program I 
needed was Analysis of Vari- 
ance, called ANOVA in sta- 
tistical circles. I found one-way 
ANOVA all over the place but I 
couldn't find two-way ANOVA. I 
tried to get by with the pro- 
grams I could find but I really 
wasn't getting much done. I 
decided to take matters into my 
own hands. 

Since one-way ANOVA was 
pretty much out of date (statisti- 
cal procedures change often) I 
was forced to write my own pro- 
gram. I got the necessary formu- 
lae from my statistics book and 
wrote my first important Basic 
program. This was not hard to 
do since ANOVA handles data 
in several different ways. After 
many hours of work I finally de- 
veloped a workable two-way 
ANOVA program which I used a 
lot for one semester. 

The next semester I found 
that my two-way ANOVA was 
fine for school book problems 
but fell short for more complex 
problems, such as problems in- 
volving differential attrition. 
When differential attrition oc- 
curs (usually in human subject 
experiments), it is necessary to 
make adjustments in the handl- 



ing of the data. The adjustments 
are the inclusion of grand mean 
and harmonic mean in the 
calculations. 

It was time to get back to 
work and adjust my program to 
properly compensate for dif- 
ferential attrition. Several more 
hours of work were required to 
make those adjustments. Final- 
ly, after a few 'false starts' and a 
few 'almost quits', I managed to 
get a workable program. I will 
now make this program, with a 
minimum of instructions, avail- 
able to anyone who is interested 
(see Program Listing 1). 

The Formulae 

I wish I could give credit to the 
source of the formulae I used for 
this program but I don't know 
what publication they came 
from. I was given the formulae 
on a handout sheet by Dr. Joel 
Raynor, State University of New 
York at Buffalo who I credit as 
their source. See Table 1 for the 
exact formulae. 

If an equal number of scores 



The Key Box 

Basic Level II 
Model I 
16K RAM 
Printer (optional) 
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on Software and Hardware for 

TRS-80 



CHEXTEXT 

Let your TRS-80" do the proofreading on 
your SCRIPSir text files! 1 

Features of this program include: 

• Complete dictionary maintenance in- 
cluding the addition and deletion of 
words 

• Menu driven for ease of operation 

• Spelling Checker 

• FREE expanded dictionaries avail- 
able, depending on your drive 
storage capabilities. 

NEW LOWER PRICE $59.95 



MODEL III PRICE LIST 

(All 48K with TANDON drives) 

1 single bided 40 track drive $1695.00 

2 single sided 40 track drives 1 895.00 

1 dual sided 40 track drive 1820.00 

2 dual sided 40 track drives 21 45.00 

1 single sided 80 track drive 1845.00 

2 single sided 80 track drives 2175.00 

1 dual sided 80 track drive 1995.00 

2 dual sided 80 track drives 2395.00 

with RS 232 C Add 115 00 

NOTE: These Model III computers contain Apparat 
installed disk drives and memory They are warranted 
by Apparat Inc. for 90 days. 




MISCELLANEOUS SUPPLIES 

DISKETTES 

Double density-soft sectored-replacement guaranteed Sp 
protected (5%" only) 

Verbatim Datalife 5'A" 40 track 

Apparat's No Name 5V«" 40 track 

Verbatim Datalife 8" model II 

PAPER 
9'/?"x1 1" blank white, tractor feed paper, full box 1 5* or 20# . 

14V?"x11" green bar. tractor feed paper, full box 

3V?"x15/16" tractor feed mailing labels 

OTHER 

5V*" plastic library case 

8" plastic library case 

5'V' Flip-sort 

8" Flip-sort 

16K memory kits 



ndle/Hub 



.824.95 
$34.95 
.$19.95 

$ 1 95 

. $ 4 95 
$1895 
$31 95 
$19 95 



SPECIAL - FREE GRAFTRAX 

with EPSON MX-80 & MX-80 F/T Printers 

MX-80 $499.00 

MX-80F/T $599.00 

MX-100 $775.00 

Printer Cables $24.00 

(Specify ComputerType) 

WE ALSO STOCK OKIDATA & NEC PRINTERS 
CALL FOR PRICES 



NEW LOWER PRICES ON 

TANDON DISK DRIVES 

Complete with power supply, chassis & configured for 
TRS-80" Model I or III 

Single sided 40 track $285.00 

Dual 40 or Single 80 track $41 5.00 

Dual sided 80 track $51 5.00 

Special - 2 Dual sided 80's $999.00 



MODEL I DOUBLE 
DENSITY PACKAGE 

Converts a standard TRS-80 Model I 
to Double Density 
A pparat Doubter & N EWDOS/80 V 2 0. 
$278 00 value for only $219.00 
Doubler alone $1 29.00 



a 



Apparat, Inc. 



APPARAT'S PROM BLASTER 

An eprom programmer for all 25 X X and 27 X X chips. TRS-80' 

MOD I & III $149.00 

CABLE $ 1 7.95 

BUS EXTENDER 

mini version with 2 card slots and no enclosure $ 69.95 




ngvvuudou 



Version 2.0 



The most sophisticated DOS ever pro- 
duced for the TRS-80* Models I and III. It 
provides the user with "MAINFRAME' 
power on a "MICRO". 

Some Features available are: 

• Jobstream Control Language 

• Mod I/Mod III Diskette interchangability 

• Double Density Support on Model I 

• Pagenation of BASIC listings on the screen 

• Basic program single stepping 

• Dynamic variable manipulation 

• Multiple array sorts with BASIC CMD 

• Complete technical support provided 

All this plus much more for only 
$149.00 



IntoWotld 

Software Report Card 

NEWDOS/80 
Version 2.0 



□ o □ 

d □ a 

n d a 

n d d 



Performance 
Documentation 
Base of Use 
Error Handling 



ASSORTED ITEMS OF INTEREST 

MICRO CLINIC. Mod I $24.95, Mod III $29.95 

The ultimate in memory & disk diagnostics 
MEAL MASTER. Mod I & III Disk $24.95 

meal planning & grocery shopping aid 
FLEXTEXT/80 (requires Graftrax) $34.95 
ultilize the additional features of the MX-80 

printers under model I & III scripsit 

MICRO ACCOUNTING SYSTEM, $479.00 

Interactive G/L. A/R. A/P & checkbook manager 

UNITERM/80, $89. OO 

Universal terminal program that takes advantage 

of the extended NEWDOS/80 commands 

BASIC BETTER & FASTER BOOK, $23.95 



E 



• On-going Support for Microcomputers' 



4401 S Tamarac Pkwy • Denver. CO 80237 • (303) 741-1778 • (800) 525-7674 

S( ripsit A TRS 80 are .1 registered trademark of Tandy Corporation 
Freight FOB Denver call for shipping charges Foreign Orders shipped Air Freight 



-See List of Advertisers on page 402 
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are assigned to each group, the 
results will be exactly the same 
as in an uncorrected two-way 
ANOVA. When differential attri- 
tion occurs in the data the re- 
sults are textbook accurate. I 
hand-calculated many exam- 
ples of ANOVA to compare to 
the computer results and the 
only differences I have found 
were in the 1/10,000 range. This 
probably results from the way 
rounding is handled by the com- 
puter (or me!). 

Data Input 

Table 3 is an example of test 
data for the program. Data is en- 
tered in groups (called cells). 
The data is entered starting with 
group one, which is the upper 
left cell. The next cell to be 
entered is the cell to the right. 
This continues to the end of the 
row. After a row is completed, 
the first cell in the next row is en- 
tered. It does not matter in what 
order the individual scores are 
entered, but cell order is impor- 
tant because each cell position 
represents a level of a particular 
experimental factor. 

When the program is started 
you will be asked to input the 
number of rows and columns. In 
the example data (Table 3) there 
are three columns and four 
rows. After that entry, you will 
be asked to input the scores for 
group (cell) one. To end the input 
of each group enter the @ sym- 
bol. The next cell input will then 
be prompted. 

When all scores are entered, 
the program will give you the op- 
portunity to edit them. If 
selected, this option will display 



the scores for each cell. If you 
want to change a score, you 
must redo the entire cell. This 
routine is long and not really ne- 
cessary, so drop it if you want. 
To drop the edit routine, simply 
delete the GOSUB that calls it 
and do not enter the routine 
when you key in the program. 

Data Output 

After the edit routine is done, 
the computer will begin to com- 
pute the data for output. Each 
computation will be prompted so 
that you will know that the com- 
puter is working. This will also 
make editing the program easier, 
since each formula computation 
is headed by its identifier. 

When computation is done 
the data table will be displayed 
on the CRT. Also the printout op- 
tion will be prompted. Table 2 is 
the data output as it appears on 
Radio Shack's Line Printer VI. 
Program Listing 2 gives the sub- 
routines that produce the lines 
in the data output. They will 
have to be changed to match 
your printer codes. In order to 
drop them all together, drop the 
GOSUBs that appear in lines 14, 
15 and 16 and delete lines 31 -33. 
This will produce the data table 
without the dividing lines. 

The last prompt is the option to 
have the scores printed. They will 
be printed by cell and score num- 
ber. This is a checking procedure 
and, like the edit routine, it can be 
dropped from the program to con- 
serve time and memory. 

Table 2 is an accurate output 
of the data that is shown in 
Table 3 once computation is 
complete. You can use this to 



Data Table (ANOVA Test) 


Source 




DF 


SS MS 


CALF 


Column 




2 


177.226 88.6131 


6.77543 


Row 




3 


92.5463 30.8488 


2.35872 


CXR 




6 


289.345 48.2241 


3.68725 


W/C 




64 


837.03 13.0786 




Total 




75 


1396.15 




For DF to F Table Use: 
Column = 2/64 
Row =3/64 
CXR =6/64 

Table 2. ANOVA Result Printout 



check whether you have correct- 
ly entered the program code. 
Your results on this data should 
be the same. There should be no 
significant differences between 
the example output and your 
result. If there are, you can find 
an error by going to the section 
which is headed with the title of 
the result in which your error ap- 
pears and work backward. 

A Final Note 

I have many statistical analy- 
sis programs. Some are original 



and others are adapted from dif- 
ferent Basic programs. Anyone 
who wants these programs can 
send me a disk and a postage 
paid return envelope and I will 
be glad to send the programs I 
wrote, and those that I tran- 
slated to TRS-80 Basic, free of 
charge. ■ 

Richard McGarvey is a profes- 
sional police officer with the 
Amherst, NY Police Depart- 
ment. He owns two TRS-80 
Model Is. 



Columns (Factor B) 
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8 


10 


16 


10 


11 


15 


17 


19 


18 


o 
w 
s 


5 


4 


10 


9 
4 


6 


8 


15 


12 




F 
a 


15 


9 


11 


12 


8 


5 


14 


13 


16 


14 


6 


8 


6 


3 




11 


7 


8 






















t 


11 


15 


16 


17 


11 


15 


12 


15 


9 


r 


9 

17 


11 
16 


13 


6 


9 


4 


11 
17 


13 


16 




17 


15 


19 


10 


15 


5 


8 


10 


17 


A 


18 
15 


17 


11 


6 


12 


17 


11 
10 


8 


6 



Table 3. Score Groups (Cells) 



Program Listing 1 



1 CLEAR(10000) :DEFINTR,S,Y,I,X,Z,T,N f O:CLS:PRINTCHR$(23) "TWO - W 
AY ANOVA": PRINT :PRINT"OPDATE 07/24/80" :PRINT"THIS PROGRAM WILL 
USE UNEQUAL"! PRINT "SCORES PER CELL" :FORX=1TO1000 :NEXT:GOSUB19 :GO 
SUB25:CLS:NC=CR:F0RX=1T0CR:T1=T1+N(X) :NEXT:T=Tl 

2 GOSUB3:GOSUBll:GOSUB24 

3 CLS:PRINTg384,"NOW COMPUTING COLUMN AND ROW "N" VALUES" :FORX=l 
TOC:FORI=XTONCSTEPC:S(X)=S(X)+N(I) :NEXTI ,X : Y=l :FORX=1TOR:FORI=YT 
0(Y+(C-1) ) :R(X)=R(X)+N(I) :NEXTI : Y=Y+C: NEXTX: CLS : PRINT3384, "NOW C 
ALCULATING CELL MEANS" : FORX=lTOCR: FORI=lTON (X) 

4 L=L+(A(X,I) ) :NEXTI:L=L/N(X) :M(X) =L: L=0 : NEXTX :CLS : PRINT@384 , "NO 
W CALCULATING HARMONIC MEAN" :FORX=lTOCR:H=H+ (1/N(X) ) :NEXTX:H=CR/ 
H:CLS:PRINT@384,"NOW CALCULATING THE GRAND MEAN" :G=0 : F0RX=1T0CR: 
G=G+M(X) : NEXTX: CLS 

5 PRINT@384,"NOW CALCULATING THE USABLE GRAND MEAN" :G= ( (G ( 2) /CR) 
:CLS:PRINT@384,"NOW CALCULATING CELL SCORE SQUARES" :FORX=lTOCR: F 
ORI=lTON(X) :B(X,I)=(A(X,I) [2) :NEXTI :NEXTX:CLS:PRINTg384 , "NOW CAL 
CULATING SQUARES WITHIN CELLS" :FORX=lTOCR 

6 FORI=lTON(X) :K1=K1+(A(X,I) [2) :NEXTI : NEXTX :FORX=lTONC: FORI =1T0N 
(X) :K2=K2+A(X,I) :NEXTI : K2=K2 [ 2: K2=K2/N(X) :K3=K3+K2 : K2=0 :NEXTX: E3 
=K1-K3:CLS:PRINT@384,"N0W CALCULATING SQUARE OF ROWS" : L6=0 : L7=0 : 
FORX=lTOCRSTEPC:FORI=XTOX+(C-l) :L6=L6+M(I) :NEXTI 

7 L7=L7+L6[2:L6=0:NEXTX:L7=L7/C:CLS:PRINTg384,"NOW CALCULATING C 
OLUMNS SQUARED":L6=0:L8=0:FORX=1TOC:FORI=XTOCRSTEPC:L6=L6+M(I) :N 
EXTI:L8=L8+L6[2:L6=0:NEXTX:L8=L8/R:CLS:PRINT@384,"NOW CALCULATIN 
G SQUARES OF ROW*COL MEANS" :L9=0 : FORX=lTOCR 

8 L9=L9+(M(X) (2) :NEXTX:CLS:PRINTe384,"NOW CALCULATING SSR":E2=(L 
7-G)*H:CLS:PRINTg384,"NOW CALCULATING SSC" : El= ( L8-G) *H :CLS : PRINT 
@384 , "NOW CALCULATING SSR*C" : E5= ( ( L9+G) - ( L7+L8) ) *H : CLS : PRINT9384 
,"NOW CALCULATING SST" : E4= (E1+E2+E3+E5) : CLS 

9 PRINT8384, "DEGREES OF FREEDOM NOW! ! 1 " -DC=C-1 -DR=R-1 :DX=( (R-l) * 
(C-l) ) :FORX=lTOCR:DW=DW+(N(X)-l) :NEXT:DT=DC+DR+DX+DW:CLS:PRINT@3 
84, "NOW I'M DOING MS" :Q1=E1/DC:Q2=E2/DR:Q3=E5/DX:Q4=E3/DW:CLS:PR 
INT@3 84,"NOW i'M ON CALCULATED ' F ' . " : FC=Q1/Q4 

10 FR=Q2/Q4:FX=Q3/Q4:CLS:RETURN 

11 PRINT" DATA TABLE" : PRINT'SOU^CE" ;TAB( 12) "DF 
";TAB(24) "SS";TAB(36) "MS";TAB(48) "CAL. F" :PRINT"COL" ; TAB< 12) DCjT 
AB(24)El;TAB(36)Ql;TAB(48)FC:PRINT"ROW";TAB(12)DR;TAB(24)E2;TAB( 
36)Q2;TAB(48)FR 

12 PRINT"C X R";TAB(12)DX;TAB(24)E5;TAB(36)Q3;TAB(48)FX:PRINT"W 
/ C";TAB(12)DW;TAB(24)E3;TAB(36)Q4:PRINT"TOTAL";TAB(12)DT;TAB(24 
)E4: PRINT: PRINT'FOR DF TO F TABLE USE :": PRINT "COL =" ;DC ; "/" ;DW: 
PRINT"ROW =";DR;"/";DW:PRINT"CXR =" ; DX ; "/" ;DW 

13 RETURN 

14 AS="":LPRINTSTRINGS(3,CHR$(138) ) :INPUT"ENTER THE TABLE NAME"; 
QR$:LPRINTTAB(20) "DATA TABLE " ; CHRS (123) ; " ";QR$;" " ;CHR$ (125) ; 
CHR$(138) :GOSUB31:LPRINT"SOURCE";TAB(12) "DF" ;TAB( 24) "SS";TAB(36) 
"MS";TAB(48) "CAL. F" :GOSUB32 

Program continues 
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6 ways to give 
yourTRS-80 a 



+ PLUS 



[ xhaustive research and professional standards 
bring you the best in business software. 



EASYTRAK m 

KEEP YOUR SALES CURVING UP- 
WARD WITH EASYTRAK" , a powerful, 
all-purpose activity tracking system. User- 
specified options enable you to monitor 
sales activity by territory, product line, 
salesman, or by combinations. Can 
monitor inguines. sales calls and order 
booking. Production activity (by shift, by 
product, by day. by team, 
etc.). spending or in- 
come activity are simple 
to set up with EASY- 
TRAK "" . Extensive video 
displays make available 
individual, group or total summaries, rela- 
tive averages, and percentage data all at the 
touch of a button. Use of an 80 column 
printer is optional. 

MODEL l/lll $125 
MODEL II $ 1 50 




• GENERAL LEDGER 

SLICE OUT MORE PROFIT by using 

• General Ledger to monitor your financial 
status. Features include fully flexible finan- 
cial statements, both budget and last year 
comparisons, special report options, 
monthly and quarterly trial balances, man- 
ual and or automatic journal entries all with 
extensive audit trails. You structure the 
chart of accounts with up to 5 digit account 

numbers. 

MODEL l/IH $325 

MODEL II $350 




. ACCOUNTS RECEIVABLE 

PUT MORE CASH IN 
YOUR BANK AC- 
COUNT with • Account 
Receivable s many col- fei 




lection credit features, 
including average pay- 
ment days. aging 
schedule and statements. 
Open-item system records sales activity 
this year and last, optional automatic dis- 
counts and salesman assignment. Cash re- 
ceipts and A R adjustments feature exten- 
sive on-line validation. And. yes. • Accounts 
Receivable handles the pesky new 9-digit 
zip code. Other optional features include 
service charges to selective customers: 
partial and on-ac count payments. Posts, 
at your option to - General Ledger. 



MODEL l/lll 
MODEL II 



$325 
$350 



. FIXED ASSETS 

A POWERFUL SET OF TOOLS TO 
CALCULATE and monitor fixed asset ex- 
penditures, book and tax depreciation, in- 
vestment tax credit, etc. Will even forecast 
future depreciation for you. (Handy at 
budget time!) Code structure enables you 
to classify assets by departments, buildings, 
groups or other categories. Handles seven 
depreciation methods. Can post to * Gen- 
eral Ledger for you. 

MODEL l/lll $325 
MODEL II $350 




+ACCOUNTS PAYABLE 

FUNNEL THAT STACK OF BILLS into 
* Accounts Payable system and create an 
orderly, manageable flow of vendor his- 
tories, cash requirements forecasts, check 
registers and checks, aging schedules, etc. 
Will accept manual checks, 
reversals, and adjustments. 
Pay by selected vendor, in- 
voice, due date, discount 
dates, and optionally post di- 
rectly to your • General 
Ledger. Supports 5-digit 
vendor numbers. 

MODEL I/III $325 
MODEL II $350 




PAYROLL 

KEEP YOUR EMPLOYEES HAPPY and 

smiling with prompt, accurate and profes- 
sional payroll records. Will handle weekly, 
biweekly, semimonthly, monthly payrolls, 
produce checks, check 
registers, labor reports, 
earnings reports. Form 
94 1 s. W2s. etc. Can 
handle fixed voluntary 
deductions, hourly 
salary employees, 
bonuses, city and state taxes, etc. Easy to 
use and update tax tables. Automatic 
■ General Ledger posting. 




MODEL I/Ill 
MODEL II 



$325 
$350 



SPECIAL! All of the above: MODEL I/III $ 1600. MODEL II $ 1750. 

+ PLUS SOFTWARE comes to you feature-packed from on-line validation to 
machine-language file handling. Extensive documentation and thorough installa- 
tion guide accompany each order. All systems are furnished on disc. Source code 
is included. Texas residents add 5% sales tax. 



+ PLUS 



PLUS COMPUTER TECHNOLOGY. INC 

6900 N. AUSTIN AVENUE 

CHICAGO, IL 60648 (312) 647-0988 .-73 



Dealer inquiries invited 

TRS 80 is a registered trademark ol Tandy Corp 
e ASYTRAK .s a trademark ol Plus Computer Tech Int 



•See List of Advertisers on page 402 
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the HOW TO, SHOW & TELL, STEP by 
STEP book. Written for TRS-80 and all 



' The breakthrough book for non-programmers . 
RANDOM businessmen an °" professionals who want to 
l\/»IML/L/l¥l solve in house problems by writing your own 



BASIC 
HANDLING" 



DSC Publishing 

2 Dogwood Drive 

PO Box 769 

Danbury, CT 06810 

Phone Order 
(203) 748-3231 




the desire to get beyond the cassette and into 
disk data storage and file manipulation. "DOS 
Random Access & File Handling" is the plain 
speaking, easy to read 150 page book for 
learning HOW TO WRITE SPECIAL PROGRAMS 
for inventories, mailing lists, work schedules, 
record keeping and more. Your acquaintance 
with Level I and Level II basic and this self- 
instruction tutorial will assure quick progress. 



Yes, I want to expand my programming 
knowledge. 

Please send me a copy of "DOS Random 

Access & File Handling" for 24.50 + 1.50 

shipping D 

Also send me the compatible program disk 

for 28.50 + 1.50 shipping. D 

Overseas add 8.00 per book and disk 

airmail. 

Name 

Address 

City 

State Zip 



Master Charge C VISA □ 

Expiration Date 

Card # 



Check D Money Order □ 
COD (2.00 extra) a 
Signature 



"Dealer Inquiries Invited" Phone Orders (203) 748-3231 
CT. orders add 7.5% sales tax. 



Program continued 

15 LPRINT"COL";TAB(12)DC;TAB(24)El;TAB(36)Ql;TAB(48)FC:GOSUB32:L 
PRINT"ROW";TAB(12)DR;TAB(24)E2;TAB(36)Q2;TAB(48)FR:GOSUB32:LPRIN 
T"C X R";TAB(12)DX;TAB(24)E5;TAB(36)Q3;TAB(48)FX:GOSUB32:LPRINT" 
W / C";TAB(12)DW;TAB(24)E3;TAB(36)Q4:GOSUB33 

16 LPRINT"TOTAL";TAB(12)DT;TAB(24)E4:GOSUB33:LPRINT:LPRINT"FOR D 
F TO F TABLE USE : " : LPRINT'COL =" ;DC; "/";DW:LPRINT"ROW =";DR;"/ 
";DW:LPRINT"CXR =" ;DX; "/" ;DW 

17 PRINT: PRINT-ENTER 1 TO GET HARD COPY OF SCORES" : INPUTAS: IFA$= 
"1"THEN23ELSE18 

18 INPUT" ENTER TO END"; AS: END 

19 DIMB(50,50) ,A(50,50) ,T(50) ,M(50) ,N(50) ,C(50) :CLS:PRINT@384,"E 
NTER THE NUMBER OF COLUMNS AND ROWS (C , R) " : INPUTC,R:CR=C*R:CLS:C 

LS:FORX=lTOCR:NN=l:CLS:PRINT@3 84, "ENTER SCORES FOR CELL ";X;:PRI 
NT" ( END WITH ' @ • SYMBOL ) " 

20 INPUTA$:IFA$="@"THEN21ELSEA(X,NN)=VAL(A$) : A$="" :NN=NN+1 :GOT02 


21 A$="":N(X)=NN-l:NEXTX:FORX=lTOCR:S=S+N(X) :NEXT:RETURN 

22 CLS:PRINTCHR$(23) "YOU HAVE MADE" :PRINT: PRINT'AN ENTRY ERROR 1 
l":PRINT:PRINT"ENTER AGAIN PLEASE" :FORX=1TO2000:NEXT:GOTO1 

23 FORX=lTOCR:FORZ=lTON(X) :LPRINT"CELL #";X; "SCORE*"; Z; "=" ;A(X,Z 
) :NEXTZ,X:G0TO18 

24 PRINT'FOR PRINT OUT ENTER 1 " ; : INPUTA$: IFA$="1"THEN14ELS 

E17 

25 CLS:PRINT@384, "ENTER 1 TO EDIT SCORES" : INPUTAS: IFA$<>"1"THEN3 
0ELSEFORX=1TOCR:PRINT"FOLLOWING ARE THE SCORES FOR CELL # ";X:FO 
RY=1T0N(X) :PRINT"SCORE ";Y;" IS "; (A(X,Y) ) :NEXTY: PRINT "DO YOU WI 
SH TO CHANGE ANY SCORES IN CELL ";X 

26 INPUT'ENTER Y OR N " ; AS : IFA$="N"THEN29ELSEN=1 

27 PRINT'END SCORE ENTRY WITH ' @ ' ALL SCORES MUST BE RE-EN 

TERED.": PRINT "SCORE ";N;" FOR CELL ";X;" SHOULD BE ???": INPUTAS : 
IFAS="@"THEN28ELSEA(X,N)=VAL(AS) :N=N+l:GOT027 

28 N=N-1:N(X)=N 

29 NEXTX 



30 RETURN 

31 LPRINTSTRING 
R$(243) .-STRINGS 
RS(243) ,-STRINGS 

32 LPRINTSTRING 
R$(250) ,-STRINGS 
RS(250) ; STRINGS 

33 LPRINTSTRING 
R$(248) ;STRINGS 
RS(247) :RETURN 



,CHRS(241) ) ;CHRS(243) ;STRINGS(14 ,CHR$ (241) ) 

,CHR$(241) ) ;CHRS(243) ; STRINGS ( 12 ,CHRS ( 241) ) 

,CHRS(241)) ;CHRS(242) :RETURN 

,CHRS(241)) ;CHRS(250) ;STRINGS(14 ,CHR$(241) ) 

,CHR$(241) ) ;CHR$(250) ;STRINGS(12,CHRS(241) ) 

,CHRS(241) ) ;CHRS(249) :RETURN 

,CHR$(241)) ;CHR$(248) ;STRINGS(14 ,CHRS(241) ) 

,CHR$(241)) ;CHR$(248) ; STRINGS ( 12, CHRS (241) ) 



;CH 
;CH 



;CH 
;CH 



;CH 
;CH 



Program Listing 2 



SOME STRAIGHT TALK ABOUT DISK DRIVES 



■ DON'T BE CONFUSED BY ALL THE BRAND NAMES YOU SEE IN THE MARKET PLACE, THERE ARE VERY FEN MANUFACTURERS OF THE BASIC 
DRIVE CHASSIS, ALL THE OTHER NAMES ARE THOSE OF THE ASSEMBLERS OR THE RETAILERS. 

■ AS MANUFACTURED, THE DRIVE HILL NOT RUN ON A TRS-80*, IT MUST BE MODIFIED BY THE ASSEMBLER. 

■ THE QUALITY OF THE DRIVE DELIVERED TO YOU IS DEPENDENT ON BOTH THE MANUFACTURER AND THE ASSEMBLER, THE BEST CAN TURN 
TO JUNK IF THE ASSEMBLY IS IMPROPERLY DONE. 

■ THE POKER SUPPLY AND CASE ARE VERY IMPORTANT COMPONENTS OF THE COMPLETE DRIVE, THE CASE MUST ALLOW PROPER C00LIN6 
AIR FLOW, AND THE POWER SUPPLY MUST MAINTAIN TWO CONSTANT V0LTA8ES. 

■ YOU MUST DEPEND ON THE COMPANY SELLIN6 YOU THE DRIVE TO SERVICE IT AT REASONABLE COST WHEN IT FAILS YOU, THE 
MANUFACTURER IS NOT EQUIPPED TO DO THIS! 

■ THE BEST MEASURE OF QUALITY IN A DRIVE IS IT'S SPECIFICATIONS, WILL IT HANDLE DOUBLE DENSITY, WHAT IS THE TRACK TO 
TRACK ACCESS TIME, THE ANSWERS TO THESE TWO QUESTIONS INDICATE THE PRECISION OF IT'S COMPONENTS. 

■ WHAT KIND OF DRIVE SHOULD YOU BUY ? LEVEL IV HAS CHOSEN TO DISTRIBUTE EXCLUSIVELY, THE HPI LINE, ALL MODELS OF MPI 
ARE DOUBLE DENSITY RATED AND REQUIRE ONLY A FIVE HILLI-SECOND TRACK TO TRACK ACCESS TIME. 

■ WHAT DO ALL THE MODEL NUMBERS MEAN? 

B-51» 40 TRACKS SIN6LE HEAD SIN6LE SIDE B-52= 40/40 TRACKS DOUBLE HEAD DOUBLE SIDE 
B-91- 80 TRACKS SIN6LE HEAD SIN6LE SIDE B-92* 80/80 TRACKS DOUBLE HEAD DOUBLE SIDE 
(DOUBLE HEADS)-READ BOTH SIDES OF DISK (DUALS)-TWO DRIVES IN ONE CASE (RAW)-NO POWER SUPPLY OR CASE 

■ WHERE SHOULD YOU BUY YOUR DRIVE, LEVEL IV IS ONE OF THE OLDEST AND LAR6EST DISTRIBUTORS OF TRS-801 EQUIPMENT, LOOK 
AT THE ADS IN YOUR OLD MA6AZINES, MANY OF THE ADVERTISERS ARE NO LONBER IN BUSINESS, LEVEL IV HAS BEEN A LEADER 
SINCE THE BE6INNIN6, WE STAND BEHIND OUR PRODUCTS, AND WE'LL BE HERE WHEN YOU NEED HELP. 

■ WHERE DO THE NATIONALLY KNOWN AUTHORS BUY THEIR DRIVES ? LEVEL IV CAN SHOW COPIES OF SALES RECEIPTS FOR DRIVES TO 
MOST OF THEM, LANCE MICKLUS, SCOTT ADAMS, VERNON HESTER, BOB (CAPTAIN 80) LIDDIL, DICK BALCOH, KIM WATT, ETC. 
TO THESE MEN C0MPUTIN6 IS NOT A HOBBY, IT IS THEIR PROFESSION. 

■ CALL FOR OUR LOW PRICES ON NEW AND USED DRIVES, REMEMBER, WE ALSO TAKE TRADES, AND PAY THE SHIPPIN6! 

LEVEL IV PRODUCTS INC. 32238 SCHOOLCRAFT, LIVONIA, MI 48150 
PHONES: MI (313) 525-6200 OTHERS 800-521-3305 (TOLL FREE) 

t a trademark of the RADIO SHACK DIV. of TANDY CORP. 
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If you have a MICROLINE or EPSON MX-80 printer, you can print graphics like the ones above! 
GEAP (the Graphics Editor and Programmer) offers three Letter-sets, Selective Reverse-Image, Shrink, 
Magnify, Rotate and Draw, all in one easy to use package. It can Save and Restore images on disk, or 
Print them directly on your EPSON or MICROLINE. GEAP can be selected from the NEWSCRIPT menu, 
and when finished, pass its eye-catching results back to NEWSCRIPT for merging of text and Word Pro- 
cessing formatting. 

PANEL JOINER connects several screen images together. It normally costs $14.95, but if you order 
both GEAP and NEWSCRIPT, or are a registered owner of NEWSCRIPT and order GEAP now, JOINER 
will be included free. So, order today by mail or Toll-Free telephone, and enter the world of Word Pro- 
cessing Graphics! (48K TRS-80 disk system needed. Specify Model I or III.) 



GEAP plus Letter Sets: $45.95 



NEWSCRIPT 6.2: $99.95 



AMAZING PROGRAM SPEEDS UP BASIC ERRATIC D IsK DRIVES 




Your time is valuable, so why 
waste it on slow-running BASIC 
programs? PRO SOFT's 

"FASTER" will analyze those 
programs while they run, then 
show you a simple change (usu- 
ally one new line) that can re- 
duce run-times by up to 50%. 

Accounting systems, financial models, engineering and scien- 
tific programs all run faster; so do games. Large, complex pro- 
grams improve the most, and "FASTER" is easy to use. 

THIS ISN'T A COMPILER! Your BASIC programs remain read- 
able and can be changed later on. While your programs run,. 
"FASTER" counts how often each "variable" is used, then shows 
you the correct sequence for these variables. Afterwards, the 
computer finds them sooner, so your programs run faster. 

Does it really work? Yes! Personal Computing said so in their 
May, 1981 issue (p. 116); we've received many letters from cus- 
tomers who've gotten 20-50% improvements; and we will make 
you this offer: 

Order "FASTER" now. Try it on your bread-and-butter pro- 
grams. If you don't get an overall run-time reduction of at least 
20%, return it within 30 days for a prompt and cheerful refund. 

"FASTER runs on TRS-80 Models 1 and III, 16-48K. tape or disk 

$29.95 

QUICK COMPRESS 

Small {276 bytes), fast (processes 800 
lines in under 3 seconds) utility removes blanks and remarks from 
your BASIC programs. Produces smaller, faster programs, and 
doesn't alter the original logic. 



RPM measures the rotational speed and 
variation of your disk drives, and reveals a 
common cause of unexplained errors. 
Simple one-key operation, runs under any 
DOS, interchangeable between Models I 
and III. Shows current and average 
speeds, plus fluctuation history. Recovers 
from severe errors. Documentation ex- 
plains how to adjust drives. Use RPM 
monthly for best results. 32-48K Model I or 




III disk: $24.95 



TO ORDER, CALL NOW, TOLL FREE 

(800) 824-7888, Operator 422 

CALIF: (800) 852-7777, Oper. 422 

ALASKA/HAWAII: (800) 824-7919 

FOR TECHNICAL INFORMATION CALL: 

(213) 764-3131, or write to us. 




16-48K Model I or III, tape or disk. 
SPECIAL FASTER + QUICK Compress: 



$19.95 



Dept. G Box 839 
$39.95 North Hoi ly wood, C A 9 1 603 



TERMS: We accept VISA. Mastercard, chocks. Money Orders. C.O.D. and even cash. We pay shipping via 

surtaco UPS inside U.S.A. Please add S3. 00 (or Blue Label. 6% tax in California, and 15% outside North America (air shipr 



GRAPHICS 



All it takes is a DMP-3 digital plotter. 



Color from a Model II? 



Paul T. Ward 
Rolf A. Deininger 
School of Public Health 
University of Michigan 
Ann Arbor, Ml 48109 



The TRS-80 Model II is a 
useful microcomputer, by 
itself and as a terminal for a cen- 
tral host computer. However, its 
graphics capabilities are not ex- 
citing and the lack of color is 
disappointing. To add color plot- 
ting capabilities, we interfaced 
the TRS-80 to a Houston In- 
struments DMP-3 digital plotter 
(HIPLOT), which uses 8V2 by 11 



The Key Box 

Model II 
64K RAM 
TRSDOS 
2 Disk Drives 
Daisy Wheel Printer 



inch paper and has a maximum 
plotting area of 7 by 10 inches. 

Hardware 

Interfacing the TRS-80 to the 
HIPLOT is very simple. Serial 
port B on the back of the TRS-80 
connects to the serial port of the 
plotter. The cabling provides an 
Xon-Xoff handshake and re- 
quires the pin connections 
shown in Fig. 1 to run at a 2400 
baud rate. 

HIPLOT jumper 6-16 sets the 
baud rate at 2400. Before running 
any Basic program, you must 
issue the system commands: 



SETCOM B = (2400,8, N, 2) 
FORMS {S\ 



Software 

Existing software, such as 
the Model I HIGRAPH, is re- 
stricted to plotting a bar chart, 
line graph, or pie chart. We de- 
veloped our own software. Since 
our numbers span large ranges, 
the program must be able to pro- 
duce logarithmic graphs. Fig. 2 
is an example of such a graph. 



Program Listing 1 produces the 
box and lettering "TRS-80 Model 
II and HIPLOT" (see Photo 1). 

Line 260, the first command 
to the plotter, draws a box 
around the text. The string in- 
structs the plotter to move the 
pen home (the lower left cor- 
ner), to go into absolute plotting 
mode, to set the origin at 
-100,0 and then to draw with 
the pen down to the specified 
coordinate pairs. The coordi- 
nates are expressed in units, 
where each unit is .005 inches. 
This string produces a box 10 
inches in the X and 7 inches in 
the Y direction. 

The program requests the 
user to change the pen to a new 
color and, after pressing any 
key, line 300 sends a string 
which will write the text "TRS-80 
Model II" to the plotter. U means 
pen up, A means absolute co- 
ordinates, and 300,1100 means 
go 300 units in the X direction 
and 1100 units in the Y direction 
for symbol plotting (S). The num- 
bers associated with S (14) 
mean vertical orientation (1) and 



size of the letters (4). Ninety- 
three plotable ASCII characters 
may be oriented in four direc- 
tions and drawn in five sizes. 
The 4 indicates a letter height of 
.56 inches. Line 310 redraws the 
same text displaced by .02 
inches to create a thicker line. 
The last character of each string 
is an underline indicating the 
end of the symbol plotting 
mode. Line 350 draws the text 
"and", and lines 390 and 410 
draw the text "HIPLOT" twice. 
Line 410 sends the pen home (H) 
and deselects the plotter (@). 

By the time this short article 
reaches print, Radio Shack will 
be advertising their TRS-80 Plot- 
ter ($1995). This plotter is the 
HIPLOT DMP-3 with an automat- 



Model II 
pin 2 
pin 3 
pfn 7 

jumper 4-5 
jumper 6-8-20 



HIPLOT 

to pin 3 
to pin 2 

to pin 7 

jumper 6-16 



Fig. 1. TRS-80 Model II and 
HIPLOT pin connections. 




DISTANCE FROM SOURCE (meters) 



Fig. 2. Logarithmic Graph. 
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Photo 1. 



ic color pen changer and a man- 
ual capability to direct the pen 
to a certain location. Depending 
on the plotting load you have, 
you may save yourself $800 and 
get a HI PLOT DMP-3 or, for 
about the same amount of 
money, a DMP-6 or 7 with a plot 



area of 10 by 15 inches. ■ 

Paul Ward is a graduate stu- 
dent in radiological health, and 
Rolf Deninger is a professor of 
environmental health at the 
School of Public Health of the 
University of Michigan. 



100 

no 

120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 



290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 



TRS-80 MODEL II 

AND 
HI -PLOT PLOTTER 
TITLE PAGE 
PROGRAM 

WRITTEN BY PAUL T. WARD SEPT. 



REM : 

REM 

REM 

REM 

REM 

REM 

REM ' 

REM 

REM * 

REM *************************************************** 

REM 

REM DRAW BORDER AT MAXIMUM PLOTTING SIZE 

REM 

CLS: PRINT"PUT PAPER AND BLACK PEN IN PLOTTER" 

PRINT: PRINT"PRESS ANY KEY TO CONTINUE" 

IS=INKEYS: IF 1$="" THEN GOTO 250 

LPRINT";: H U A -100,0 O D 0,1400 2000,1400 2000,0 0,0 

PRINT: PRINT" INSERT RED PEN WHEN PLOTTER STOPS" 

PRINT: PRINT"PRESS ANY KEY TO CONTINUE" 

I$=INKEY$: IF 1$="" THEN GOTO 290 

LPRINT" U A 300,1100 S14 TRS-80 Model II_ " 

LPRINT" U A 304,1104 S14 TRS-80 Model II_ " 

PRINT: PR I NT "RE- INSERT BLACK PEN WHEN PLOTTER STOPS" 

PRINT: PRINVPRESS ANY KEY TO CONTINUE" 

I$=INKEY$: IF 1$="" THEN GOTO 340 

LPRINT" U A 850,760 S14 and_ " 

PRINT: PRINT" INSERT BLUE PEN WHEN PLOTTER STOPS" 
PRINT: PRINT"PRESS ANY KEY TO CONTINUE" 
I$=INKEY$: IF 1$="" THEN GOTO 380 
LPRINT" U A 450,300 S15 HIPLOT_ " 
LPRINT" U A 454,304 S15 HIPLOT_ " 
LPRINT" H # " 



Program Listing. 
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the COMPUTER 
STOCK MARKET book 

THE PROFESSIONALS BUY 

Purchased by over 160 Financial Institutions, 75 Market Advis- 
ory Services, 50 Colleges and Universities, and 1 50 Computer 
and Software Firms. 
Has been sold m every state and over 30 other nations. It is a study 
of market timing based on cycles and seasonal factors, as they affect 
stock and commodity prices. It gives solid tools for measuring and 
profiting from them. Author has more than 20 years experience as a 
stock broker, and conducted 8 years of computer research 
developing the 34 programs in the book which contains ideas and 
programs never before published. Programs are written in TRS-80 
BASIC. 

Do you have the great stock and commodity trading advantages 
given by the home computer to the few who properly use it? 
To order "New Uses For The Home Computer In The Stock 
Market" send your name and address with your check for S19.95 
(overseas; U.S.A. Dollar International Money Order or a Draft 
payable on a U.S.A. Bank) to: 

Thomas V. Lenz, Dept. M 

596 W. Karval Ct. - Spring Creek 

Elko, Nevada 89801 
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SOFTWARE THAT FITS 



PROPERTY 
MANAGEMENT 



INVENTORY 
MANAGEMENT 



• Tenant Histories 

• Late Rent Report 

• Vacancy Report 

• Income Report 

• Automatic Late Charge 

• Returned Check Report 

• Integral General Ledger 

• Ownership Files 

• Utilities Report 

• Tax Expense Report 

• Owners' Statements 

• Late Notice Letters 

• 900 Properties Per Disk 

$795 

All programs come with COMPLETE SOURCE CODE 
AND VARIABLE DEFINITIONS. Programs 
utilize fast, convenient keyed file access and 
are written in Microsoft Basic. Easy to under- 
stand documentation. Money back guaranteed 
to be error free. License agreement and 
Source Code allows local programers to 
modify for unusual applications and for resale 
profits. All on TRS 2.0. Other programs also 
available. 



Inventory Performance Report 
Up To 1 5 Digit Stock Number 
Sales Input From CRT Or Disk 
Period & Year-End Performance 
Profits By Salesperson 
Sales Input From Radio Shack's 
Accounts Receivable Also 
Suggested Reorder List 
Conversion Of Files From 
Radio Shack's Inventory With 
No Re-Keying 
Price List 
Over 2000 Items Per Disk 

$175 



m 



PATIENT DATA 
MANAGEMENT 

• Maintains AMA CPT Codes With 
Fees & Descriptions 

• Up To 1 Doctors At 3 Locations 

• Forms For Blue Cross/Blue Shield; 
Campus; Medicade; Medicare 

• Patient & 3rd Party Billing 

• Full Patient History (1000 Per 
Disk) Or Balances Only (3000 
Per Disk) 

• Patient, Doctor & Service Code 
Files Maintained Separately 
For Easy Access 

• Reports By Doctor Or Location 

$895 

MICRO-COMPUTER SALES CORPORATION 
OF FAYETTEVILLE, NC 

Phone 919-483-2003 
Post Office Box 53376 
Fayetteville, NC 28305 

^■246 
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HARDWARE 



A joystick interface for your Model I. 



The Joy of Interfacing 



Howard Batie 
12002 Cheviot Drive 
Herndon, VA 22070 



With this inexpensive dual 
joystick interface you 
get two-player action and real- 
time input. And as an added 
bonus, two addressable output 
ports are provided to control ex- 
ternal circuitry under computer 
control. The design can be con- 
structed in an evening for under 
$20, exclusive of cabinet and 
joysticks. 

There are two basic types of 
joysticks— switches on each of 
five data lines (such as used by 
Atari) and twin potentiometers 
(such as sold by Jameco). Either 
kind may be used with this inter- 
face, although a few extra parts 
are required for the poten- 
tiometer version. The interface 
is designed to be plugged direct- 
ly onto the PCB extension on the 
rear of the TRS-80, but can also 
be used by most other home 
computers. 

Description 

The full schematic of the 
switch-type dual joystick inter- 
face is shown in Fig. 1. If you 



The Key Box 

Model I 
Joystick Interface 




Fig. 1a. Component side of PC board. 




Fig. 1b. Reverse side of PC board. 
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MICRO-DESIGN PRESENTS THE MDX SERIES 

INTERFACE EXPANSION SYSTEMS FOR THE TRS-80* COMPUTERS 



The MDX Series Interface Expansion Boards are designed to provide a wide range of options for the TRS-80* 
Computers By using a modular design' scheme, assembly of the board in sections is possible: thus you build 
m the options you need, as you may need them 1 The P C Boards are solder masked and silk screened for easy 
assembly, and each board comes with a well illustrated Users Manual 



• 76 



MODEL I EXPANSION 

The MDX 1 and MDX-2 expansion boards are 
field proven and offer more options than any olher 
board on the market 

Features: 

• On-Board Power Supply 

• Floppy Disk Controller 

• Phone Modem 

300 Baud - DirectConnect — 
Answer and Originate Modes 

• Serial Port 

RS 232 and 20ma Loop Compatible 

• EPROM 

2K o- <!K Capabilities 

• Dual Cassette Logic 

MDX 1 P C Board S Users Manual $69 95/ea 

MDX 2 PC Board & Users Manual 74. 95/ea 

Fully Assembled MDX-2 & Manual 399 95/ea 

(No Memory) 

Partially Assembled MDX 2 8 Manual 299 95/ea 

Users Manuals 8. 95/ea 
Custom Enclosures Available 

NOTE t'i" MDX-1 iloes noi provide POC circuitry 



MODEL III EXPANSION 

Micro-Design now introduces the MDX-3 Inter- 
face for the TRS-80 - Model III Computer. The 
MDX-3 board mounts inside the computer and 
uses the existing power supplies. 

Features: 

• Double-Density Floppy Disk Controller 

Digital Data Separation 
Controls Up to 4 Drives 

• Serial Port 

RS 232 and 20ma Loop Compatible 

• Phone Modem 

300 Baud — Direct Connect - 
Answer'' and Originate " Modes 

MDX-3 PC Board S Users Manual $74 95'ea 

Fully Assembled MDX-3 S Users Manual 324. 95/ea 
Partially Assembled MDX-3 & ' 199.95/ea 

Users Manual 
Users Manual 8 95'ea 



NOW OFFERING ASSEMBLED UNITS 

Micro Design now offers partially assembled' boards 
as an added savings to the user These boards have all 
discrete components and ail sockets soldered in place 
All that remains >s insertion of the required IC's 

Users Manuals are sold separately for evaluation pur 
poses The price is deduclable upon the order of a 



THE MDX-4 
PHONE MODEM 



W8 



The MDX-4 Phone Modem utilizes the same 
Direcl Conned 300 Baud design as used in the 
other MDX series boards 

29. 95/ea 



MDX 4 PC Board & Users Manual 
Users Manual 



8.95/ea 



ACCEPTED 



Texas Residents Add 

5% Sales Tax 

All Orders Processed In 72 Hours 

All Board Orders Add $5.00 For 
Shipping and Handling 



*TRS-80 Is A Trademark of Radio Shack 



Dealer Inquiries 
Welcomed 






For More Information 

And A Free Brochure 

Contact: 




NICRO-DG9IGN 

P.O. Box 748 

Manchaca, TX. 78652 

(512)282-0225 



BREAKTHROUGH FOR THS-fln'S* IN 
IYNTMJ8IZEO MUSIC PRODUCTION. 
AT THE AFFORDABLE PRICE OF 61.95 
YOU CAN LEARN ABOUT AND CREATE 
YOUR OWN ELECTRONIC MUSIC. 

YOU CAN 8JLICT FROM MANY SOUND 
TYPEB AND CONTROL MANY PARAMETERS. 
COMBINED WITH THE UNDE RST AND A - L E 
MANUAL AND MANY EXAMPLES THIS 



K AND K COMPUTER PERIPHERALS 

po box saeoa oei 

KINTHOOO Ml 49508-9603 

FLI»tl AOO 1.00 FOR SHIPPING 
*TK« 10 II • TftAOfUARK OF TANDY CORP 

^354 



LARGE CAPACITY 

ACCOUNTS RECEIVABLE 
FOR MODEL l/lll 

5000+CUSTOMERS 
1 5000+TRANSACTIONS 

30-60-90-120 AGEING ON ALL REPORTS 
PRINT 1/ALL STATEMENTS OR LABELS 
DATE/INV#/DESCRIP/AMT DETAIL SHOWN 
SELECTIVE FINANCE CHARGES & RATES 
FAST POSTING & ENTRY ERROR CHECKING 
LAST PAYMENT DATE & % OF CREDIT LMT 
SALES ANALYSIS BY TRANSACTION TYPE. 
MANUAL 8 SAMPLE DATA 
RETAIL & PROFESSIONALLY USED 2 YRS. 
$100.00 32K 2 DISK REQ 

HOLMAN D-P SERVICE ^ 355 

2059 WEST LINCOLN TERMS: VISA 
OROVILLE, CA. 95965 MC OR COD 
916-533-5992 3PM-9PM 3.00 S 8 H 



DOTPLOT-80 

HI RESOLUTION 
GRAPHICS SOFTWARE 

SIMULATE A PEN PLOTTER ON YOUR 
LINE PRINTER VII OR VIII AND 
MODEL 1 OR III TO DRAW: 

•COMPUTER ART 

•LINE DRAWINGS 

•GRAPHS WITH FULL LABELING 

RESOLUTION: 

•60 DOTS/INCH HORIZONTAL 
•63 DOTS/INCH VERTICAL 

SAMPLE PROGRAMS INCLUDED. 

CASSETTE $19.95 

PLEASE SPECIFY 16K. 32K OR 48K 

WORKBENCH SOFTWARE 
P.O. BOX 24497 
DAYTON. OHIO 45424 ^356 



■See List ol Advertisers on page 402 
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take a good look at it, you'll see 
that I cheated a bit by not 
decoding all the available ad- 
dress lines, not using all the 
data lines, and I used CMOS 
switches instead of the stan- 
dard 74LS367 tri-state buffers. 
These departures from the nor- 
mal procedures are worthwhile 
in this case because cost, parts 
and voltage drain are drastically 
reduced if we use only those 
signal lines we really need. 

The circuit was designed 
around the requirement to keep 
program statements simple. 
For example, I wanted to call 
the input data from the left 
joystick with INP(1) and the 
right joystick with INP(2). I also 
wanted the output ports to pro- 
vide a latched change of logic 
level with unambiguous state- 
ments. OUT 1,X (X is an integer 
from to 255) sends a logic 
change output signal for the 
left player, and OUT (2,X) does 
the same for the right player. 
OUT 0,0 resets the output 
signal latches for both players 



to their normal logic state. 
These commands were pur- 
posely chosen so that the pro- 
grammer could easily remem- 
ber what commands affect 
which port while avoiding any 
possible interaction with the 
TRS-80 cassette input and out- 
put port (#255). 

Also, note that the five data 
lines D0-D4 are used only with 
the INP statement; they are, in 
effect, tri-stated at all other 
times. This is done because we 
really don't need to output any 
specific data, but just need an 
indication that an OUT com- 
mand has been issued to one of 
the two output ports. Thus, the 
two address lines during the 
OUT statement provide all the 
output data that is necessary; 
i.e., they identify which output 
port is to be activated. During an 
INP statement, however, we 
want to monitor the logic level at 
each of five separate switches 
(right, left, up, down and fire) 
and pass this data to the CPU. 
Without going into the complex- 



ity of data multiplexers, this will 
require five separate data lines, 
one for each switch. 

How is all of this done? Pins 
12 and 19 of the TRS-80 expan- 
sion edge connector provide the 
OUT* and IN* signals respec- 
tively. Each is a negative-going 
strobe pulse of about 1.3 
microseconds which occurs 
during the execution of the OUT 
or IN statement. The OUT* or 
IN* signal line may be low in any 
instant, but not simultaneously. 
These strobes are used in con- 
junction with the two address 
lines A0 and A1 to determine 
which other parts of the circuit 
are activated. 

All the address and data lines 
used are gated through U1-U3. 
These devices are solid-state 
switches and, in the circuit 
shown, take the place of the 
usual tri-state buffers found in 
most other computer interface 
designs. Looking at the top 
switch of U1, the input pin 1 is 
connected to the output pin 2 
only if the control line pin 13 is 



high. The resistance between 
pins 1 and 2 is then about 300 
ohms. But when pin 13 is low, 
the resistance between the 
same two pins is on the order of 
several hundred megaohms 
(open-circuited). Further, the 
switch is bidirectional, so that 
pin 1 can be used as the input 
and pin 2 as the output, or pin 2 
can be the input and pin 1 the 
output. This allows great flex- 
ibility when laying out a printed 
circuit board. 

The OUT* and IN* signal lines 
are fed to U5b and the U5b out- 
put is inverted by U4b. The out- 
put of U4b is normally logic 0, 
but when either the OUT* or IN* 
line is strobed low, the U4b out- 
put rises to logic 1, which turns 
on the top two switches of U1. 
This allows the two address 
lines to be decoded at the U5a 
and U5c inputs. However, U4f 
keeps these gates OFF unless 
the IN* signal has strobed low 
and activated the address line 
switches (OUT* has no effect 
here). When INP (1) is executed, 
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Fig. 1. Schematic diagram. 



QUALITY SOFTWARE FOR TRS-80 COLOR! 




ADVENTURES!!!! 
For TRS-80, and COLOR-80. These Ad- 
ventures are written in BASIC, are full 
featured, fast action, full plotted adven- 
tures that take 30-50 hours to play. 
(Adventures are inter-active fantasies. 
It's like reading a book except that you 
are the main character as you give the 
computer commands like "Look in the 
Coffin" and "Light the torch.") 

Adventures require 16K on COLOR- 
80 and TRS-80. They sell for $14.95 
each. 

ESCAPE FROM MARS 
(by Rodger Olsen) 
This ADVENTURE takes place on the 
RED PLANET. You'll have to explore a 
Martian city and deal with possibly 
hostile aliens to survive this one. A good 
first adventure. 

PYRAMID (by Rodger Olsen) 
This is our most challenging ADVEN- 
TURE. It is a treasure hunt in a pyramid 
full of problems. Exciting and tough! 

TREK ADVENTURE (by Bob Retelle) 
This one takes place aboard a familiar 
starship. The crew has left for good 
reasons - but they forgot to take you, 
and now you are in deep trouble. 

DEATH SHIP (by Rodger Olsen) 
Our first and original ADVENTURE, 
this one takes place aboard a cruise ship - 
but it ain't the Love Boat. 

VAMPIRE CASTLE (by Mike Bassman) 
This is a contest between you and old 
Drac - and it's getting a little dark 
outside. $14.95 each. 



SPACE SHUTTLE 
ONE OR TWO PLAYER HIGH RES GAME - 

Your mission is to dock with an orbiting space 
platform — but you may have to land on the 
planetary surface for refueling first. A real value 
in a high res real time game. $6.95. 

KILLERBOT - (Available in 4K) - Real time 
action at 20 levels of difficulty as you run, 
sneak, and dodge your way through a bloody 
field of Killer Robots. Get across or die! Joy- 
sticks or Keyboard controls. TRS-80 COLOR 
(ANY BASIC 4K or more.). $9.95. 

SLASHBALL (Available in 4K) - This one is 
best described as a thinkers arcade game. It 
rewards fast reflexes and clear thinking - like 
nothing you have ever seen before. It is one of 
our best family games for one or two players. 
$9.95. 

TIMETREK - A REAL TIME, REAL GRAPHICS 
STARTRECK. See your torpedoes hit and watch 
your instruments work in real time. No more un- 
realistic scrolling displays! $14.95. 

STARFIGHTER - This one man space war game 
pits you against spacecruisers, battlewagons, and 
one man fighters, you have the view from your 
cockpit window, a real time working instrument 
panel, and your wits. Another real time goody. 
$9.95 

BATTLEFLEET - This grown up version of Bat- 
tleship is the toughest thinking game available on 
OSI or 80 computers. There is no luck involved 
as you seek out the computers hidden fleet. A 
topographical toughie. $9.95 

LABYRINTH - 16K EXTENDED COLOR 
BASIC - With amazing 3D graphics, you fight 
your way through a maze facing real time mon- 
sters. The graphics are real enogh to cause claus- 
trophobia. The most realistic game that I have 
ever seen on either system. $14.95. 





QUEST - A NEW IDEA IN ADVEN- 
TURE GAMES! Different from all the 
others. Quest is played on a computer 
generated map of Alesia. Your job is to 
gather men and supplies by combat, 
bargaining, exploration of ruins and 
temples and outright banditry. When 
your force is strong enough, you attack 
the Citadel of Moorlock in a life or 
death battle to the finish. Playable in 2 
to 5 hours, this one is different every 
time. 16K COLOR-80 OR TRS-80 
ONLY $14.95. 




SPACE ZAPPER — Protect your central 
Star Base from ships that attack from 
all four sides. Fast reflexes are required 
as the action speeds up. Great for kids 
or Dads. This game has high speed high 
resolution graphics and looks as if it just 
stepped out of the arcades. — 16K ex- 
tended or 32K disk. BASIC TRS-80 
Color only. $14.95. 



#' 



Please specify system on all orders 
This is only a partial listing of what we have to offer. We have arcade and 
thinking games, utilities and business programs for the OS1 and TRS-80 Color. 
We add new programs every week. Send $1.00 for our complete catalog. 




TRS80 



AARDVARK-80 
2352 S. Commerce, Walled Lake, Ml 48088 
(313)669-3110 



TRS 80 COLOR 



-See List of Advertisers on page 402 
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Are you tired of searching the latest magazine for articles about 
your new Color Computer? When was the last time you saw a 
great sounding program listing only to discover that it's for the 
Model I and it's too complex to translate? Do you feel that you are 
all alone in a sea of Z-80's? On finding an ad for a Color Computer 
program did you mail your hard earned cash only to receive a 
turkey because the magazine the ad appeared in doesn't review 
Color Computer Software? If you have any of these symptoms 
you're suffering from Color Computer Blues! 

But take heart there is a cure! 
It's COLOR COMPUTER NEWS. 

The monthly magazine for Color Computer owners and only Color 
Computer owners. CCN contains the full range of essential 
elements for relief of CC Blues. Ingredients include: comments to 
the ROMS, games, program listings, product reviews, and general 
interest articles on such goodies as games, personal finances, a 
Kid's page and other subjects. 

The price for 12 monthly treatments is only $21.00 and is available 

from: 

•■k* . REMarkable Software 

P.O. Box 1192 
Muskegon. Ml 49443 * 145 



\JM 



NAME 



ADDRESS 
CITY___ 



State. 



Zip 



Allow 8-10 weeks for 1st issue. 



80 M 



SAVE 
$$$ 



TRS-80 

MICROCOMPUTERS 

CALLUS... 
SAVE MONEY 



SAVE 

$$$ 




Model II 
64 K 

$3270.00 
up to 16% 
discount off 
retail 



CALL COLLECT: 
- 14 6 512-689-5536 
Master Electronics, Inc. 

154 N. 5th, Raymondville, Tx. 7 8580 



m m 



Form F48 Provided 
Standard Warranty On Merchandise 




Authorized TRS-80 Deaier. Store #F-723 



IN* is strobed low, address line 
A0 is high and A1 is low, so all in- 
puts at U5c are high; U5c pin 10 
goes high, which turns on the 
bottom two switches of U1 and 
the top three switches of U2. 
The computer data lines D0-D4 
are now looking for input data 
from the left joystick. Since no 
input connection is made to 
data lines D5-D7, the CPU sees 
these as logic 1 signals. 
Therefore, if no switch is 
depressed when INP(1) is ex- 
ecuted, the CPU gets the value 
255 as the input data from the 
left joystick. 

Now if IN* is strobed low in 
response to an INP(2) statement, 
A0 is low and A1 is high. Again, 
U4b pin 4 closes the top two swit- 
ches in U1, the A0 and A1 ad- 
dress lines are applied to U5b 
and U5c, and U5a pin goes high. 
This turns on the bottom switch 
in U2 and all switches in U3, and 
the CPU is now looking for input 
data from the right joystick. Mov- 
ing the joystick to the right posi- 
tion takes DO low (inputted data 
is 254); the left position inputs 
253. The UP position inputs 251, 
and 247 is inputted if the joystick 
down switch is closed. If the fire 
button is pressed, D4 goes low 
and inputted data is 239 (see 
Table 1). These input values are 
then used by the program to deter- 
mine the proper action to be 
taken. 

A similar process is used to 
decode either of the two output 
ports, except decoding is done 
by U6c and U6a. When A0 is 
high, A1 is low, and OUT* is 
strobed low in response to OUT 



1,X all inputs of U6a are then 
low, allowing pin nine to go low. 
This toggles the cross-con- 
nected flip-flop U7c-U7d. This 
toggled state will be maintained 
until reset by an OUT 0,X state- 
ment, or until manually reset by 
depressing S1. OUT 0,X is 
decoded by U6b, which is really 
a third output port, but is used 
only to reset the first two. U6b 
pin 6 goes low, and both flip- 
flops are reset through D1. One 
thing to keep in mind: It's a good 
idea to include the statement 
OUT 0,0 near the beginning of 
any program, just to make sure 
the output ports are properly 
initialized. 

Provisions are made at the 
output of each flip-flop to ac- 
tivate a relay for external control 
of bells, whistles, etc. When U7a 
pin 3 goes high, Q1 is saturated 
and the relay closes. A typical 
low-current relay is sold by 
Radio Shack and requires only 
12 ma. A spike-limiting diode 
rectifier (1N4001, etc.) may be 
placed in parallel with the relay 
coil as shown in Fig. 1. 

Since the circuit is all CMOS, 
power drain is virtually neglig- 
ible, and the circuit could be 
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Fig. 2. Parts placement diagram. 
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SmaU. 
"AMERICAN Business 

COMPUTERS 



/SS 118 SO. MILL ST 

PRYOR, OK 74561 
(918) 825-4844 



ALL LISTED PRICES ARE CASH DISCOUNTED. WE ACCEPT MC, VISA, AND COD (REQUIRES CERTIFIED CHECK, CASHIER'S CHECK OR 
CASH). FOR CHARGE ORDERS, PLEASE ADD 3%. FOR COD SERVICE, PLEASE ADD 3%. OKLAHOMA RESIDENTS PLEASE ADD4% SALESTAX. 
********* NEW RETAIL LOCATION — SOUTHWOOD SHOPPING PLAZA, PRYOR, OK******** 

DON'T PAY 



MORE!! 



TRS-80 MODEL III 




TRS-80 16K Model III $825.00 

TRS-80 48 K Model III $849.95 

TRS-80 48 K Model III 

with one disk drive $1499.95 

TRS-80 48K Model III 

with two drives $1749.95 

"Model III is also available with dual head and 80 track 
drives. Drives listed give same performance as standard 
Radio Shack units. 



THERE'S NO 
SECRET 

There's no secret as to why we can sell 
TRS-80 computer equipment for less. Low 
overhead — that's the reason — pure, sim- 
ple and straight! As everyone knows. Radio 
Shack is a huge corporation. ..with huge 
expenses. We are able to buy the bare- 
bones computers from Radio Shack. To 
these computers, we add our own memory 
chips, disk drives, cables, etc. The result is 
a computer system which is equal to, or in 
many cases, superior to the one you would 
get from Radio Shack in both price and per- 
formance capabilities. There is one thing 
that you don't get from Radio Shack — their 
90 day warranty. What you get in its place is 
the exclusive 120 days American Small 
Business Computer's Warranty. So. ..if you 
like the Radio Shack computer, but don't 
like the price. CHECK US OUT!!! 
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64K MODEL II 
WITH ONE DISK DRIVE 



COLOR COMPUTER 




AW...WHAT THE HECK 

RAM Memory Chips (or the TRS-80 4„ ; ,\ d -, : or 



$1795 

PER 16K SET 



$7287 



OO 



CC DISK DRIVE 



COLORCOMPUTER4K LEVEL I $318.00 

COLOR COMPUTER 16K 

EXTENDED BASIC $487.00 

COLOR COMPUTER DISK 

DRIVE 1 $499.95 

COLORCOMPUTER DISK DRIVE 

2, 3 or 4 $329.95 

COLORCOMPUTER JOYSTICKS $24.95 

* DEALER INQUIRIESINVITED 



TRS-80 MODEL III SOFTWARE 

DISCOUNT PRICES ON 
Model III Software 

Profile (26-1562) $69.95 

Profile III Plus (26-1592) $175.00 

VisiCalc (26-1566) $80.00 

VisiCalc III (26-1569) $175.00 

Scripsit (26-1563) $79.95 

Super Scripsit (26-1590) $175.00 

Scripsit Dictionary (26-1591) $131.00 




COLOR 

COMPUTER 

DISK DRIVE UNIT 



CALL 918-825-4844 



$499 



95 



* TM Tandy Corp. ^217 



powered with four internal 
NiCad cells (1.25v per cell). 
However, to ensure proper and 
constant TTL-compatible logic 
levels to and from the computer, 
the PC board accomodates U8, 
a standard 5-volt regulator in a 
TO-220 case, which can be 
powered by any AC adaptor for 
games or calculators which has 
an output voltage between 8 and 
15 volts. 

Construction 

Parts layout is not critical, 
and is greatly simplified by 
using three resistor networks, 
each with seven 100K ohm pull- 
up resistors. The entire circuit of 
Fig. 1, including the voltage 
regulator, is built on a 3" by 4" 
double-sided PC board and 
housed in an 8" by 3" by 5" LMB 
ME-583 cabinet, which is in 
strict conformance with my 
shrink postulate. My shrink pos- 
tulate states that the physical 
size of any completed project is 
determined not by the complex- 



LEFT JOYSTICK 



ity of the circuit, but only by the 
number and size of input and 
output panel controls and con- 
nectors. Anyway, I believe that a 
couple of extra dollars invested 
in a good-looking cabinet is well 
worth it. Inside, the electron 
doesn't care. 

The two joystick input 
sockets, the on-off switch and 
the reset button are placed on 
the front panel, and the com- 
puter connector socket, right 
and left output jacks, and the 
AC adaptor input jack are on the 
rear panel. Standard 9-pin 
D-connector sockets are used 
on the front panel (Atari 
joysticks can be plugged in 
directly), and, since ten signal 
lines are required to the com- 
puter, a 15-pin D-connector is 
used on the rear panel. 

Connections to the joysticks 
and computer panel connectors 
are simplified by using standard 
14-pin headers at the IC sockets 
labeled Z1 and Z2. This also 
minimizes the time and effort 



needed to remove the PC board 
from the cabinet once it's wired 
in. Simply removing the headers 
from the two IC sockets discon- 
nects 22 of the 27 required 
interconnecting wires. Provi- 
sions have also been made on 
the PC board to tap off the +5 
volt regulator output to drive 
other circuitry you may want to 
include inside the cabinet. 
About 200 ma is available, 
assuming that the AC adaptor 
you use can supply that current 
continuously. Also, if you do 
want to tap into the computer 
address and/or data lines, the 
header plugs make it extremely 
convenient to do so. If desired, 
the ME583 cabinet is sufficient- 
ly large to permanently install 
the AC adaptor inside and 
eliminate the AC adaptor input 
jack. This would also provide a 
little more "ballast weight" for 
the cabinet. 

Software 

Inputting data and activating 




Z2 of 

Fig. I 



RIGHT JOYSTICK 





♦ 5V 


GND 


LM324 


4 


1 1 


40 498 


1 


8 



Fig. 3. Interface for potentiometer joysticks. 



the output ports can be done at 
any appropriate step in the pro- 
gram logic flow. For example, 
the input data lines can be con- 
tinually scanned for closure of 
any switch inside a Basic loop 
(or Assembly program counter- 
part) with an elementary routine 
such as: 



300A = INP(1): B = INP(2) 

310 IF A = 255 AND B = 255 THEN 300 

320IFB<255THEN340 

330 IF A = 254 THEN (R) ELSE IF 

A = 253 THEN (L) ELSE IF A = 251 

THEN (U) ELSE IF A = 247 THEN (D) 

ELSE IF A = 239 THEN (F) 

340 IF B = 254 THEN (P.) ELSE IF 

B = 253 THEN (L) ELSE IF B = 251 

THEN (U) ELSE IF B = 247 THEN (D) 

ELSE IF B = 239 THEN (F) 



This example shows switch 
closures in only one of the four 
cardinal directions, plus fire. Ad- 
ditional data values can also be 
tested for combinations of 
directions: 250 = UP and 
RIGHT; 246 ■ DOWN and 
RIGHT; 249 = UP and LEFT; and 
245 = DOWN and LEFT. Addi- 
tionally, the fire data line can be 
tested independently of the 
states of the direction data lines 
if the last statement on line 330 

is changed to: 330 ELSE IF A 

<239 THEN (F). Alternatively, if 
you want to input data when a 
certain set of conditions are 
met, one possibility is: 300 IF 
G = 10 AND H=3 THEN 
A = INP(1): B = INP(2). 

These software aids are 
directly usable on the Model I 
Level II with either switch-type 
or potentiometer joysticks using 
the interfaces shown in Figs. 1 
and 3. Minor changes to the 
logical operation statements 
may be required for use on other 
computers; however, the 
joystick hardware can be used 
by most any eight-bit Basic com- 
puter which has negative-going 
strobe signals during execution 
of OUT and INP statements, or 
their equivalents. If your com- 
puter has positive-going 
strobes, the OUT and IN signal 
lines can be inverted externally. 

Potentiometer Joysticks 

To use potentiometer-type 
joysticks with the interface 
shown in Fig. 1, we need a 
method of converting the con- 
tinuously varying resistance to 
discrete logic levels which are 
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SmaU 

Bus.ness 

COMPUTERS 



118 SO. MILL ST • PRYOR, OK 74161 
PHONE (918) 829-4844 



ALL LISTED PRICES ARE CASH DISCOUNTED. WE ACCEPT MC, VISA, AND COD (REQUIRES CERTIFIED CHECK, CASHIER'S CHECK OR 
CASH). FOR CHARGE ORDERS, PLEASE ADD 3%. FOR COD SERVICE, PLEASE ADD 3%. OKLAHOMA RESIDENTS PLEASE ADD4% SALES TAX. 
********* NEW STORE LOCATION — SOUTHWOOD SHOPPING PLAZA, PRYOR, OK ********* 

TRS-80 MODEL? 
MINI DISK DRIVES 



Our Model 3 Mini Disk Drive is based 
on the famous Tandon mini disk unit. 
Because of it's low cost and high reli- 
ability, we thought this Tandon unit 
the perfect choice for the Model 3. 
Much testing confirmed our opinion, 
and we think you '11 agree that it ' s the 
best mini disk for the money (and the 
Model 3)!!! 

* DEALER INQUIRIES INVITED 




INTERNAL DISK DRIVE KITS FOR THE MODEL III COMPUTER 

The kil includes one disk drive Of your choice, controller, power supply, cable 
mounting hardware, and complete instructions tor easy installation 

DRIVE TYPE DRIVE DRIVE 1 DRIVE 2 DRIVE 3 

External External 
Single Side 40 Track 

sioresabout 180.000 $595.00 239.95 265.00 285.00 

Bytes'Disk Drive 



Dual Head 40 Track 

Stores about 360 .000 $729.95 379.95 

Bytes/ Disk Drive 



369.95 369.95 



Single Side 80 Track 

stores about 360.000 $729.95 379.95 369.95 369.95 

Bytes'Disk Drive 

Dual Head 80 Track 

Stores about 720.000 $829.95 479.95 499.95 499.95 

Bytes'OiSk Drive 

■ Drives and 1 may be installed externally (with controller and power supply 
mounted internally) Please add $40 00 'or cost of cabinel and cover. 



TRS-80 MODEL 1 
MINI DISK DRIVES 

Our Mini Disk Drives are based on the world famous 
TEAC Mini Disk Unit. TheTEAC Unit features an esti- 
mated 8000 power-on-hours mean time between failure 
(that's 8 hours a day, 5 days a week, for 3.85 years! !). 
Our drives also feature a lead screw head positioner. 

This type of positioner insures accurate head position- „ ^^^ ^^^^^ 

ing over the read-write media whilegivmg a very quiet, ^^TT^ «^^^^^ JiaV f^^** 

noise-free read-write operation. If you have any doubts ^^Ul ^B all BBBBBBaa^ 

about our drives, our one year warranty should con- ^H j^^ ^^K ^J/^^. jfl^P 

vince you that we know this unit is the best drive at the ^H^B ^^W ibY laW ^^M 

best price on the American market. This is one exam- ^Mf^^r IiibbbbIbbbbI ^ibbbbi^' aa^aT 

pie where you can pay less and get more! ! ^^^^ 

MODEL 1 40TRACK FULLY TRS-80 COMPATIBLE 

DISK DRIVE $265 

MODEL 1 80 TRACK DRIVE (Requires NEW DOS 80 

oraquivalanttoftwaratowork) $369.95 

NEWDOS 80 (V«r»ion 2.0) $139.95 

B r™:™™ E s «,.* COMPLETE DRIVE 

2™v*c«" ::::::::::::::::::::S:n with power supply 

CALL: 918-827-4844 





,^219 
* TM Tandy Corp. 



recognizable and usable by the 
CPU. The additional circuitry of 
Fig. 3 performs that conversion. 
The five output data lines can be 
connected directly to the 
joystick inputs of Fig. 1, and the 
joysticks themselves now go to 
the inputs of Fig. 3. 

What we have in Fig. 3 is really 
four two-bit analog-to-digital con- 
verters. But this is all we need 
here since we're only interested 
in three different positions of the 
joystick lever: right, center and 
left or up, center and down. 

Looking at U9a and U9b, we 
see that these two op-amps are 
configured for maximum open- 
loop gain (no feedback resistor), 
and will act as voltage 
threshhold detectors, or voltage 
comparators. If the voltage into 
the inverting input is below that 
of the reference voltage on the 
non-inverting input, the op-amp 
output will be high. But when the 
inverting input reaches the 
threshhold reference voltage at 
the non-inverting input, the op- 
amp output toggles sharply to 
logic zero. The reference voltage 



at the U9a and U9b non-inverting 
inputs is determined by the 
R1-R2-R3 voltage divider, with a 
higher reference voltage at the 
non-inverting input of the top op- 
amp. The difference in reference 
voltages between the two non- 
inverting inputs (voltage drop 
across R2) will determine the 
amount of joystick travel around 
its center position, which is nor- 
mally the "off" area. I've ar- 
bitrarily selected the center 20 
percent of the lever motion to be 
the "off" area. The voltage on 
U9b pin 5 is 2.0 volts, and 3.0 
volts on U9a pin 3, a difference 
of one volt, or 20 percent of the 
total joystick wiper travel from 
zero to five volts. 

Now remember that to work 
properly with the switch-type 
joystick interface of Fig. 1, the 
right output line of Fig. 3 must 
go to logic zero when we move 
the joystick handle right (out of 
the center OFF area) and the 
left output line must be low only 
when the joystick handle is to 
the left of the center off area. 
When in the center off area, both 



'ight and left output lines must 
be high. This decoding is done 
by U10c and U10f. U10a, b, d and 
e are used only to provide buf- 
fered non-inverted output data 
to the inputs of Fig. 1. The pro- 
cess is repeated with U9c and 
U9d for the Up-pot, and with U1 1 
and U12 for the second joystick. 

The choice of the LM-324 as 
the quad op-amp for this ap- 
plication was made quite 
deliberately. Its particular ad- 
vantages are that it works well 
as a voltage comparator from a 
single ended 5V supply, uses a 
minimum of external com- 
ponents, and the voltage transi- 
tion threshhold can be set 
anywhere between a few milli- 
volts above ground and a few 
millivolts below Vcc and still 
give good switching perfor- 
mance. Additionally, it's widely 
available, quite inexpensive and 
draws only about three to four 
milliamperes. 

The entire circuit of Fig. 3 can 
be constructed on a small PC 
board or perf board and mounted 
above the PC board of Fig. 1. 



Stacking the two PC boards in 
this way saves both space in- 
side the cabinet and additional 
mounting bolts. Connecting the 
PC board of Fig. 3 to the joy- 
sticks and to the Fig. 1 PC board 
can again be simplified by using 
14-pin IC sockets and DIP 
headers, if desired. 

Inexpensive, easy to build and 
great to use! Real-time interac- 
tion between two players 
definitely turns any old hum- 
drum game into challenging 
competition. But the real key to 
exciting computer games is 
speed. So now that you're 
armed with this dual joystick in- 
terface, Assembly program- 
mers, arise! We want to see real- 
time animation, graphics and 
action! ■ 

The commercial-quality dou- 
ble-sided PC board for the cir- 
cuit of Figure 1 and an illustrat- 
ed step-by-step assembly manu- 
al for construction of the Dual 
Joystick Interface are available 
for $13.50 postpaid from the 
author. 




COLOR CONIPUTE 



COMPUVOICE 



TRS-80 



MADNESS & THE 



iive your computer a voice of its own build 
peech into voiii BASIC programs This machine 
inquaqe program is a must for your library no 



hards. 



-.dificatu 



cdPd 



$44 95 



RAMCHARGER 
32K UPGRADE 

Color Invaders 
Space War 



f Xff N() Ml MORY 

f ROM I 6K <..« K?K 

100" Compatible With 

I .tended Bawi 

No SoMcm-h, f> Modihf 

I its Inside Computer 

S7995 



MINOTAUR 




The best adventure game available to 


the color 


computer Over 200 rooms. 6 creature 


s '6 maqic 


spells, loads of treasures Written i 


machine 


language extended Basic not required 


S19 95 




• The Best Games Available 

• High Resolution Graphics 

• Fast, Machine Language 

• Fxt Basic (Not Required 

• $2 1 .95 each, cassette 

• $25.95 each, disk 

EXTENDED BASIC GAMES 

• LOTHAR'S LABYRINTH) 
Word Search Puz/le 

• BATTL FFLEET 
Battleship Search Game (one or 
two players) 

• SPACE TRADERS 
Galactic trading game 

$14.95/ea 



THE FACTS 



the guls 

Sp-.-s on 
schemata 
and progt 



( omplete des<uption ot 
of the Color Computer 
all the ICs complete 
s theory of operation 
arnminq examples 

$14 95 



NEW MACHINE 
LANGUAGE GAMES 

• COSMIC SUPER BOWL $14.95 

Similar to hand held football games. 

•PACKET MAN $21.95 

Gobble your way through the maze while 
avoiding the munchkins. 

• CROID $12.95 

Eliza type artificial intelligence game. 

SOUNDSOURCE 

Store must< or voice from a (asse'te tape in the 
computer and display it on the TV screen 
Shorten it. lengthen it moditv it and replay it 
through the TV's sound system. Build and test 
vour own sounds for games. No hardware mods 
needed 

$24.95 



UTILITIES 





► EDITOR/ ASSEMBLER $34.95 

» SUPER MONITOR 1 9.95 

• EPROM PROGRAMMER 89.95 

(Program your own ROMs for the ROVPAC port) 

' MAGIC BOX 24.95 

Load MOD l/lll Tapes into the color computer 

» DISASSEMBLER by Korenthal ... 1 4.95 

Written in BASIC • generate source and object code 
for the FACTS. 

DEALER INQUIRIES INVITED 



SPECTRAL 
ASSOCIATES 

145 HARVARD AVE. 
Tacoma, Washington 98466 

WRITE FOR COMPLETE CATALOG 

ADD 3% FOR SHIPPING $ I 00 minimum 
Allow 2-} wks for delivery 

(206)565-8483 -119 

VISA OR MASTERCARD ACCEPTED 
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ALL LISTED PRICES ARE CASH DISCOUNTED. WE ACCEPT MC, VISA, AND COD (REQUIRES CERTIFIED CHECK, CASHIERS CHECK OR 
CASH) FOR CHARGE ORDERS, PLEASE ADD 3%. FOR COD SERVICE. PLEASE ADD 3%. OKLAHOMA RESIDENTS PLEASE ADD 4% SALES TAX. 
********* NEW RETAIL LOCATION — SOUTHWOOD SHOPPING PLAZA, PRYOR, OK******** 

72k EXPANSION INTERFACES 



SPECIAL offering * NEW LOW, LOW PRICE • 



Due to a very special purchase. American 
Business Computers is able to offer a limited 
number of Radio Shack" Expansion Inter- 
faces at the lowest price ever. 

American Business Computers guarantees 
Expansion Interfaces to be Brand New — 
with original documentation and in perfect 
working condition 



$729 




^220 



CAMEO 
HARD DISK 
DRIVES FOR 

TRS-80 MODEL II 

The Cameo Hard Disk offers TRS-80 Model II users 10 
million bytes of on-line disk storage. Five million bytes are 
stored on a standard non-removable disk platter. The second 
five million bytes are stored on a removable "disk pack". 
This configuration allows, for example, the accounts receiv- 
able to be stored on one disk pack, accounts payable on still 
another disk pack, mailing list on another, etc., etc. 

The Cameo also allows up to four computers to share the 
same disk drive. This means one person working at one com- 
puter can be updating accounts payable, while another per- 
son working at another computer can be retrieving records 
from a data base. So. ..when your business needs soar 
beyond a floppy disks limitations, call AMERICAN SMALL 
BUSINESS COMPUTERS and ask for THE CAMEO CON- 
NECTION 

CALL FOR PRICING INFORMATION 
• Dealers needed for all Cameo Hard Disk Products * 




TRS-80 Dais y Wheel Printer II 

By Radio Shack 



Yes, this is the same 
Daisy Wheel sold by 
Radio Shack for a couple 
of hundred bucks more. 
This is just one more 
reason why it realty pays 
to shop American Small 
Business Computers. 

$1649" 




918-825-4844 



TRS-80™ LINE 
PRINTER 7 




GAME 



LOAD 80 



Change your computer's pieces into your pieces. 



Flip-A-Piece 



John Cominio 
626 Tortoise Way 
Satellite Beach, FL 32937 



This program will match you 
against the computer in a 
game similar to Othello. My ma- 
jor objective in writing this pro- 
gram was to learn how to write a 
playing algorithm and apply it in 
a game. 
To play, you start with a board 



The Key Box 

Basic Level II 

Model III 

at least 16K RAM 



divided into 64 squares, eight 
rows by eight columns. The 
playing pieces are small round 
disks with one black side and 
one white side. To start, two 
white and two black pieces are 
placed in the four center 
squares adjacent to each other. 
The object is to get more pieces 
on the board than your opponent. 
In this game the computer is 
black and you are white. Each 
player tries to flip the opponent's 
pieces. A legal move flips at least 
one of the other player's pieces. 
To flip, place your piece so your 
opponents' are between two of 
your pieces. The move in Fig. 1 
square 1 is legal since a black 
piece is between two white 
pieces. Pieces are also flipped 
diagonally. Square 3 will flip five 
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pieces: four up and down and one 
diagonally to the right. Square 2 is 
an illegal move; at least one black 
piece is not between two white 
pieces. The game ends when the 
board is full or no player has a 
legal move. If a player cannot 
move, the opponent takes an- 
other turn. 

Enter the program and run it. 
There will be a pause before the 
board is drawn. The message 
WHERE TO ('99' IF NO POSSI- 
BLE MOVE) -->? will appear. 
You have several options: enter 
your move, change the board, or 
save or load a game from cas- 
sette. To change the board type 
Change. To save a game type 
Save. You can save the game at 
any point during play. To load an 



old game type Load. To enter a 
move locate the column (10-80) 
and row (1-8). Add the two 
numbers for the square. The up- 
per right square is number 88, 
column 80 row 8. The lower left 
square is 11, column 10 row 1. 
Place pieces in the corners 
whenever possible; there they 
cannot be flipped. After any 
move the board is updated. The 
previous move is displayed at 
the bottom of the screen along 
with how many pieces were 
flipped. When the game is over 
the program displays how many 
pieces each player has flipped 
and the winner's name. 

The Program 

The program sets up various 
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Fig. 2. Move preference for each square. 
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(918) 829-4844 



COMPUTERS 



ALL LISTED PRICES ARE CASH DISCOUNTED. WE ACCEPT MC, VISA, AND COD (REQUIRES CERTIFIED CHECK, CASHIER'S CHECK OR 
CASH) FOR CHARGE ORDERS, PLEASE ADD 3%. FOR COD SERVICE, PLEASE ADD 3%. OKLAHOMA RESIDENTS PLEASE ADD4% SALES TAX. 
********* NEW STORE LOCATION — SOUTHWOOD SHOPPING PLAZA, PRYOR, OK********* 

DISCOUNT SOFTWARE 



MICROSOFT SOFTWARE 



FOR TRS-80 MODELS ONE, TWO, AND THREE 

COLOR COMPUTER 
GAMES 



Basic Compiler — MOD 1 159.95 

CPM orTRSDOS - MOD 2 319.95 

Fortran-80 - MOD 1 79.95 

I CPM Version — MOD 2 399.95 

COBOL (CPM Version MOD 2) 599.95 

M/SORT (CPM Version MOD 2) 119.95 

••ADVENTURE (MOD1, Disk Version). ..24.95** 
j Olympic Decathlon (Mod 1, Disk Version). ...23.00 

] Typing Tutor (Cassette Version Only) 14.00 

mu MATH/muMATH SIMP-80 Symbolic Math 

Package $ Call 

Editor/Assembler Plus 

(Cassette Version Only) 24.00 

DISCOUNT PRICES 

ON OTHER SOFTWARE PRODUCTS 

FOR THE TRS-80 

[new DOS 80 (Version 2.0) 
MOD 3 or MOD 1 139.00 

ICORDOS (An enhancement to the TRS-80 MOD 2 
TRSDOS operating system which allows the use 
of a CORVUS Winchester Disk System). .300.00 



Proofreader-Proofreader will check your scrip- 
sir, electric pencil, soft-tex, or other documents 
for spelling and typographical errors. Proof- 
reader can check every single word of even the 
longest document in under 5 minutes! The 38,000 
word dictionary, one of the largest available, can 
be easily extended with a user auxiliary dictionary 
to add any number of new words (only limited by 
disk file space). Only 99.95 

Soft-Screen — Soft-Screen is a state of the art full 
screen text editor. If you have never used a full 
screen editor before, you will be amazed at the 
power it gives you. Soft-Screen can literally save 
you hours of work!! Only. ..99.95 

Grammatik — A spelling checker may not be 
enough to catch all the dumb mistakes made by 
that less than efficient secretary!! Grammatik 
checks for capitalization, punctuation, balanced 
parentheses, and doubled words ("The The"). 
Grammatik also checks for sexist terms or esoteric 
jargon, word overuse, and misused phrases. 
Grammatik also includes utilities for adding your 
own dictionary of misused words and phrases. 
Only. ..99.95 



AT DISCOUNT PRICES 

"PACKET-MAN" 

"By 
CREq ZumwaIt SoFtware" 

Packet Man — Very similar to the popular arcade 
game. ,ln this exciting game you must dodge the 
munchkins who are out to eat you. Very challeng- 
ing and impossible to beat. Our most played 
computer game!! Only. ..24.95 

Color Space Invaders 21.95 

Meteroids 21.95 

G am e of Life 14.95 

Moon Lander 14.95 

BUY ALL 5 COLOR COMPUTER GAMES AND 

SAVE EVEN MORE!! 

All 5 of the above games Only. ..89. 95 



* ATTENTION SOFTWARE AUTHORS * 
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FARM & RANCH 
MANAGEMENT PROGRAMS 



illiim GookKCM.i'O P'Ofl'«(n It if C»JB'«Ot Mint* 
t -O'th. 9 •mployw (wyioiii. 9 «.IO"«»t Jccounlt o 



American Small Business Computers is one of the 
nation's largest suppliers and distributors of 
TRS-80 related software. If you have a program 
which you would like to market, please contact Ms. 
Jeanie Phillips at American Small Business Compu- 
ters. She will test and evaluate each program re- 
ceived. If the program meets our high standards, 
an offer of acceptance, along with our terms, will be 
returned with the software. All types of games, 
business and scientific programs will be con- 
sidered. Highest royalties are now being paid for 
Color Computer programs. 



GAMES SOFTWARE 

FOR 

TRS-80 MODEL I 

AND III 



OLYMPIC DECATHALON* 

FOR THE TRS-80* 

MODEL ONE 

$23.00 



DEALER 

INQUIRIES 

INVITED 



BIG FIVE 
SOFTWARE 



Super Nova $12.75 

Force $12.75 

Cosmic Fighter $12.75 

Meteor Mission II $12.75 

"Defense Command $12.75 



Disk Versions of the Above Programs 
Available for Only $18.95 



ADVENTURE 

FOR THE TRS-80* 

MODELONE 

$24.95 



) laniaii o v ■ a*" 1 * 



arrays; the B array contains the 
board. In the B array, one repre- 
sents a black piece, two a white 
piece, zero an empty square, and 
nine a square off the playing 
board. The D array contains all 
the squares where a piece can 
be put. The first four values in D 
are 81, 88, 11 and 18. The first 
square the computer evaluates 
is 81, a corner. 

The next one it checks is 88, 
the next corner and so on. The D 
array contains the squares ac- 
cording to where a piece should 
be placed. Fig. 2 shows the 
move preference for each 
square on the board. 

The additional arrays are for 
temporary storage during play. 
After the arrays are loaded and 
the board is drawn you are 
prompted to enter your move. 

Lines 190-300 check for legal- 
ity. Each square has eight adja- 
cent directions, any one of 



"//. . . no piece was 

flipped the move 
is declared illegal." 



which could flip pieces. A For. . . 
Next routine loops eight times 
(once for each direction). The var- 
iable A contains your move and 
the C array contains eight values 
(-11, -10, -9, -1,1,1,9,10,11). 
When your move in A is added to 
a value in C(x) it points to the di- 
rection to be checked for legal- 
ity. If you move to square 64 and 
add - 11, C(1) points to square 
53. The variable K points to the 
square being checked. Square 
53 is checked for a black piece. 
If there is none a new direction 
is checked (lines 280, 190 and 
200). If there is a black piece K 
continues to check for more 
black pieces (lines 220 and 230). 
If a white piece is not found at 
the end (line 240) it loops again 
to check another direction. If a 
white piece is found at the end, 
it backs up (line 250) and flips all 
the pieces in the row to white 
(line 270). The variable N keeps 
track of how many pieces are flip- 
ped. After flipping all the pieces the 
loop is incremented and the next 
direction is checked. This is done 



for each of the eight possible direc- 
tions. If, after all directions are 
checked, no piece was flipped the 
move is declared illegal (line 310). 
It is now the computer's turn. 
First it determines all legal 
moves. Lines 350-380 and 
470-610 do this. Line 350 puts 
the number of a square to be 
checked into the variable A. Line 
360 checks if the square is oc- 
cupied. If it is, the next square 
for evaluation is put in A. If the 
square is empty the subroutine 
starting at line 470 checks the 



move's legality. A legal move is 
put in the G array and how many 
pieces the move flips is put in 
the B2 array. Then the computer 
evaluates each move individual- 
ly. The variable N1 is the total 
number of legal moves possible 
for the computer. Line 400 forms 
a loop to load A with the values 
stored in G(x). The variable A 
now contains one of the com- 
puter's legal moves. Line 470 
puts that move in the B array. A 
subroutine restores the board to 
its original state (line 780) when 



the computer has finished eval- 
uating a particular move. Lines 
140-180 determine what dam- 
age the human can do to the 
computer if it makes the move 
it is working on. The maximum 

number of flips by the human 
is stored in the B1 array. When 
the maximum number of flips 
has been determined for each 

legal move the program goes to 
line 420. 

Lines 420-430 determine the 
computer's best move based on 



Program Listing 1 



10 CLS:DEFINTC-S,U-Z 

20 i***** OTHELLO 

30 ****** BY . JOHN COMINIO 

40 ****** 04-SEPT-1981 



50 DIMB(102) r C(8) ,D(64) ,G(40) ,H(40) ,B1<40) ,B2(40) ,B3(40) 

60 DATA9, 9, 9, 9, 9,9, 9, 9, 9, 9, 0,0, 0,0, 6, 0,0,&;979,0,O 0,0,0,0,0,9,9,0,0,0,0. 

0,0,0,0,9,9,0,0,0,2,1,0,0,0,9,9,0,0,0,1,2,0,0,0,9,9,0,0,0,0,0,0,0,0,9,9,0,0 

,0,0,0,0,0,0,9,9,0,0,0,0,0,0,0,0,9,9,9,9,9,9,9,9,9,9,9,-11,-10,-9,-1,1,9,10 



,11 

70 DATA81, 88, 11, 18, 83, 86, 61, 68, 31, 38, 13, 16, 63, 66, 33, 36, 84, 85, 51, 58, 41, 48, 14 

,15,64,65,53,56,43,46,34,35,74,75,52,57,42,47,24,25,73,76,62,67,32,37,23,26 
,82,87,71,78,21,28,12,17,72,77,22,27 

80 FORR=1TO99:READX:B(R)=X:NEXTR:FORR=1TO8:READX:C(R)=X:NEXTR:FORR=1TO60:RE 

ADX : D ( R) =X : NEXTR : X=0 : N=99 

90 GOSUB640 

100 PRINT@768,"";CHR$(30);:N=0:INPUT"WHERE TO ('99' IF NO POSSIBLE HOVE) — 

> ;AS:PRINT@768,CHRS(30);:IFAS="CHANGE"THEN900ELSEIFA$="SAVE"THEN980ELSEIFA 
$="LOAD"THEN1010ELSEA=VAL(A$) 

110 IFA=99THENX1=1:IFX=1ANDX1=1THEN680ELSEGOTO350 

120 IFA<11ORA>88THEN100 

130 IFB ( A) O0THENPRINTS832, "SQUARE OCCUPIED' :FORR=1TO750 : NEXTR: PRINT0832 ,CH 

R$(30) ;:GOTO100ELSER5=1:GOSUB190:R5=0:GOTO310 

140 R5=0:B1=0:FORR1=1TO60:A=D(R1) 

150 IFB{A)O0THEN170 

160 GOSUB190 

17 NEXTR1 

180 B1(Z)=B1:GOTO410 

190 N=0:FORJ=1TO8 

200 K-=A+C(J) 

210 IFB(K)O1THEN280 

220 K=K+C(J) 

230 IFB(K)=1THEN220 

240 IFB(K)O2THEN280 

250 K=K-C(J) 

260 IFK=ATHEN280 

270 N=N+1:IFR5=1THENB(K)=2:GOTO250ELSE250 
280 NEXTJ 

290 IFN>0THENIFN<B1THEN300ELSEB1=N 

3 00 RETURN 

310 IFN>0THEN330 

320 PRINT8832, "ILLEGAL MOVE" :FORR=1TO750:NEXTR:PRINT@832,CHRS(30) i:GOTO100 

330 IFN>1THENA$="S"ELSEA$="" ' " 

340 B(A)=2:PRINT"LEGAL MOVE. FLIPS" ; N; "PIECE" ;A$; ".": FORR=1TO1000 : NEXTR:GO 

SUB640 

350 N1=0:G(1)=0:R4=0:FORR=1TO60:A=D(R) 
360 IFB(A)O0THEN380 
370 GOSUB470 
380 NEXTR 

390 IFG(1)=0THEN450 

400 F0RZ=1T0N1:R4=2:A=G(Z) :B(A) =1:S1=A:GOSUB470:GOTO140 
410 GOSUB7 80iV=0:NEXTZ 

420 FORZ=lTONl : IFB1 ( Z) =0THENB1 ( Z) =.1 
430 B3(Z)°B2(Z)/B1(Z) :NEXTZ 
440 GOSUB790:R4=1:GOSUB470:GOTO620 

450 PRINTe896,CHR$(30) ;:PRINT"NO MOVE FOR ME" :FORR=1TO750 :NEXTR:X=1 : IFX=1AN 
DX1=1THEN680ELSEGOTO100 
460 END 

470 N=0:FORJ=1TO8:K=A+C(J) 

480 PRINTS768,CHR$(30) ; : PRINT'THINKING. . ."; 
490 IFB(K)O2THEN580 
500 K=K+C(J) 
510 IFB(K)=2THEN500 
520 IFB(K)O1THEN580 
530 K=K-C(J) 
540 IFK=ATHEN580 
550 N=N+1:IFR4=1THENB(K)=1 
560 IFR4=2THENB(K)=1:V=V+1:H(V)=K 
570 GOTO530 
580 NEXTJ 
590 IFR4=2THEN610 

600 IFN>0THENN1=N1+1:G(N1)=A:B2(N1)=N 
610 RETURN 

620 IFN=1THENA$=""ELSEA$="S" 

630 V=0:B(A)=l:PRINTe768,"";:PRINTCHR$(30);:PRINT"MY MOVE — >" ; A; "FLIPS";N; 
PIECE ;A$;".":PRINT:FORR=1TO1000:NEXTR:FORR=1TON1:H<R)=0:G(R)=0:B2(R)=0:B3 
(R)=0:B1(R)=0:NEXTR:N1=0:GOSUB640:GOTO100 

NGS{15,131 
FB(R1+Z)=1TH 



640 CLS:PRINT@0,"",:PRINTTAB(25)"O T H E L L 0" :PRINTTAB(24) ,-STRI 
) :PRINT@128,"";:Z=0:FORR=1TO8:FORR1=81TO88STEP1: PRINT" "--IFB 
ENA$="B"ELSEIFB(R1+Z)=2THENA$="W"ELSEA$="." 

" I A $ I : NEXTR1 i Z=Z-10 : NEXTR : FORR=6T03 : SET ( 9 , R) : SET ( 10 , R) : NEXTR : F 



650 PRINT 

ORR=9TO127:SET(R,30) :NEXTR:PRINT@710, """ ;VfORR=1T07TpRINTrI 

INT@767,"8"j :R=80:FORR1=128TO576STEP64: PRINT @R1,R; :R=R-10- 

$=""ELSEA$="S" 

660 IFN=0THENPRINTg896,"NO MOVE FOR ME" :GOTO670ELSEIFN=99THEN670ELSEPRINT 



" ; : NEXTR : PR 
NEXTR1:IFN=1THENA 



Program continues 
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SmaLL 
AMERICAN Business 



/_SS 118 SO. MILL ST 

PRYOR, OK 74561 
(918) 825 4844 



COMPUTERS 



ALL LISTED PRICES ARE CASH DISCOUNTED WE ACCEPT MC, VISA, AND COD {REQUIRES CERTIFIED CHECK, CASHIER'S CHECK OR 
CASH) FOR CHARGE ORDERS, PLEASE ADD 3% FOR COD SERVICE, PLEASE ADD 3%. OKLAHOMA RESIDENTS PLEASE ADD 4% SALES TAX. 
********* NEW RETAIL LOCATION - SOUTHWOOD S HOPPING PLAZA, PRYOR, OK ******** _^____ 

OH...SHAZZAM 

EPSON PRINTERS FOR THE TRS-80, APPLE, ETC. 



It Is the policy ol American Small Business 
Computers to offer merchandise at the 
lowest price possible. About a year ago, 
American Small Business Computers be- 
gan selling Epson Printers for the TRS-80, 
Apple, and other computers. The first 
month we sold them for $$j$»Q3. Someone 
else sold them for five dollars less. The 
next month we sold our Epsons for $v'vio«e8 
and someone else sold theirs for three 
dollars less. So this month our Sales Man- 
ager looked at the stack of unsold Epson 
Printers and said, "Oh...Shazzam, let's 
stop acting like a bunch ot dumb Okies. 
Lower the price and move 'em out!" So... 
this month it's Head 'Em Up, Move 'Em 
Out. Yee Haa Rawhide. Oops! Got 
carried away. Call for Prices. 




CALL 
FOR PRICING 



m 



918-829-4844 



These Epson Printers are brand new and 
in perfect working order. They are fully 
compatible with all TRS-80 Computers 
(when used with the correct cables and 
interfaces, of course). American Small 
Business Computers also offers similar 
savings on the MX-80 FT, MX-70, and 
MX-100. Attention Foreign Customers: 
WE EXPORT! Please call or write for 
export prices. 

^225 
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DISCOUNT COMPUTERS 

It is the stated goal of CLEVELAND ELECTRONICS to sell TRS-80 computers and peripherals at the 
lowest prices in the WORLD. We ask that you call other dealers, check your local Radio Shack store and 
mail order houses and then call us LAST (Toll Free, of course). We think that you will be pleasantly sur- 
prised. Please keep in mind that CLEVELAND ELECTRONICS is an authorized Radio Shack dealer . 

So... give us a call TODAY! 

WE NOW SELL - EPSON 

FOR TOLL FREE ORDERING 

AND PRICE QUOTES, CALL: 
1-800-5*1-5896 

CLEVELAND ELECTRONICS 

AUTHORIZED STORE #S-133 

121 BROADWAY 
CLEVELAND, OK. 74020 

1-800-551-5896 




TRS-80 MODEL III 

IN STOCK 






SB 




^226 



sSee List ot Advertisers on page 402 
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Program continued 



96, "LAST MOVE WAS" )A; "AND FLIPPED" ;N; "PIECE* ;A$; " ." 

670 RETURN 

680 Nl=0:N=0:PRINTe768,CHR$(31) ;:PRINT"GAME OVER" 

690 F0RR-11T088:IFB(R)=1THENN=N+1 

700 NEXTR 

710 PRINT"I HAVE" ;N; "PIECES" 

720 F0RR=11T088:IFB(R)=2THENN1=N1+1 

730 NEXTR 

740 PRINT'YOU HAVE" ;N1; "PIECES" 

750 IFN>N1THENPRINT"I WIN"ELSEIFN=N1THENPRINT"TIE GAME"ELSEIFN<N1THENPRINT" 

YOU WIN" 

760 INPUT'ANOTHER GAME (Y/N) " j AS: IFLEFTS (A$,l) ="Y"THENCLSzRESTORE:GOTO80ELS 

EIFLEFTS(AS,1)="N"THEN770ELSE760 

770 CLS:END 

780 FORR=1TOV:B(H(R))=2:NEXTR:B(S1)-0:RETURN 

7 90 N=N1:D=1 

800 D=D*2:IFD<NTHEN800 

810 D-INT( (D-D/2) 

820 IFD=0THENA=G(1) :RETURN 

830 IT=N-D 

840 FORI-1TOIT 

850 J=I 

860 L=J+D 

870 IFB3(L)>B3(J)THENT=B3(J) :T1-G(J) :B3(J)=B3(L) iG(J)-GU) :B3(L) -TjG(L) -Tl: 

J-J-D:IFJ>0THEN860 

880 NEXTI 

890 GOTO810 

900 PRINTe832,CHR$(31);zINPUT"ENTER SQUARE NUMBER";S 

910 IFS<110RS>89THENPRINTe832, "ILLEGAL BOARD CO-ORDINATE"ELSEIFB(S) -9THENS- 

0:GOTO910ELSE930 

920 FORR-lTO1000:NEXTRiGOTO900 

930 PRINT@832,CHRS(31) ; s IUPUT'COLOR (B/W) ";C$:C$»LEFT$(C$,1) 

940 IFCS="B"THENB(S) -1ELSEIFC$»"W"THENB(S) -2ELSE930 

950 GOSUB640 

960 PRINTe832,CHR$(31) ; i INPUT'MORE CHANGES (Y/N) ";C$:C$-LEFT$(C$, 1) :IFC$-*Y 

"THEN900ELSEIFC$»"N"THEN970ELSE960 

970 PRINTe832,CHR$(30) >:INPUT"WHOSE MOVE (B/W) "lC$!C$»LEFT$(C$,l) I IFC$»"B"T 

HENPRINTe768,CHR$(31):GOTO350ELSEIFC$-"W"THENPRINTe768 f CHR$(3e)«GOTO10BELSE 

970 

980 PRINTe768,CHR$(30) ; j INPUT'TAPE READY (Y/N) ■ ;A$:A$-LEFT$(A$,1) lIFA$-"N"T 

HEN100ELSEIFA$""Y"THEN990ELSE980 

990 FORZ=lT099STEP17iPRINT#-l,B(Z);","iB(Z+l) j " , " >B(Z+2) j *,*»B(Z+3) ; •," »B(Z 

+4) ;",";B(Z+5) ; " , ">B(Z+6) j ",";B(Z+7) ; ", ";B(Z+8) i","jB(Z+9) » "," ;B(Z+1B) > ","> 

B(Z+11) ? ",";B(Z+12);",")B(Z+13);","|B(Z+14);",";B(Z+15) j","»B(Z+16) 

1000 NEXTZ:N=99:GOSUB640:GOTO100 

1010 PRINT@768,CHR$(30);:INPUT"TAPE READY TO LOAD (Y/N) * }A$jA$-LEFT$(A$,l) J 

IFA$="N"THEN100ELSEIFAS""Y"THEN1020ELSE1010 

1020 F0RZ=1T099STEP17;INPUT#-1,B(Z) ,B(Z+1) ,B(Z+2) ,B(Z+3) ,B(Z+4) ,B(Z+5) ,B(Z+ 

6) ,B(Z+7) ,B(Z+8) ,B(Z+9) ,B(Z+10) ,B(Z+11) ,B(Z+12) ,B(Z+13) ,B(Z+14) ,B(Z+15) ,B(Z 

+16) 

1030 NEXTZ:N=99:GOSUB640:GOTO100 



its acquired information. For 
every move the computer can 
make it knows two things: How 
many pieces the computer will 
flip on each move and the max- 
imum number the human can 
counter with. It forms a ratio for 
each of its possible moves and 
stores these answers in the B3 
array. Line 440 is a sorting 
routine arranging the values in 
B3 from largest to smallest. 
Each time something in the B3 
array is swapped the corre- 
sponding move in the G array is 
also swapped. One number can 

point to the best ratio in the B3 
array and to the corresponding 
move in the G array. The com- 
puter then makes its move. If the 
ratio is .66667 the computer flips 

two pieces and the human three 
(a 2/3 ratio). However, if the ratio 
is 1 .66667 the computer flips five 
pieces and the human three (a 
5/3 ratio). A higher ratio means a 
better move for the computer. A 
ratio of one means the computer 
and human flip the same num- 
ber of pieces. ■ 



IMi/COBOL™ MAKES IT ACROSS! 



. . . FROM ONE OPERATING SYSTEM 

TO ANOTHER! 

A VITAL WAY TO PROTECT YOUR 

SOFTWARE INVESTMENT FOR THE 

FUTURE!! 

I I ii IM\ CIIKWI. language runs on more different 
Operating Systems and morn different-sized com- 
puters than any other similar language. For 
starters, it mils on NCR and II minicomputers 
and. in the micro field, on the CP/IVK MP/M'. 
Cl'M aii'. MP/M-86'. TRSDOS 3 . OASIS*. 
MOASIS 4 . and UNIX 5 . IONYX version) Operating 
Systems. . . lo mention only a lew. 

I 'ntil nou. serious business software of the scope 
and flexibility seen in the? minicomputer world has 
not been available on micros. I'.tt IHKttl, now 
allows transfer of such software with a minimum 
ol luss. 

We have participated in such a mini-to-micro 
transfer ol a major set ot general business software 




. using i:.\\ ( MKWI as the transfer mechanism, of 
course. Running on literally thousands of mini- 
computers, these refined, enhanced, and proven 

IM\ COKtll. and <RT!™ 6 from CYBERNETICS 
ARE GOING STEADY... 




...AND YOU'RE GONNA LOVE EM TOO!! 

I 'se your computer lo program itself. <RTl ICobol 
Reprogra mining Tool! I from Cylximetics is a program 
generator for It* IMM that produces error-free 
KM IMM, source programs for data input, file main- 
tenance, and report printing programs. 

A full feature interactive program generator, not a sub- 
set! Call Now! 7 14/848- 1!»22. 



ncDcx: 
_ „ nni — if 

software packages cover A/K. A/P. G'l., P/K. Order 
Kntry (with Invoicing and Inventory Control) as 
well as Sales Analysis. The Packages define a new 
level of achievement for features and flexibility in 
micro applications software and offer top quality at 
a reasonable price. 

For immediate information, call 714/848-1922 
for your complete product description. 

Trademarks of: 

l-Ryan-McFarlandCorp.;2-Digital Research, Inc.; 3-Tandy 
Corp.; 4-Phase One Systems, Inc.; 5-Bell Telephone 
Laboratories, Inc.; 6-Cybernetics. Inc. 

M |C|V.|BlE.LRlNte. IT.Li.tC.lS 

IS- 
8041 NEWMAN AVE., SUITE 208 
HUNTINGTON BEACH, CA 92647 
714/848-1922 
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LETTERHEADS 

Is Your Image worth the Investment 

We will Print any Letterhead in any Color for Only 
$186.50 for 1000, $210.50 for 2500. 

For under $100.00 we will attach your existing 
Letterhead to a Carrier Sheet. In quantities ol 500. 

Stock Computer Paper & Labels over 50 stock 
items at the lowest price anywhere. 



I 



Send Inquiries or Call: (313) 758-6629 

WHITE RIVER PRODUCTS 

P.O. BOX 604 

MT. CLEMENS, MICHIGAN 48043 



^364 



Name. 
Street. 



Phone 



City & State, 



Type ot Equipment. 



FREE 

SEND FOR 
YOURS TODAY 



I 



Stock Pnce List 



3X 
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ELECTRIC SPREADSHEET 



NEW Considering VisiCalc™? 

ELECTRIC SPREADSHEET does everything you can do 
with a pencil, paper and calculator. Start with a blank 
screen. Move the fast cursor to desired location. Enter line 
or column labels or data. Select preprogrammed operators 
for line, column, or cell calculations. Run. Results appear 
on the screen, formatted for your printer. Revise. Run 
again. 

PREPROGRAMMED OPERATORS for mathematics, 
finance, and statistics. Save data on tape or disk. The 
screen is your window to a larger spreadsheet. Output 
features scrolling and split-screen. Variable formats for 
labels and data. 

UNLIMITED APPLICATIONS. P/L forecast. Personal 
budget. Real estate investment. Net worth forecast. 
Invoice. Cash flow estimate. Sales analysis. Check record. 
Business forms. 

16K version has 50 operators. 32/48K version has 70 
operators plus histogram plot, remote storage of data, 
global revise spreadsheet layout, alpha entries, and more. 

16K Model I or III Tape $34.95 

32/48K Model I or III Tape $64.95 

48K Model III Disk $67.95 

YOU CANT LOSE! Calif, orders add 6V?% tax. 

VisiCalc is a trade mark of Personal Software. Inc. ^511 



Dan G. Haney & Associates, Inc. 
P.O. Box 687, San Mateo, CA 94401 
(415) 493-4094 



YOU'RE OUR PATIENT... 



MEDICAL & 
DENTAL SYSTEMS 



• Appointments 

• Master Records 

• Private Billing 

• ADA or AMA 
Claim Preparation 

• Diagnostic and 
Treatment Records 

• Recall and more 



Apple II • TRS-80 • Apple /// 



CHARLES MANN & ASSOCIATES 

55722 Santa Fe Trail 

Yucca Valley. CA 92284 

MICRO COMPUTER DIVISION I 714 ' 365-9718 
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FRICTION FEED FOR YOUR EPSON 

MX-70" MX-80' 

"MX-70 and MX-80 are Trade Marks of EPSON, Inc. 
********************************************** 

+ Converts your printer for friction 
feed of SINGLE SHEETS or ROLL 
PAPER. 

+ SIMPLE Installation (all you 

need is a screwdriver, no soldering 

+ Tractor feed remains undisturbed. 



+ Proven reliability. 

+ Available NOW! 

+ Only $39. 95 (add $1.50 for "postage 

********************************************** 

SATISFACTION CUARANTEED'OR YOUR MONEY BACK 




MICRO-GRIP, Ltd. 

P.O. Box 4278 
Norton AFB, Ca 92409 




^161 



»-See List ol Advertises on page 402 
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GRAPHICS 



Draw silhouettes or other irregular shapes. 



Shady Characters 




The silhouette copy of the photograph was generated by a Lineprint- 
er III. The original is 12 by 20 inches. 



Richard Ramella 

1493 Mountain View Avenue 

Chico, CA 95926 



A visit to the county fair pro- 
vided the springboard for 
this program, which has delight- 
ed my children and given me a 
practical way to replicate and 
store odd two-dimensional 
shapes silhouettes. 

In turn-of-the-century Amer- 
258 • 80 Microcomputing, March 



ica it was not unusual to find a 
silhouette cutter on a city street 
corner. For a few pennies the 
artist would scissor away at 
black paper and create a silhou- 
ette. Such artists are rare 
these days. 

But my eight-year-old daugh- 
ter did spot the silhouette's 
counterpart at the fair: a T-shirt 
with a computer portrait of its 
owner on its front. I promised my 
daughter we would try a comput- 
1982 



er portrait on the TRS-80. 

I failed in the attempt. For a 
portrait I needed video scan to 
read and enter data. So I decid- 
ed instead to do a silhouette, 
which only called for 300 Data 
numbers for a 15 by 20 inch pic- 
ture. A shaded portrait would 
have required nearly 20,000 
separate entries. 

The resulting program not on- 
ly produced silhouettes but 
gave me a way to replicate other 
odd flat shapes. I have since 
used the program in three prac- 
tical ways: To help a friend es- 
tablish a plan for her hourglass- 
shaped property; to fit a single 
piece of vinyl flooring across a 
large kitchen and into several 
nooks and crannies; and to re- 
duce the templates for a wood 
project I wanted to do in a size 
smaller than given in the plans. 

But making silhouettes with 
the program has most charmed 
me; to explain that process is to 
open the door to other, more 
practical uses. 

Do not let the brevity of the 
main program lull you into think- 
ing a silhouette project will be a 
snap. Not shown are the data 
lines which contain up to 300 
numbers. Each number is a val- 
ue which must be plotted. 

A lineprinter accommodating 
15-inch paper is best. The pro- 
cess requires care and patience 
for optimum results. 



To start, load wide paper into 
the lineprinter and run the fol- 
lowing program: 



100 CLS 

110 FOR X =1 to 150 

120 LPRINT STRING$(125,'."); 

130 NEXT X 



Make these lines print as 
tightly as possible. I have a 
Lineprinter III, which normally 
produces six lines to the inch 
but will squeeze in eight on com- 
mand. 

This little program prints 
18,750 dots: 150 lines of 125 dots 
each. Because I am miserly 
about the ultimate capacity of 
my printhead, I have only run 
this program once. I copy seg- 
ments of the master on a dupli- 
cating machine and paste it all 
together. 

Now you have a big piece of 
paper with dots on it. Next, seat 
your subject very close to a wall. 
Turn on a light source (a lamp, a 
slide or movie projector) that will 
yield a sharp shadow. Position 
the dotted paper so the shadow 



The Key Box 

Basic Level II 
Model I 
16K RAM 
Lineprinter required 



falls where you want it. Quickly, 
carefully trace the outline of the 
shadow. I cheat here. I photo- 
graph the subject in silhouette, 
mount the film as a slide and 
project it onto the paper for trac- 
ing. It ensures stillness by 
the subject. 

Then go back to the TRS-80. 
First, run this simple program: 



100 CLS 

120ForX = 1 to 150 
130 LPRINT X;" " 



This gives you a handy listing 
for entering the Data numbers. 

My Lineprinter III prints 10 
characters to an inch. Using a 
ruler, I start at line one at the 
top, and on the listing paper I en- 
ter two numbers for each line. 
The first is the number of the 
first dot which falls within the 
silhouette I have drawn. The 
second number is the last dot 
on the same line falling within 
the sketch. 

The beginning of the list 



might look like this: 

1 12 101 

2 12 102 

3 10 102 

When the list is finished, put 
those same numbers into data 
lines in this order: 

DATA 12,101,12,102,10,102. . . 

In the main program, (See Pro- 
gram Listing) the data lines go 
anywhere between lines 
120-1000. 

When you have added all the 
data to the program, run it. You 
will get a fairly detailed replica of 
the shape stored by the program. 

I can make the silhouette 
darker and better defined by 
making two runs, the second 
starting midway between the 
first and second lines of the ini- 
tial printing. Just mark the 
paper before the first run, print, 
back up the paper, reposition 
and run again.! 

Richard Ramella is a former 
newspaperman. 



ATTENTION UNIVERSITIES AND 
MEDICAL RESEARCH FACILITIES 

DO YOU NEED DETAILED 
STATISTICAL ANALYSIS? 

StatPac is a new 3-part program written and designed for 
research, survey and questionnaire processing, data entry, 
statistical analysis, management and market analysis. 
StatPac can be easily tailored to fit your needs because 
you create the data file format. All phases of research 
analysis can be processed, including: 

•frequency analysis 
•crosstabs & chi-square 
•correlation and linear regression 
•multiple linear regression 



•descriptive statistics 

•t-test 

•analysis of variance 

•management reports 



StatPac eliminates the need for expensive programming 
or renting time on large mainframe computers because it 
is the SPSS for the TRS-80's. 

Total Package, including an extensive step-by-step user's 
manual is $285.00. Manual may be purchased separately 
for $30.00 (may be applied to the purchase price of the 
disks). MasterCard and Visa accepted. 

Write or call for a FREE 16 page brochure (612) 866-9022. 

Walonick Associates, Inc. 
5624 Girard Ave. So. 
Minneapolis, MN 55419 

"Absolutely the best statistical analysis package I Ve seen 
for a microcomputer. ..." Eugene Allred, President of 
Consolidated Data Services, Minneapolis, MN. 



■ StatPac! 



COMPUTER KITS- FROM $69.95 




LNW SEMI-KITS can save you hundreds of dollars. By obtaining your own parts at the lowest 
possible cost and assembling the LNW SEMI-KITS, you can have the most highly acclaimed 
microcomputer in the industry - the LNW80. The LNW SEMI-KITS are affordable modules You 
can start with a modest cassette system and expand to a full 4 Mhz TRS-80 compatible system with 
5 or 8 inch double density disks and color at any time. 

A. LNW80 CPU - Made of high quality FR4 glass epoxy double sided circuit material, with plated- 
through holes and gold edge connector. It is fully solder-masked and silk screened. Here are just 
some of the outstanding features you will have when your . LN W80 CPU board is fully assembled: 
• 1 6K RAM • Color and black and white video • 480 x 1 92 high resolution giaphics • 64 and 80 
column video • 4 MhzZ80ACPU • Upper and lower case display • 500 and 1000 baud cassette 
I/O -$89.95 

B. SYSTEM EXPANSION-Expand the LNW80computerboard, TRS-80and PMC-80 computer 
with the following features: • 32K memory • Serial RS232C and 20Ma port • Real time clock • 
Parallel printer port • 5 inch single density disk controller • Expansion bus(screen printer port) • 
Onboard power supply • Solder- masked and silk screened legend - $69. 95 (tin plated contacts) - 
$84.95 (gold plated contacts) 

C. KEYBOARD- 74 key expanded professional keyboard- includes 1 2 key numeric keypad. Fully 
assembled and tested. - $99.95 

D. COMPUTER CASE -This stylish instrument-quality solid steel case and hardware kit gives your 
LNW80 that professional factory-built appearance. - $84.95 Add $12 00 for shipping. 

E. SYSTEM EXPANSION CASE -This stylish instrument-quality solid steel case and hardware kit 
gives your SYSTEM EXPANSION interface that professional factory-built appearance. - $59.95 
Add $10.00 for shipping. 

F. LNW80 CPU - HARD TO FIND PARTS KIT - $82.00 

G. LNW80 VIDEO - HARD TO FIND PARTS KIT - $31 .00 

H. SYSTEM EXPANSION - HARD TO FIND PARTS KIT - $27.50 
I. LEVEL II ROM set. (6 chip set) - $1 20.00 

VISA and MasterCard accepted. Add $3.00 for shipping plus S1.00 for each additional item. All 
shipments via UPS surface. Add $2.00 for U.S. Mail. Shipments outside continental U.S.. funds must 
be U.S. dollars. Sufficient shipping costs must be included with payment. 

ORDERS & INFORMATION - (714) 544-5744 
SERVICE- (714) 641-8850 



LNW Research Corp. 

2620 WALNUT Tustin. CA. 92680 
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TUTORIAL 



Sit at this table and have a byte. 



,-- .-,r 



Z80 Bit Tables 







000 




001 


010 


on 


100 


101 


110 


11! 


H 


<1 


■ 00 
























000 


NOP 




EX Af.AF' 


DJNZ f 


JR e 


JR NZ,c 


JR 1,1 


JR NC,t 


JR 


C,e 




001 


LO 


BC,nn 


ADD HL,BC 


LD DE,nn 


ADD HL.DE 


LD HL.nn 


ADD HL.HL 


LD SP.nn 


ADD 


HL.SP 




010 


LD 


(80, A 


LD A, (BC) 


LD IDE), A 


LD A, (Ml 


LD Inn I, HI 


LD HL,(nn) 


LD (nnl, A 


LD 


A,(nn) 


< 


on 


IMC 


BC 


DEC BC 


INC DE 


DEC DE 


INC HL 


DEC HL 


INC SP 


DEC 


SP 


3 


100 


MC 


B 


INC C 


INC D 


INC E 


INC H 


INC L 


INC (HL) 


INC 


A 




101 


DEC 


B 


DEC C 


DEC D 


DEC E 


DEC H 


DEC L 


DEC (HL) 


DEC 


A 




110 


LD 


B,n 


LO C,n 


LD D,n 


LD E,n 


LD H,n 


LD L,n 


LD <HL),n 


LD 


A,n 




111 


RICA 


RRCA 


RLA 


RRA 


DAA 


CPL 


8CF 


CCF 




fl 


• 01 
























000 


LD 


B,B 


LD C,B 


LD D,B 


LD E,B 


LD H,B 


LD L,B 


LD (HL),B 


LO 


A,B 




001 


LD 


B,C 


LD C,C 


LD D,C 


LD E,C 


LD H,C 


LD L,C 


LD (HL),C 


. LO 


A,C 




010 


LD 


B,D 


LD C,D 


LD D,D 


LD E,D 


LD H,D 


LD L,D 


LD <HD,D 


LD 


A,D 


( 


on 


LD 


B,E 


LD C,E 


LD D,E 


LD £,E 


LD H,E 


LD L,E 


LD (HL) , E 


LD 


A,E 


3 


100 


LD 


B,H 


LD C,H 


LO D,H 


LD E,H 


LD H,H 


LO L,H 


LD (HD,H 


LD 


A,H 




101 


LD 


8.L 


LD C,L 


LD D,L 


LO E,L 


LD H,L 


LO L,L 


LD (HI), I 


LD 


A,L 




110 


LD 


B,(HL) 


LD C, (HL) 


LD D, (HL) 


LD E,(HL) 


LD H,(HD 


LD L, (HL) 


HALT 


LD 


A, (ML) 




111 


LD 


B,A 


LD C,A 


LD D,A 


LD E,A 


LD H,A 


LD L,A 


LD (HL),A 


LD 


A,A 


fl 


* 10 
























000 


ADD 


A,B 


ADC A,B 


SUB B 


SBC A,B 


AND B 


(OR B 


OR B 


CP 


B 




001 


ADD 


A,C 


ADC A,C 


8UB C 


SBC A,C 


AND C 


XOR C 


OR C 


CP 


C 




010 


ADD 


A,D 


ADC A,D 


SUB D 


SBC A,D 


AND D 


(OR D 


OR D 


CP 


D 


f 


on 


ADD 


A,E 


ADC A,E 


SUB E 


SBC A,E 


AND E 


(OR E 


OR E 


CP 


E 


3 


100 


ADD 


A,H 


ADC A,H 


SUB H 


SBC A,H 


AND H 


(OR H 


OR H 


CP 


H 




101 


ADD 


A,L 


ADC A,L 


SUB L 


8BC A,L 


AND L 


(OR L 


OR L 


CP 


L 




110 


ADD 


A, (HL) 


ADC A, (HL) 


SUB (HL) 


SBC A,(HL) 


AND (HL) 


(OR (HL) 


OR (HL) 


CP 


(HL) 


♦ 1 


111 

a 1 1 


ADD 


A, A 


ADC A, A 


SUB A 


SBC A, A 


AND A 


(OR A 


OR A 


CP 


A 


■ n 

000 


RET 


NZ 


RET 2 


RET NC 


RET C 


RET PO 


RET PE 


RET P 


RET 


n 




001 


POP 


BC 


RET 


POP DE 


En 


POP HL 


JP (HL) 


POP Af 


LD 


8P.HL 




010 


JP 


NZ.nn 


JP Z,nn 


JP NC.nn 


JP C,nn 


JP PO.nn 


JP PE.nn 


JP P,nn 


JP 


M,nn 


< 


01! 


JP 


nn 


CB - Table 2 


OUT (n),A 


IN A, In) 


EK (SPI.HL 


EI DE.HL 


DI 


EI 




3 


100 


CALL 


NZ,nn 


CALL Z,nn 


CALL NC.nn 


CALL C,nn 


CALL PO.nn 


CALL PE.nn 


CALL P,nn 


CALL N,nn 




101 


PUSH BC 


CALL nn 


PUSH DE 


DO • Table 3 


PUSH HL 


ED - libit 4 


PUSH AF 


FD 


- Tibli 5 




110 


ADD 


A, n 


ADC A,n 


SUB n 


SBC A,n 


AND n 


HOD n 


OR n 


CP 


n 




111 


RST 


OOH 


RST OBH 


RST 10H 

Table 1 


RST 1BH 

First-byte 


R8T 20H 

Table. 


RST 28H 


RST 30H 


R8T 


3W 
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THE VIEW: You can see the curve of the Earth, four orbiting satellites with spinning radar antennae, 
much of North America, and six major population centers spread out beneath you. 

THE OTHER VIEW: Still in orbit, still four laser satellites, but overlooking the enemy's territory, with his 
protected missile launchers just a laser beam away. 

THE GOAL: Destroy all of the enemy missile launchers, while simultaneously protecting your cities 
from ICBMs that arc over the North Pole. And beware the MX-based particle beam weapons! 

VICTORY! As mind-numbing waves of nuclear holocaust plummet toward the United States, your 
fingers itch to activate the ultimate defense . . . ERADICATION! 



The first original arcade game in some time. 
One of the best arcade games of all time. 




• • • 



n 



'€&*t£Z 





MED SYSTEMS SOFTWARE 

P.O. BOX 3558 CHAPEL HILL, NC 2751 4 
TO ORDER, CALL 1 -800-334-5470 *. 



Herb Robinson 
3814 Skyline Rd. 
Carlsbad, CA 92008 



When I first encountered 
the Z80 instruction set, it 
seemed to be a real hodge- 
podge of information. I realized 
from my Editor/Assembler man- 
ual that a system lies behind the 
assignment of binary operation 
codes to instruction. The materi- 
al, however, was just too spread 
out for me to decipher. 

The instruction listings aren't 
much help. In one list, the in- 
structions appear in the numeri- 
cal order of their op codes, and 
in the other in the alphabetical 
order of their assembler mne- 
monics. Again, some structure 
is apparent, but not much. 

Through the Mostek Z80 refer- 
ence manual, another presenta- 
tion of the instruction set, more 
of the patterns began to emerge. 
Finally, "Secret Codes Re- 
vealed" by Edwin E. Freed (Kilo- 
baud Microcomputing, April 
1981), showed me how to dis- 
play the Z80 instructions to re- 
veal the most about selection of 
their op codes. 

Here's How. . . 

With only 62 exceptions, a 
Z80 instruction consists of a 
1-byte or 2-byte op code, possi- 
bly followed by a 1-byte or 2-byte 





000 




001 




010 


011 


100 


101 


110 


111 




i\ ' 00 
























000 


RLC 


B 


RRC 


B 


RL B 


RR B 


SLA B 


SRA B 


RL0 B 


SRL 


B 


001 


RLC 


C 


RRC 


c 


RL C 


RR C 


SLA C 


SRA C 


RL0 C 


SRL 


C 


010 


RLC 


D 


RRC 


D 


RL D 


RR D 


SLA D 


SRA D 


RL0 D 


SRL 


D 


< on 


RLC 


E 


RRC 


E 


RL E 


RR E 


SLA E 


SRA E 


RLO E 


SRL 


E 


3 100 


RLC 


H 


RRC 


H 


RL H 


RR H 


SLA H 


SRA H 


RLO H 


SRL 


H 


101 


RLC 


L 


RRC 


L 


RL L 


RR L 


SLA L 


SRA L 


RLO L 


SRL 


L 


110 


RLC 


(HLI 


RRC 


IHL) 


RL (HL) 


RR (HL) 


SLA (HL) 


SRA (HL) 


RLO (HLI 


SRL 


(HL) 


111 


RLC 


A 


RRC 


A 


RL A 


RR A 


SLA A 


SRA A 


RLO A 


SRL 


A 


fl ■ 01 
























000 


BIT 


0,1 


BIT 


1,0 


BIT 2,B 


BIT 3,8 


BIT 4,B 


BIT 5,B 


BIT 4.B 


BIT 


7,0 


001 


BIT 


0,C 


BIT 


l.C 


BIT 2,C 


BIT 3,C 


BIT 4,C 


BIT 5,C 


BIT 4,C 


BIT 


7,C 


010 


BIT 


0,0 


BIT 


1.0 


BIT 2,D 


BIT 3,0 


BIT 4,D 


BIT 5,0 


BIT 6,D 


BIT 


7,0 


( 011 


BIT 


0,E 


BIT 


IfE 


BIT 2,E 


BIT 3,E 


BIT 4,E 


BIT 5,E 


BIT 6,E 


BIT 


7.E 


3 100 


BIT 


0,H 


BIT 


1,H 


BIT 2,H 


BIT 3,H 


BIT 4,H 


BIT 5,H 


BIT t,H 


BIT 


7,H 


101 


BIT 


0.L 


BIT 


1>L 


BIT 2,L 


BIT 3,L 


BIT 4,L 


BIT 3,L 


BIT 4,L 


BIT 


'.L 


110 


BIT 


0,(HL) 


BIT 


1,(HL) 


BIT 2,(HL) 


BIT 3, (HL) 


BIT 4, (HL) 


BIT S, (HL) 


BIT 4, (HLI 


Bll 


7,(HL) 


HI 


BIT 


0,A 


BIT 


1,A 


BIT 2,A 


BIT 3,A 


BIT 4,A 


BIT 3,A 


BIT 6,A 


BIT 


7, A 


fl ■ 10 
























000 


RES 


0,1 


RES 


l.B 


REB 2,B 


RES 3,B 


RES 4,B 


RES 5,8 


RES 6,B 


RES 


7,0 


001 


RE5 


o,c 


RES 


1 , C 


RES 2,C 


RES 3,C 


RES 4,C 


RES 5,C 


RES 4,C 


RES 


7,C 


010 


RES 


0,0 


RES 


1,D 


RES 2,D 


RES 3,0 


RES 4,0 


RES 5,D 


RES 4,D 


RES 


7,0 


< 011 


RES 


0,E 


RES 


liE 


RES 2,E 


RES 3,E 


RES 4,E 


RES 3,E 


RES 6,E 


RES 


7 f E 


3 100 


RES 


0,H 


RES 


1 , H 


RES 2,H 


RES 3,H 


RES 4,H 


RES 5,H 


RES 4,H 


M 


7,H 


101 


RES 


0,L 


RES 


1,1 


RES 2.L 


RES 3,L 


RES 4,L 


RE8 5,1 


RES 4,L 


RES 


M 


110 


REB 


0,(HL) 


RES 


1,(HL) 


RES 2, (HL) 


RE6 3, (HL) 


RES 4, (HL) 


RES 3, (HLI 


RES 4, (HL) 


RES 


7, (HL) 


111 


RES 


0,A 


RES 


1,A 


RES 2, A 


RES J, A 


RES 4,A 


RES 5, A 


RES i,A 


RtS 


7, A 


n » ii 
























000 


SET 


0,B 


BET 


1,B 


SET 2,6 


SET 3,B 


SET 4,B 


SET 5, B 


SET 6,B 


SET 


7,0 


001 


SET 


0,C 


SET 


l.C 


SET 2,C 


SET 3,C 


SET 4,C 


SET 3,C 


SET 6,C 


SET 


7,C 


010 


SET 


0,D 


SET 


1,0 


SET 2,D 


SET 3,D 


SET 4,D 


SET 3,D 


SET 4,0 


SET 


7,0 


i 111 


SET 


0,E 


SET 


l.E 


SET 2,E 


SET 3,E 


SET 4,E 


BET 3,E 


SET 4,E 


SET 


7,E 


3 100 


SET 


0,H 


SET 


l,H 


SET 2,H 


SET 3,H 


SET 4,H 


SET 5,H 


SET 6,H 


SET 


7,H 


101 


SET 


0,L 


SET 


1,L 


SET 2,L 


SET 3,L 


SET 4,L 


SET 5,L 


SET 4,L 


SET 


7,1- 


110 


SET 


0,(HL) 


SET 


1,(HL) 


SET 2,(HL) 


SET 3, (HL) 


SET 4,(HL) 


SET 3, (HL) 


SET 4, (HLI 


SET 


7,(HLI 


111 


SET 


0, A 


SET 


l.A 


SET 2, A 


SET J, A 


SET 4, A 


SET 3, A 


SET 4, A 


SET 


7, A 










Table 2. Second-byte Table (first byte 


CB). 









AUTHORIZED TRS 80® DEALER #R491 






26-4002 

Model II, 64K 



26-1062 

TRS-80 Color Computer With Model III 1 6K RAM 

Extended Color BASIC Model III, BASIC 

$825.00 

WE ACCEPT CHECK, MONEY ORDER, OR PHONE ORDERS WITH VISA OR MASTERCARD. SHIPPING 
COSTS WILL BE ADDED TO CHARGE ORDERS. DISK DRIVES, PRINTERS, PERIPHERALS, AND SOFT- 
WARE-YOU NAME IT, WE'VE GOT IT. WRITE OR CALL FOR OUR COMPLETE PRICE LIST. 

C & S ELECTRONICS, LTD. 32 EAST MAIN ST. MILAN, MICH. 481 60 

(31 3) 439-1 508 (31 3) 439-1 400 ,38 

C & S ELECTRONICS MART IS AN AUTHORIZED TRS 80 SALES CENTER STORE #R491 
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THE NEW LAREDO LS525. 

WHEN YOU'RE READY 

TO GET DOWN TO BUSINESS. 



Laredo Systems, Inc. introduces the 
LS525 five megabyte rigid disk memory 
system for TRS80 Models I and III. 
Laredo's LS525 rounds up a Seagate 
ST506 Drive, LDOS Operating System by 
Logical Systems, and Laredo's own LSI 




500 Series Controller into a single-board 
controller that emulates the famed IBM 
3370 disk system, complete with: 
• Improved read/write/seek access time 
through full block buffering and variably 
tuned interleave. 



• On-board data separator, micro-code 
diagnostics and write-precompensation. 

• Increased disk media reliability and 
data integrity with automatic defect block 
allocation and extended ID fields. 

• Versatile CPU compatibility provided by 
separate host adaptor. 

Introductory Offer To TRS80 Users. 

Now through March 31, 1982 buy the 
LS525 for the OEM/dealer price of 
$2990, a savings of $760 off the usual 
suggested retail price of $3750. 

LDOS Operating System 
with manual and diskette 
available for $149. 



For more information about the LS525 
Memory System and the LSI 500 Series 
Controller, contact: Laredo Systems, Inc. 
2264 Calle de Luna, 
Santa Clara, CA 95050 
(408)980-1888 




larcdo yfttam^ inc. 



sSee List of Advertisers on page 402 
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operand. The bits in each byte of 
the op codes fall naturally into 
three fields: the most significant 
two bits, the next most signifi- 



cant three bits, and the least sig- 
nificant three bits. (I refer to 
these fields as f1, f2 and f3, re- 
spectively. They correspond to 



the three digits in the octal rep- 
resentation of the byte.) 

The instructions should be 
displayed as follows: For each 



possible value of one of the 
three fields, construct a table of 
instruction mnemonics whose 
rows are indexed by the possi- 





000 


001 010 011 


100 


101 


no 




11! 




fl • 00 


















000 


















001 




ADD H,BC ADD IX.DE 


LD 11, nn 


ADD 11,11 






ADD 


II, SP 


010 






LD Inn), 11 


LD IX, (nn) 










i 011 






INC 11 


DEC II 










3 100 






INC HI 


INC LI 


INC 


(Il+d) 






101 






DEC HI 


DEC LI 


DEC 


lll'd) 






no 






LD HI,n 


LD LI,n 


LD 


(IX*d),n 






in 


















ft • 01 


















000 






LD HI,B 


LD LI,B 


LD 


HI+d),B 






001 






LD HI,C 


LD LX,C 


LD 


(IUd),C 






010 






LD HI,D 


LD LI.D 


LD 


!II+d),D 






i on 






LD HI.E 


LD LI,E 


LD 


(II*d),E 






3 100 


LD B.HX 


LD C.HJ LD D,HI LD E,NI 


LD HI, HI 


LD LI, HI 


LD 


!II+d),H 


LO 


A,HI 


101 


LD B,U 


LB C,LK LD D,L* LD E,LI 


LD HI, LI 


LD LI,LI 


LD 


(II+d),L 


LD 


A, LI 


no 


LD B.m+d) 


LD C.dX+d) LD D.IIX+d) LD E,(H*d) 


LD H,(II*d) 


LD L,tII*d) 






LD 


A,(II*d) 


in 


, 




LD HI,A 


LD LI,A 


LD 


Ux*d),A 






« « 10 


















000 


















001 


















010 


















( on 


















3 100 


ADD A, HI 


ADC A.HX SUB HI SBC A,HX 


AND HI 


IDA HI 


OR 


HI 


CP 


HI 


101 


ADD A,U 


ADC A, LI SUB LI SBC A, Li 


AND LI 


I OR LI 


OR 


LI 


CP 


LI 


110 


ADD A.IIX+d) 


ADC A,UI+d) SUB <IJ*d) SBC A,(II*d) 


AND (Il+d) 


I0R (Il+d) 


OR 


(II*d) 


CP 


(II*d) 


111 


















fl » 11 


















000 


















001 






POP II 


if (II) 






LD 


SP.II 


010 


















f on 




CB - Tabic 6 


EI ISP), I I 












3 100 


















101 






PUSH II 












no 


















in 






















Table 3. Second-byte Table (first byte DD). 











IEEE-488 TO TRS-80* INTERFACE 
Everything needed to add powerful 
BASIC GPIB-488 controller capability 
to TRS-80 Model 1 or 3, Level 2 or 
DOS with a minimum of 16K. 

488-80B 

For Model 1 

Ooeration 




488-80C 

For Model 3 

Operation 

Model 488-80B or 488-80C Price: $375. 

+ shipping, insurance & tax 
WHEN ORDERING SPECIFY DISK OR TAPE 

SCIENTIFIC ENGINEERING 
LABORATORIES 

11 Neil Drive • Old Bethpage, NY 11804 
Telephone: (516) 694-3370 
'Trademark ol Tandy Corp. 
There is no atliliation between Scientific 
Engineering Laboratories and Tandy Corp. or 
Radio Shack. 



■^203 



A WIN AT 



il 



21 



91 



PROFESSIONAL "21" TUTOR 

Drills & exercises for learning & practicing 
basic playing strategy, card counting, & money 
management. Full casino simulation for play 
evaluation & practice with the benefit of 
excellent graphics! 

TRS80 Model III 

ATLANTIC CITY "21" 
Game Only 

Game & Basic Strategy 
Full System 

(IGk/cassette of DISK, specify "Hen ordering] 

NEVE0A SYSTEM AVAILABLE IN APRIL '82. 

Order ful system now & receive NEVADA SYSTEM FREE when 
available. Order by phone or mail. Pay by check. COD.. VISA or 
MASTERCARD. Add $1.50 lor shipping in US 53 /Canada. 
S5./0verseas Add $1.50 for COD or Blue Label 

Technical Software Systems 

Box 55, Shrewsbury, N.J. 0770 1 
(201) 780-4004 (24 Hrs.) 

N J residents add 5% sales tax "* 204 



$19.95 
$29.95 
$95.00 



V 



REAL ESTATE SOFTWARE 

fur APPLE. TRS-80 • PET 



PROPERTY MANAGEMENT SYSTEM: $325 



Tenant History 
Late Rent Report 
Vacancy Report 
Income Report 
Auto Late Charge 



Ownership Files 

Building Reports 

Utilities Report 



PROPERTY I.ISTINGS.COMPARABLES: $325 



22 Items/Listing 
1000 Listing/Disk 
Listing Memo Field 



Mai/Min Price 
Units/Zone/Cily 
Max Price/lr 
Max Price/Sq Foot 
Min Cashflow 



REAL ESTATE ANALYSIS MODULES: S40 Module 

• Home Purchase • Tax Deterred Exchange 

• Income Prop Analysis • APR Loan Analysis 



WORD PROCESSOR - MAGIC WAND: $285 




Suite F. Dept M 1 116-8lli Street, Manhattan Beach. CA 90266 
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More powerful programming tools 
for theTRS-80. Now on disk. 



Better results. Microsoft's Level III BASIC and Editor/ 
Assembler-Plus are programming tools that help you write 
complex programs in less time, with less effort and util- 
izing less memory. Better programs. No matter what your 
programming skill. And for the first time these tools are 
available on disk. 

Editor/ Assembler-Plus. A powerful editing, assembly and 
debugging tool with many sophisticated features that make 
writing TRS-80 assembly language programs easier, faster 
and more efficient. 

• Full disk capabilities. 

• Assembly directly into memory. No need to save object 
code then reload for execution. 

• Macro capability that allows you to define macros for 
commonly used sequences of instructions. 

• Conditional assembly that allows you to generate more 
than one version of a program. 

• Eight breakpoints at a time for program debugging. 

• The INCLUDE statement that allows you to call additional 
disk files for assembly. 

• Other features include extensive operators, automatic 
origin, symbol table printout, quash command, hex, deci- 
mal and octal constants, single step-through instructions 
in memory, five type-out modes, four type-in radices, plus 
extensive edit commands. 

A more powerful BASIC. With Level III BASIC, you get 
power to perform tasks in BASIC that used to require 
assembly language. Plus, new ease-of-use features for 
your TRS-80. 

• Advanced graphics. Develop charts, graphs, even anima- 
tion in Level III BASIC. Draw a line, an outline box or 



a solid box by specifying just two points. Then save and 
recall it with BASIC commands. 

• MENU. One command that allows you to construct an 
entire menu. 

• CHAIN and COMMON commands allow you to call 
another program and pass variables to it. 

• Powerful editing commands such as COPY/TRANSFER, 
FIND and CHANGE. 

• DUMP command that makes debugging easier. 

• Time-limit response. New INPUT # LEN and LINE INPUT 
# LEN commands allow you to set a time limit on response. 

• RS-232 output from BASIC. With a single command. 

• More. Level III gives you automatic line numbering, 26 
user-definable single stroke instructions, and more. 

Disk or cassette. Disk versions of Level III and Editor/ 
Assembler-Plus are brand new. Cassette versions are also 
available with many of the same capabilities 
Talk to your Microsoft™ dealer. Ask for a demonstration 
of two of the most powerful tools you can get for your 
TRS-80: Level III BASIC and Editor/ Assembler-Plus. On 
disk or cassette. From Microsoft. 

TRS-80 is a trademark of Radio Shack, a division of Tandy Corporation 

Microsoft is a trademark of Microsoft. Inc. 

Microsoft Consumer Products is a division of Microsoft, Inc. 
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CONSUMERS PRODUCTS 

10700 Northup Way, Bellevue, WA 98004. (206) 828-8080 




2 games per cassette 



for th« TRS-80 Model I or 111. 16 K 
Level L 1 or Model 1 ( I BASIC microcomputers . 
ail our programs have 

ACTION SOUNDS & GRAPHICS 




Vou design your own space fighter and 
then blast off into battle. Human or 
10 Computer Opponents. Fight in 2 or 3 
dimensions. Three scenarios: "Smuggler". 
"Refuel Option", and "Phoenix Decathlon". 

THE NEW STARSHIP VOYAGES 

A brilliant "trek" type space war. 3D 
galaiy with wrap around. Moving enemy 
craft, some are "Cloaked". 16 commands. 
Rescue starbase Delta from the Rogues, 
catalog No. 2001 S 19.95 




PARSECTOR V 



Still 

The 
Ultimate 
Space 

War 



Unique split screen gives each player a 
private display. Launch fleet battle craft 
and watch them tight. Fire high powered 
energy beams or short range weapon spreads. 
Human or computer opponent. 

PARSECTOR 8 Tournament Version. 
Giant galaiy to conquer. Intense Strategy ! 
catalog No 2002 $ 19.95 




„ ! ! ! ants ! ! ! 

/■fit Amazing 

War 
Between 

Ant 
Colonies 

Fast, machine language speed Three game 
vaiiations "Open Field", "Nest Barrier", 
and "Digging Ants". 2 players or computer 
opponent Easytoplay, Challenging to 
master. Fun packed game for all ages ! ! ! 

THE NEW STARSHIP VOYAGES 

catalog No. 2003 S 14.95 



HIGH SPEED LIFE 

The FASTEST, most ADVANCED version of 
I.H.Conway s famous mathematical game 
Spectacular kaleidoscopic animation 
500gen/min typical 32 preprogrammed 
patterns Multiple control functions 

( Rated No. 1 in BO Software Critique, Issue 5 ) 

NAME THAT STATE QUIZ 

A top notch educational game Draws 
50 states and asks tive questions. 
Three quiz types. Easy to use 
catalog No. 2004 J 14.95 

Disk Owners 

On special request the above games are 
available on cassette (you transfer), same price, 
compatible with TRSDOS Disk Basic 48K . 



Add St 00 oostayo* Handling COO add $2 50 
I la. rfcuJM'i 1,1. MakeChecK ex MO iMyaue to 

Synergistic Solar, Inc. 

POBoi 560595, Miami FL 33156 



nto Dealei inquiry tovited 



ble values of one of the other 
fields, and whose columns are 
indexed by the possible values 
of the remaining field. Since the 
first field has four possible 
values (OO, 01, 10 or 11), and the 



other two have eight possible 
values each (OOO. ...,111), there 
will be four 8 by 8 tables, eight 4 
by 8 tables, or eight 8 by 4 tables 
of mnemonics. The first of these 
reveals the most structure. 



The table of first bytes con- 
tains four parts, one for each 
possible value of f1. In each part 
the columns are indexed by the 
possible values of f2, and the 
rows are indexed by the possi- 




000 



001 



010 



Oil 



100 



110 



Fl ■ 00 



000 
























00! 






ADD IY.BC 




ADD IY.DE 


LD IY,nn 


ADD IY, IY 






ODD 


IY.SP 


010 












LD (nn),IY 


LD IY,(nn) 










f Oil 












INC IY 


DEC IY 










3 100 












INC HY 


INC LY 


INC 


(IY*dl 






101 












DEC HY 


DEC LY 


D€C 


UY«dl 






110 












LD HY,n 


LD LY^n 


LD 


UY+d),n 






tic 
























Fl » 01 
























000 












LD HY,B 


LD LY,B 


LD 


(IY»d),B 






001 












LD HY,C 


LD LY,0 


LD 


(IY*d>,C 






010 












LD HY,D 


ID LY,D 


LD 


(!Y*dl,D 






< on 












LD HY,E 


LD LY,E 


LD 


<IY»d),E 






3 100 


LD 


B t HY 


LD C.HY 


LD D,HY 


LD E.HY 


LD HY.HY 


LD LY,HY 


LD 


(IY+dr.H 


LD 


A,HY 


101 


LD 


Ml 


LB C,LY 


LD D,LY 


LD E,LY 


LD HY.LY 


LD LY,LY 


LD 


(IY»d),L 


LD 


A,LY 


no 


LD 


B,(IY+d) 


LD C,(IY*d) 


LD D,(lY+dl 


LD E,llY*d) 


LD H,(IY»d) 


LD L, (IY+d) 






LD 


A, (IY+d 


in 












LD HY,A 


LD LM 


LD 


imdi.A 






Fl ■ 10 
























000 
























001 
























010 
























F Oil 
























3 100 


ADD 


A,H¥ 


ADC A,HY 


SUB HY 


SBC A,HY 


AND HY 


(OR HY 


DR 


HY 


CP 


KY 


101 


ADD 


A,LY 


ADC A,LY 


SUB LY 


SBC A,LY 


AND LY 


XOR LY 


OR 


LY 


CP 


LY 


110 


ADD 


A,(IY*d> 


ADC A.UYtd) 


SUB (!Y*d) 


SBC A, UY*d) 


AND (IY+d) 


»0R (IY+d I 


OR 


(IY*d) 


CP 


(!Y*d> 


111 

























Fl « 11 

000 
001 
010 
F 011 
3 100 
101 
110 
111 



CB - Table 7 



POP IY Jf> (IY) 

EK (SP).IY 
PUSH IY 



LD BP.IY 



Table 5. Second-byte Table (first byte FDj 
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ble values of f3. The instruction 
is completely determined by this 
table (except for any immediate 
operands) unless the first byte is 
CB, DD. ED or FD. Therefore, 
separate tables are needed for 
the second bytes of these in- 
structions (Tables 2, 3, 4 and 5). 
These tables are constructed in 
the same way as Table 1 . The 62 
oddball instructions are dis- 



played in a slightly different 
manner in Tables 6 and 7 to 
avoid a large, mostly blank, 
table. 

Following Freed's notation, I 
underlined those op codes not 
documented by the Z80 
manufacturer. Contrary to the 
implication in his article, some 
instructions using H and L can- 
not be prefixed by DD or FD to 



produce corresponding instruc- 
tions using the high and low 
halves of IX and IY, at least not 
with my Z80. In fact, I have found 
that any instruction using H or L 
whose first byte is CB cannot be 
so modified. Thus, I have not in- 
cluded those instructions in my 
tables. Nor have I included the 
undocumented instructions re- 
ported by Freed which are dupli- 



cates of documented ones 

I have found these tables in 
dispensable in writing a disas- 
sembler, an object code reloca 
tor, and a single-stepper. I hope 
they will be as useful to you.B 

Herb Robinson is a former un- 
iversity assistant professor of 
mathematics turned full-time 
micro fanatic. 



oo 

i 01 

i to 



ooo 

RLC 
BIT 
RES 
SET 



<II+d) 

o,iix+di 

0,UX+d> 
0, (!X+dl 



Ml 

RRC 
BIT 
RES 
SET 



(IY+d) 
l,(IX+d) 
l,(IX+d) 
l,(II+dl 



010 

RL 
BIT 
RES 
SET 



H+d) 

2, (IX+d) 
2, (IX+d) 
2, (IX+d) 



Oil 

RR (IX+d) 

BIT 3,<IX+dl 

RES 3, (IX+d) 

SET 3, < IX+d) 



100 

SLA 
BIT 
RES 
SET 



(IX+d) 
4, (IX+d) 
4, (IX+d) 

4, (IX+d) 



101 

SRA (IX+d) 

BIT 5, (IX+d) 

RES 5, (IX+d) 

SET 5, (IX+d) 



SRL 


(IX+d) 


BIT 6, (IX+d) BIT 


7, (IX+d) 


RES 6, (IX+d) RES 


7, (IX+d) 


BET 6, (IX+d) SET 


7, (IX+d) 



Table 6. Fourth-byte Table (first two bytes DDCB, third byte d). 





OOO 


ooi oto on ioo 101 no 


00 


RLD 


(IY+d) RRC (IY+d) RL (IY+d) RR (lY+d) SLA (IY+d) SRA (IY+d) 


f 0! 


BIT 


0,(IY+d) BIT I, (IY+d) BIT 2, (IY+d) BIT 3, (IY+d) BIT 4, (IY+d) BIT 5,(IY+d) BIT 6, (IY+d) 


1 10 


RES 


0,(IY+d) RES l,(IY+d) RES 2, (IY+d) RES 3, (IY+d) RES 4, (IY+d) RES 5, (IY+d) RE6 4, (IY+d) 


11 


SET 


0,(IY+d) SET 1,'IY+d) SET 2, (IY+d) SET 3, (IY+d) SET 4, (IY+d) SET 5, (IY+d) SET 6, (IY+d) 

Table 7. Fourth-byte Table (first two bytes FDCB, third byte d). 



SRI 
BIT 
RES 
SET 



(IY+(J) 

7,(JY+di 
7, (IY+d) 
7,(IY+d) 



MISOSYS MISOSYS MISOSYS MISOSYS MISOSYS MISOSYSMISOSYS MISOSYS MISOSYS MISOSYS MISOSYS MISOSYS £ 



co 

>- 
co 

o 

CO 



co 

> 

CO 

o 

CO 

5 

CO 

>- 

CO 

O 

CO 



EDflS 3.5 

EDAS is a sophisticated Editor 
and Assembler for TRS-80 I & III 

• All text may be input in upper or 
lower case. 

. Assemble directly from one or 
more disk files via *GET. 

• Assemble to disk or memory 

. Binary, octal, decimal, hex, and 
string constants; Multiple con- 
stants may be input on a single 
line. 

. CMDFILE utility included. 

• Conditional assembly support. 

• Cross-Reference utility. 

. DOS functions DIR, FREE, KILL, 
and LIST are supported. 

. 14-character labels including 
special chars. "@", "$",".","?". 

• Editor includes block move, 
global change, renumber, find. 

. EDTASM & M-80 source files 

can be read or written. 
. Expression evaluator supports 

+, -, *, /, MOD plus logical AND, 

OR. and XOR. 
. Paged & titled listings with page 

numbers and date/time. 
. PAGE, TITLE, SUBTTL, SPACE, 

& COM pseudo-ops supported. 

• Set memory size, page prompt, 
JCL execution, Abort option. 

. EDAS is supported with TRSDOS 
compatible DOSs (LDOS, VTOS). 
. Price is $79.00 + $4.00. S&H. 




MISOSYS MISOSYS MISOSYS MISOSYS MISOSYS 

>. LDOS.Version 5.1 is the Ultimate in Operating £ 

W Systems for the TRS-80 Models I and III. g 

J) MISOSYS is your East Coast Headquarters (/) 

^ for LDOS, the documented system! Version % 

^ 5.1 is priced at $169.00 + $5.00 S&H per j£ 

>- system. Deduct $50 if ordering both. — 



LDQS 5.1 



DISKMQD 

Turn your Editor Assembler into 
a disk package. This 32K patch 
modifies EDTASM for DOS op- 
eration. Features 9 Add full disk 
I/O, block move, global change, 
printer pagination, sorted sym- 
bol table, print memory utiliza- 
tion, enhance DEFM expansion, 
protect memory, and recover 
after BOOT. From within the 
EDTASM you will have DIR, 
KILL, & FREE. Upgrade your 
EDTASM! $20. 



SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI SASOSIIAI THE BJ30KS 



DSMBLR 



Complement your assembly language tools with this 
Z-80 disassembler which produces screen, printer, 
cassette, or disk file output. A two pass process 
provides SYMBOLS for 1 6-bit address and 8-bit rel- 
ative references. EQUates & ORG are generated. 
Read SYSTEM programs & display load address 
range. $20 (DSMBLR I for non-disk use is $1 5). 

EDAS, CMDFILE, DSMBLR Specify Mod I or III. Add 
$1 S&H+$.50 per program. VA residents add 4%. 




MISOSYS - Dept. MU 3 MasterCard 

5904 Edgehill Drive. 
Alexandria, Virginia 22303 
703-960-2998 MicroNET 70140,31 
Dealers Inquiry Invited ^. 123 



THE BOOKs must be a part of 
your tools. Volume I gives you 
access to all math operations in 
your Level II ROM. A symbol 
table of the entire machine not- 
ing over 500 addresses is inc'ud- 
ed. Volume II tells you every- 
thing you wanted to know about 
the level II I/O— printer, key- 
board, video, and cassette rou- 
tines are fully explained. Each 
volume has a fully commented 
listing of all the routines dis- 
cussed. THE BOOKS will save 
you hours of assembler pro- 
gramming. Each volume is priced 
at $1 4.95 or buy both for$24.95. 
Add $1.50 S&H per book 



CO 
O 
CO 

-< 

CO 

s 

CO 
O 
CO 

< 

CO 

s 

CO 
O 
CO 

-< 

CO 
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Aerocomp's 
Proven 

Best-By Test! 
The 



it 



• i 




Double Density Controller 

• Technical Superiority 

fi£fi!SHA.9HyJ5!?j9f nsitv controller for Model I with higher probability of data recovery than with any other 
R£™ L *H D f N l? ,ty C0NTR0LLER ON the market today! The "DDC" from Aerocomp. No need to worry about the pro- 
SS^SSJSSB cropping up on existing products. AEROCOMP'S new analog design phase lock loop data separator 
ffi? a T wlc i? r ca .Pture window than the digital types currently on the market. This allows high resolution data center- 
ing. The finest resolution availaPle with digital circuitry is 125 ns (nano seconds). The "DDC" analog circuit allows in- 
f irately variable tuning. Attack and settling times are optimum for 5-1 /4 inch diskettes 
The units presently on the market use a write precompensation circuit that is very "sloppy". Board to board 
tolerance is extremely wide - in the order of + 100 ns. The "DDC" is accurate to within + 20 ns 
The bottom line is state of the art reliability! ~ 

• Test Proven 

Tests were conducted on AEROCOMP'S "DDC", Percom's "Doubler A"* and "Doubler II"* and LNW's "LNDoubler"** using 
a Radio Shack TRS80*** Model l, Level 2, 48 K with TRS80 Expansion interface and a Percom TFD100 * disk drive 
(Siemens Model 82). Diskette was Memorex 3401. The test diskette chosen was a well used piece of media to deter- 
mine performance under adverse conditions. The various double density adapters were installed sequentially in the 
expansion interface. 

The test consisted of formatting 40 tracks on the diskette and writing a 6DB6 data pattern on all tracks. The 6DB6 
pattern was chosen because it is recommended as a "worst case" test by manufacturers of drives and diskettes An 
attempt was then made to read each sector on the disk once - no retrys. Operating system was Newdos/80, version 
1.0, with Double Zap, version 2.0. Unreadable sectors were totalled and recorded. The test was run ten times with 
each double density controller and the data averaged. Test results are shown in the table. 



* Features 

TRS80 Model I owners who are ready for reliable double 
density operation will get (1) 80% more storage per 
diskette, (2) single and double density data separation 
with far fewer disk I/O errors, (3) single density com- 
patibility and (4) simple plug-in installation. Compatible 
with all existing double density software. 

* value 

$149.95 for the BEST double density 
controller on the market. 

$189.95 for "DDC" complete with DOSPLUS 3.3D 
$239.95 for "DDC" complete with LDOS 



• TEST RESULTS • 



MFR & PRODUCT 


SECTORS LOCKED OUT(avo 


AEROCOMP "DDC" 





PERCOM "DOUBLER II" 


18 


PERCOM "DOUBLER A" 


250 


LNW "LNDOUBLER" 


202 



Note: test results available upon written request. All tests conducted prior to 8-25-81 

Aerocomp's 14 day money back guarantee applies to hardware only. 

Specials will be prorated. Shipping $2.00 in Cont. US. See opposite page for details. 



Data Separators 

The advances that make the "DDC" great are incorporated 
and Double Density Data Separator ("DDS"). 



in the new aerocomp Single Density Data Separator ("SDS") 



* Has your original manufac- 
turer left you holding the bag? 

if you already own a Percom "Doubler A", "Doubler ll" or LNW 
LNDoubler", the aerocomp "DDS" will make It right. Look at the test 
results: 



MFR. & PRODUCT 


SECTORS LOCKED OUT 


WITHOUT "DDS" 


WITH "DDS" 


PERCOM "DOUBLER II" 


18 


1 


PERCOM "DOUBLER A 


250 





LNW "LNDOUBLER" 


202 






• "DDS" $49.95 

(Use 1791 chip from your DD Con- 
troller) 

~W UU±) with disk controller 

chip included $79.95 

* Disk controller 

chip $34.95 

(Shipping $2.00 Cont US - see opposite 
page for details) 



Note: Same test procedures as "DDC". 

* Trademark of Percom Data Co. 

* * Trademark of LNW 

* * * Trademark of Tandy Corporation 



Plugs directly into your existing 
Double Density Controller. 



Do you need a 
Single Density Data 
Separator? 

The internal data separator in the 
WD1771 chip (R/s Expansion interface) 
is NOT recommended by WD for 
reliable data transfer. Do you have any 
of these problems: Lost data, tracks 
locked out, CRC errors, disk retry? you 

NEED ONE! 

• "SDS" $29.95 

(For Mod. I; shipping $2.00) 



See opposite 

pageMMH 
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TRS80 



DISK DRIVES 

40 & 80 TRACK 



as low as 



S 299.95 



aasi 



NEW LOW PRICES 

Thanks to you our sales volume has 
allowed us to cut costs and we're pass- 
ing the savings along. We offer the best 
disk drive value in the market place. 
Reliability, features and cost tough to 
beat. We deliver... and we stand behind 
our products. AEROCOMP is the only 
manufacturer to offer FREE TRIAL! Buy 
Aerocomp drives today. You deserve the 
best. 

BEST FEATURES 

• Fast 5 ms. track-track access time. 

• Operates single or double density. 

• "FLIPPY" feature for lower media cost 
(40-1 &80-1). 

• Head load solenoid. 

• Disk ejector. 

• Easy entry door. 

• NEW EXTERNAL DRIVE CABLE 

CONNECTION, ino longer need to 
cover io hook up cable) 



EPSON 

MX80 

PRINTERS 

$479.00 

TRS80 Cable (I & III) $29.95 

APPLE Cable & Interface. . $96.00 

RS232 Interface $69.95 

Ribbon Cartridge, Black. .. $13.95 
Add $6.00 shipping (Cont. U.S.] does not 
include cable. 

MX80 F/T 

All the features of MX80 plus Friction 
Feed. Shipping & cables as above. 



$599. 



00 



ORDER TODAYI 

• 40-Track Drive S299.95 

• 80-Track Drive $429.95 

• 40-Track "FLIPPY" Drive. . . . S329.95 

• 80-Track "FLIPPY" Drive S449.95 

• 40-Track Dual-Head Drive. . $449.95 

• 80-Track Dual-Head Drive. . $579.95 

All above drives are complete with silver enclosure, power supply 
and external drive cable connection. 1 15 VAC. 50/60 H^ 230VAC. 
50/60 H7 available on special order 

• 40-Track Bare Drive $269.95 

• 80-Track Bare Drive $399.95 

• 40-Track "FLIPPY" Bare Drive$299.95 

• 80-Track "FLIPPY" Bare Drive$4l9.95 

• SPECIAL PACKAGES* 

STARTER A $339.95 

40-Track Drive, 2-drive cable, TRSDOS 
2.3 Disk & Manual, Freight & Ins. 

SRARTER B $369.95 

40-Track "FLIPPY" Drive, cable, TRSDOS 
2.3 Disk & Manual. Freight & Ins. 

COMBO C $465.00 

40-Track "FLIPPY" Drive, 2-drive cable, 
LDOS . Freight & Ins. 

COMBO D $585.00 

80-Track "FLIPPY" Drive, 2-drive cable. 
LDOS- Freight & Ins. 

COMBO E $709.00 

Two 40-Track "FLIPPY" Drives. 4-Drive 
cable, TRSDOS 2.3 Disk & Mannual, 
Freight & Ins. 

COMBO F $999.00 

Two 80-Track "FLIPPY" Drives, 4-drive 
LDOS . Freight & Ins. 

COMBO G $909.00 

Two 40-Track Dual-Head Drives, cable, 
TRSDOS 2.3 Disk & Manual. Freight & 
Ins. 

COMBO H $1299.00 

Two 80-Track Dual-Head Drives, cable, 
LDOS . Freight & INS. 

DOSPLUS 3.3 or NEWDOS / 80,2.0 
available with any package. 

AddS 5.00 per drive (or shipping S handling |Cont USJ. 

FREE TRIAL OFFER 

Order your AEROCOMP Disk Drive and 
use it with your system for up to 14 
days. If you are not satisfied for ANY 
REASON (except misuse or improper 
handling], return it, packed in the 
original shipping container, for a full re- 
fund. ( Special packages will be prorated ) We have 

complete confidence in our products and 
we know you will be satisfied! ORDER 
TODAYII 



WARRANTY 

We offer you a 1 20 day unconditional 
warranty on parts and labor against any 
defect in materials and workmanship. In 
the event service, for any reason, 
becomes nescessary, our service depart- 
ment is fast, friendly and cooperative. 

100% TESTED 

AEROCOMP Disk Drives are completely 
assembled at the factory and ready to 
plug in when you receive them. Each 
drive is 100% bench tested prior to ship- 
ment. We even enclose a copy of the 
test checklist, signed by the test techni- 
cian, with every drive. AEROCOMP 
MEANS RELIABILITY!! 

ORDER NOWII 

To order by mail, specify Model 
Number(S) of Drive, cable, etc. (above), 
enclose check, money order, VISA or 
MASTERCHARGE card number and ex- 
piration date, or request C.O.D. ship- 
ment. Texas residents add 5% sales tax. 
Add $5.00 per drive for shipping & handl- 
ing (Cont. US). Please allow 2 weeks for 
personal checks to clear our bank. No 
personal checks will be accepted on 
C.O.D. shipments-cash, money orders or 
certified checks only. You will receive a 
card showing the exact C.O.D. amount 
before your shipment arrives. Be sure to 
include your name and shipping address. 
You will be notified of the scheduled 
shipping date. Your bank credit card will 
NOT be charged until the day we ship,!! 



DRIVE CABLES 

2-DRIVE 

4-DRIVE 


.. $24.95 
S34.95 



WRITE AEROCOMP TODAY 
FOR MORE VALUES III 



CALL TOLL FREE FOR FAST SERVICE 
(800) 824-7888, OPERATOR 24 

FOR VISA/MASTERCHARGE/C.O.D. ORDERS 

Colifornia dial (800) 852-7777, Operator 24. Alaska 
and Hawaii dial (800) 824-7919, Operotor 24. 
TOLL FREE LINES WILL ACCEPT ORDERS ONLYI 

For Applications and Technical information, coll 
(214) 337-4346 or drop us a card. 



Dealers inqiries invited 



AERGCGfilP 

Redbird Airport, Bldg. 8 

P.O. Box 24829 

Dallas, TX 75224 " 82 



sSee List of Advertisers on page 402 
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GRAPHICS 



The Key Box 

Basic Level II 
Line Printer IV 



Send your screen creations to an LP IV. 



Paper Graphics 



Jay F. Rosenberg 
715 Williams Circle 
Chapel Hill, NC 27514 



The Line Printer IV may not be 
a graphics printer, but it is a 
versatile instrument. With a lit- 
tle software and patience you 
can produce elegant charts and 
graphs on a LP IV to incorporate 
into your printed reports. Or, just 
for fun, you can save your pretty 
screen pictures. 

When dealing with graphics 
think of the screen as consisting 
of 6144 pixels (48 lines of 128 
pixels) which you can Set or Re- 
set either individually or in com- 
bination by printing graphics 
characters. Normally when you 
LLIST programs or LPRINT text, 
your LP IV is in its 10cpi (charac- 
ters per inch) or proportional 
spacing mode. Allowing for mar- 
gins, this produces printed lines 
of either about 64 or 95 charac- 
ters. In normal use the LP IV 
uses six line feeds per inch. In 
the 10 cpi mode the LP IV can 
give you a snapshot of the 1024 
print positions on your screen, 
as a block of printed text 6.4 
inches wide and 16 lines (about 
2.7 inches) deep. 

The Line Printer IV also has a 
16.7 cpi character set. I will call 
this print mode the Tiny mode. 
In the Tiny mode, the LP IV gen- 
erates a maximum of 132 print 
positions across a standard 8'/2 
by 11 inch page. Since one line 
of screen graphics is only 128 
pixels long, you have enough 
room in Tiny mode to reproduce 
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such a line pixel for pixel across 
the page, with four characters 
for two-position margins on 
both ends. 

In addition, you can control 
the LP IV's line feeds. You can 
advance or roll back the paper in 
half-line-feed increments (12 per 
inch). There are 48 lines of pixels 
on the screen; if you print in the 
half-line-feed steps In Tiny 
mode, you can produce a snap- 
shot of the screen in the form of 
a tightly printed text block 7.7 
inches wide by 4 inches deep. 
This is compressed vertically in 
comparison with the 8 inch by 6 
inch screen display (a depth-to- 
width ratio of 0.52 versus 0.75), 
but the resultant distortion is ir- 
relevant for most graphs and 
charts, and, as we shall see, is 
untroublesome for pictorial 
graphics as well. 

Program Listing 1, GRAPHIX/ 
SUB, is a Basic subroutine 
which you can incorporate into 
your program and then call (by a 
GOSUB 50000 or an If. . .Then 
GOSUB 50000) to produce such 
a printed snapshot of the screen 
display. Printing the entire 
screen takes time (the LP IV 
prints 50 characters per second 
at best). Partial screen printing 
allows you to omit any message 
lines (such as "Press Enter to 
continue"). You do not want to 
output such lines to the printer, 
when producing a graph or 
chart. 

How the Program Works 

GRAPHIX/SUB has two main 
parts. After a bit of housekeep- 
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ing, lines 501 10-50160 allow you 
to define the region of the graph- 
ics screen you wish sent to the 
printer. Lines 50180-50290 scan 
the selected region of the screen 
and put the LP IV through its 
paces. 

The balance of the listing con- 
sists of three internal subrou- 
tines. "Move Cursor" and "Enter 
Corner" are called during the 
first part of the program; "Load 
Letters" is called during the sec- 
ond part, to ensure that non- 
graphic characters (labels, num- 
bers, and the like) are also in- 
cluded in the final printed snap- 
shot. 

During "Define Region," line 
zero of the screen is a message 
line that helps you keep track of 
where you are in the procedure. 
Two points specifying diagonal- 
ly opposite corners define a rec- 
tangular region of the screen. 
GRAHIX/SUB uses the upper left 
corner and the lower right cor- 
ner of the desired region. Conse- 
quently, the program succes- 
sively displays two messages: 
"Place cursor on upper left cor- 
ner and press Enter" and "Place 
cursor on lower right corner and 
press Enter." Lines 50060 and 
50070 set up the strings for 
these messages. Line 50080 
saves the original contents of 
line zero on the screen in a 
string Z0$ and prints the first 
message. The Print instruction 
in Line 50180 restores the 
screen to its original condition 
before output to the LP IV 
begins. 

As a final bit of housekeep- 



ing, line 50090 uses two POKEs 
to set up a non-blinking cursor 
(you will control its flashing) 
which fills a full print cell (graph- 
ics character 191, all six pixels 
lighted). The program then posi- 
tions the cursor at the center of 
the screen. Two counters, ZR for 
rows (0-15) and ZC for columns 
(0-63), keep track of the cursor's 
position. ZU computes the actu- 
al print position (0-1023) for the 
PRINT® instructions within the 
program. 

Line 501 10 is the first half of a 
Basic simulation of the Repeat 
. . . Until instruction characteris- 
tic of "structured" (or "GOTO- 
less") programming. (See "Bas- 
cal" by Richard C. Metzler in 80 
Microcomputing, September 
1981 for a fuller discussion.) It is 
paired with the NEXTZ1 instruc- 
tion on line 50160. Notice that 
the For. . . Next counterZI is set 
to minus (ZX = 2) just before the 
NEXTZ1. Since Basic uses 
minus 1 for its logical true, if ZX 
is equal to 2, Z1 will be set to 
minus(minus 1), that is, to plus 1. 
The NEXTZ1 instruction then in- 
crements Z1 to two which, since 
it is larger than the range set at 
50110 in the instruction FOR 
Z1 = 1T01 causes an exit from 
the For . . . Next loop. If ZX is not 
equal to two, Z1 will be set to 
zero (Basics logical false). The 
NEXTZ1 increments it to one, 
and you loop back to 50110 
since the counter is still in the 
narrow range originally set by 
the For instruction. 

The net effect is that the in- 
structions 50110-50160 are 




Do your own taxes like an expert 
with TAX/SAVER. 



TAX/SAVER: m The tax help program 
for the layman and the professional. 

• Privacy. 

• Built-in tax aids. Answers questions like "Is my father my 
dependent?" and "Are my deductions reasonable?" 

• Tax regulations programmed in by our team of accountants. 
Type in your figures and you've done your own tax return. 

• Output to video or lineprinter. (Overlays available.) 

• Tax deductible. 

• Optional text: help for novices - speed for professionals. 

• Manual: Tax information, lists of deductions, tax glossary. 

• TAX/SAVER™ I: completes long and short forms, itemized 
deductions, interest, dividends, income averaging and 
maximum tax, tax calculation. 

• TAX/SAVER rM II: all features of TAX/SAVER™ I plus 
business income and capital gains. 

• Discount on yearly updates. 



& 



^ 



TAX/FORECASTER" converts TAX/SAVER " 

to a tax planner. Lets you see how financial decisions 
will affect your taxes. TAX/FORECASTER'" can 

be used alone. 



Orclers will be filled in late January to allow inclusion of new tax laws. 
TO ORDER: 



Reviews: 

"Well designed and easy to use" D. Lubar, Creative Computing Magazine 1.81 

"TAX/SAVER™ may very well live up to its name" 

M. Tannenbaum, CPA. 80 Microcomputing Magazine 2/81 

'Registered trademark ol Radio Shark ^Copyright 1981 



Call collect 203-324-3009 or 203-544-8777 or mail this 
coupon to: Micromatic Programming Co. 

P.O. Box 158, Georgetown, CT 06829 

Please enroll me in member's service and send: 

□ TAX/SAVER'" 1 (a) $79.95 Manual included 

□ TAX/SAVER' M II (a) SI 19.95 Manual included 
D FAX. FORECASTER™ @ $49.95 

(with either TAX/SAVER'" $29.95) 

□ Tax Form Overlays @ $39.95 

□ Please send me more information 

Please check one: 

□ TRS-80* Model 1, 32K with 2 disk drives 
D TRS-80* Model 111. 32K with 2 disk drives 

Add S3.. SO for postage and handling. CT residents add 7_. '.. sales lax 



Name 

Address 



City 



_Statc 



Zip. 



D Check □ Master Charge 
Card No. 



D Visa 



Exp. date.. 



■ See List ol Advertisers on page 402 
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repeated until ZX equals two, at 
which time the program pro- 
ceeds into its next phase. The 
flag ZX keeps track of how many 
corners of the intended region 
you have already specified. 
Since you need only two (upper 
left and lower right), ZX is 
originally set to zero (line 50090) 
and then incremented by one (in 
the "Enter Corner" routine) each 
time you specify one of the cor- 
ners until ZX reaches two. 

Line 50120 is another self- 
contained Repeat. . .Until loop. 
It repeatedly flashes the cursor 
until you input a character from 
the keyboard. Unlike normal cur- 
sor blinking, however, this in- 
struction makes the character 
on the screen at the cursor's 
location visible to the user be- 
tween flashes. The character is 
found by a PEEK instruction and 
saved as a one-character tem- 
porary string ZT$. The cursor is 
then turned on (CHR$(14)), and 
after a short (count-to-15) wait, 
turned off again. The screen 
character saved in ZT$ is re- 
stored, and, after another short 
wait, the keylatch is checked to 
see whether there has been an 
input (Z$ a INKEY$). If not, Z$ is 
the null string (Z$ = "") and our 
test, (Z$<>"") generates a logi- 
cal false (zero), looping back to 
the beginning. If there has been 
input, however, (Z$<>"") gener- 
ates a minus 1 as a logical true, 
its negation is a plus 1, and the 
NEXTZ2 will increment that to 
two, exiting from the loop. 

The next two lines check to 
see which character you input. 
You move the cursor with the 
four arrow keys; when you press 
one (ASCII code 8, 9, 10, or 91), 
line 50130 calls the "Move Cur- 
sor" routine at 50400. This rou- 
tine checks to be sure that you 
are not at the edge of the screen 
and then increments or decre- 
ments the row counter ZR or the 
column counter ZC appropriate- 
ly. After a new PRINT® address 
(ZU) is computed for the cursor, 
control returns to the main 
routine. 

You specify one of the cor- 
ners of the region to be printed 
by pressing the Enter key (ASCII 
code 13). Any keypress other 
than an arrow or Enter (or Break) 
is ignored. If you press Enter, 
the instruction at line 50140 
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calls the "Enter Corner" routine 
at line 50500. This routine stores 
the column and row number of 
the cursor in one of two little ar- 
rays. If ZX equals zero, you are 
stipulating the upper left corner 
of the region to be printed, so 
line 50510 stores the column 
number ZC and the row number 
ZR in positions 1 and 2 of the ar- 
ray ZT (for top-left). The Return if 
ZU equals 1023 prevents the un- 
likely selection of the lower right 
corner of the screen as the top 
left corner to be printed. 

If ZX equals one, you are stip- 
ulating the lower right corner of 
your region. Line 50520 checks to 
be sure you have indeed moved 
downward and to the right from 
your first corner (or, at least, not 
upward or toward the left) and 
then stores the cursor column 
and row numbers in the little ar- 
ray ZB (for bottom-right). When 
you have successfully set a cor- 
ner, line 50530 changes the flag 
ZX and returns control to the 
main routine, where line 50150 
modifies the instruction mes- 
sage if necessary. 

When you have stipulated 
both corners of the region to be 
printed, ZX equals two and you 
pass on to the program's print- 
ing phase. Line 50180 restores 
the original line zero of the 
screen (and frees the string Z0$, 
which has been holding it, for 
other work). It also selects the 
Tiny mode (LPRINT CHR$(27); 
CHR$(20)) on the LP IV and ad- 
vances the paper one half inch 
(STRING$(3,138)) to leave space 
between printed outputs. Line 
50190 then computes the pixel 
addresses which you need to 
control your printing loops. 

A pixel is addressed by two 
coordinates: (0,D). The coordi- 
nate O is the pixel-count Over 
(0-127); D is the pixel-count 
Down (0-47). Since you need two 
such pixel addresses (one for 
each corner of your region) the 
program again uses some little 
arrays. The Over and Down 
counts for the upper-left pixel of 
the region and will be stored in 
position one of the arrays ZO 
and ZD; the Over and Down, 
counting for the region's lower- 
right pixel, are in position two of 
the same two-position arrays. 
Since there are two pixels Over 
for each print position, the pro- 
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gram multiplies ZT(1), the col- 
umn address of the top-left cor- 
ner, by two to get ZO(1). The pro- 
gram multiplies ZB(1), the col- 
umn address of the bottom-right 
corner, by two and then adds 
one (making sure you pick up 
the rightmost column of pixels) 
to get ZO(2). Similarly, since 
there are three pixels Down for 
each print position, the program 
multiplies ZT(2), the row address 
of the top-left corner, by three to 
get ZD(1), and ZB(2), the row ad- 
dress of the bottom-right corner, 
by three to get ZD(2), adding two 
(to ensure that you pick up the 
two bottom-most rows of pixels 
in the bottom row of print cells). 
ZR is reset to the row address of 
the first row of print cells, ZT(2). 
It keeps track of your rows for 
the printing of non-graphic char- 
acters, letters and numbers. 



Next, the print routine steps 
through each row of pixels, 
ZD(1) to ZD(2). Line 50210 initial- 
izes two print strings, ZP$(1) and 
ZP$(2). If you have also arrived at 
a row of pixels which is the top- 
most row of the corresponding 
row of full-character print cells, 
line 50210 pauses to call. the 
"Load Letters" routine at 50600. 
This routine loads the non- 
graphic, alphanumeric informa- 
tion from the row of print cells 
ZR into a string (Z0$) to be print- 
ed later. It successively PEEKs 
at each screen position in the 
row ZR of your region, from the 
leftmost column ZT(1) to the 
rightmost column ZB(1). If it 
finds an alphanumeric charac- 
ter there— a letter or a number 
(ASCII codes 32-127)— it adds it 
to the string Z0$. If it finds 
anything else (for example, a 



50000 '*** GRAPHIX/SUB — Simulate printer graphics on LPIV 
50010 •* by Jay F. Rosenberg — 10/23/81 

50020 '* Include CLEAR 1000, DEFINT Z, and DIM ZO(2),ZD(2), 
50030 '* ZPS(2) ,ZT(2) ,ZB(2) in Hsekping for calling program 
50040 '*** 

50050 '** HOUSEKEEPING 

50060 ZI$="Place cursor on ": ZJ$=" corner and press <ENTER>" 
50070 ZL$="UPPER LEFT": ZR$="LOWER RIGHT" 

50080 Z0S="": FOR ZX=0 TO 63: Z0$=Z0$+CHR$(PEEK(15360+ZX) ) : POKE 1 
5360+ZX,32: NEXT ZX: PRINT @ 0, ZI$+ZL$+ZJ$; 

50090 POKE 16412,1: POKE 16419,191: ZR=8: ZC=32: ZU=64*ZR+ZC: ZS-" 
": ZX=0 

50100 *** DEFINE REGION TO BE PRINTED 
50110 FOR Z1=1T01 

50120 FOR Z2-1T01: ZTS=CHR$ (PEEK(15360+ZU) ) : PRINT @ ZU,CHR$ (14) ; : 
FOR ZY=1 TO 15: NEXT ZY: PRINT @ ZU,CHR$(15) ; : PRINT 8 ZU,ZT$>: F 
OR ZY=1 TO 15: NEXT ZY : Z$=INKEY$: Z2=-(Z$<>"") : NEXTZ2 
50130 IF ASC(ZS)=8 OR ASC(Z$)-9 OR ASC(Z$)=10 OR ASC/Z$)=91 THEN G 
OSUB 50400 ' 

50140 IF ASC(Z$)=13 THEN GOSUB 50500 
50150 IF ZX=1 THEN PRINT @ 0, ZI$+ZR$+ZJ$; 
50160 Z$="": PRINT 8 ZO,"";: Z1=-(ZX=2): NEXTZ1 
50170 '** PRINT LINE PRINTER GRAPHICS 

50180 PRINT @ 0,Z0$;CHR$(15);: LPRINT CHR$(27) ;CHR$(20) ;STRING$(3 , 
138) 

50190 ZO(l)=2*ZT(l): ZO(2) =2*ZB(1) +1: ZD(1) =3*ZT{ 2) : ZD(2) =3*ZB( 2) 
+2: ZR=ZT(2) 

50200 FOR ZY=ZD(1) TO ZD(2) 

50210 ZP$(1)="": ZP$(2)="": IF ZY/3=ZR THEN GOSUB 50600 
50220 FOR ZX=ZO(l) TO ZO(2) 
50230 IF POINT(ZX,ZY) THEN ZP$(1) =ZP$(i) +"0" ELSE ZPS(l) =ZP$(1) +" 

50240 IF POINT(ZX,ZY) THEN ZP$(2) =ZP$(2) +•#" ELSE ZP$(2) -ZP$(2) +" 

50250 NEXT ZX 

50260 IF ZP5(D=STRINGS(LEN(ZP$(1)),32) THEN Zl=-1 ELSE Z1=0 

50270 IF(ZY-1)/3=ZR THEN: IFZ2 THEN ZR=ZR+1 ELSE LPRINT TAB(ZO(l)+ 

2) CHR$(27),CHR$(14);Z0S;CHRS(27),-CHR$(138): ZR=ZR+1 

50280 IFZ1 THEN LPRINT CHR$ (27) ;CHR$(28) ELSE LPRINT TAB(ZO(l)+2) 

ZPS(l) jCHR$(27) ;CHR$(138): LPRINT TAB(ZO(l)+2) ZP$(2) ;CHR$(27) ;CHR 

S (30) 

50290 NEXT ZY 

50300 '** EXIT FROM GRAPHIX/SUB SUBROUTINE 

50310 LPRINT STRINGS(3,138) >CHR$ (27) ;CHR$ (19) 

50320 POKE 16419,176: POKE 16412,0: RETURN 

50330 •***«**** 

50400 '** MOVE CURSOR 

50410 IF ASC(Z$)=8 THEN: IF ZC>0 THEN ZC=ZC-1 

50420 IF ASC(Z$)=9 THEN: IF ZC<63 THEN ZC=ZC+1 

50430 IF ASC(Z$)=10 THEN: IF ZR<15 THEN ZR=ZR+1 

50440 IF ASC(Z$)=91 THEN: IF ZR>0 THEN ZR=ZR-1 

50450 ZU=64*ZR+ZC: RETURN 

50460 '** 

50500 '** ENTER CORKER 

50510 IF ZX=0 THEN: IF ZU=1023 THEN RETURN ELSE ZT(1)=ZC: ZT(2)=ZR 

50520 IF ZX-1 THEN: IF ZC<ZT(1) OR ZR<ZT(2) THEN RETURN ELSE ZB(1) 

*=ZC: ZB(2)=ZR 

50530 ZX-ZX+ll RETURN 

50540 ■** 

50600 '** LOAD LETTERS 

50610 Z0$="" 

50620 FOR ZC=15360+64*ZR+ZT(1) TO 15360+64*ZR+ZB(1) 

50630 IF 31<PEEK(ZC) AND PEEK(ZC)<128 THEN Z0$=Z0S+CHR$ (PEEK(ZC) ) 

ELSE Z0$=Z0$+" • ' ' 

50640 NEXT ZC 

50650 IF Z0$=STRING$(LEN(Z0$),32) THEN Z2=-l ELSE Z2=0 

50660 RETURN 

50670 ■** 
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Sams unlocks the secrets of your TRS-80® 
microcomputer with eight great books that 
show you how to process data, enhance 
your programming skills and control and 
receive information from a number of 
external devices. 

INTERMEDIATE PROGRAMMING FOR 
THE TRS-80® (MODEL I), No. 21809, $9.95, 
leads you smoothly from standard BASIC to 
machine- and assembly-language 
programming. 

TRS-80® ASSEMBLY LANGUAGE MADE 
SIMPLE, No. 21851, $12.95, shows you 
how to effectively utilize the existing Level II 
BASIC ROM assembly language 
subroutines. 

TRS-80® MORE THAN BASIC, No. 21813, 
$10.95, takes you beyond higher-language 
programming to the efficient and powerful 
realm of assembly-language programming, 
where you can use the Z-80 instruction 
code to perform functions not practical or 
possible under BASIC. 



MOSTLY BASIC: APPLICATIONS FOR 
YOUR TRS-80®, BOOK 1 (No. 21788, 
$12.95) and BOOK 2 (No. 21865, $12.95) 
together contain more than 50 BASIC 
programs for use in your home or office. 
These programs can help you save money 
on investments, entertain, and educate 
yourself and your family. 

The heart of your TRS-80® 
microcomputer is its Z-80 microprocessor. 
With THE Z-80 MICROCOMPUTER 
HANDBOOK, No. 2 1 500, $11.95, from 
Sams, you will learn about the internal 
architecture and numerous interfacing 
signals of this popular device. 

With TRS-80® INTERFACING BOOK 1 
(No. 21633, $10.95) and BOOK 2 (No. 
2 1 739, $1 1 .95) you will learn to use your 
microcomputer's internal signals to control 
and monitor external circuitry via 
BASIC-language programs. 

Once you understand how your TRS-80® 
operates, your applications are limited only 
by your own imagination. Sams holds the 
key to freeing your creativity. 



To order these Sams Books or to get the 
name of your local Sams retailer, call 
800-428-3696 toll-free, or 317-298-5566 
and reference AD1 46. 
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SAMS BOOKS 

Howard W Sams & Co., Inc. 

4300 West 62nd Street, RO. Box 7092 

Indianapolis, IN 46206 

^299 



SAMS HOLDS THE KEY 
TO YOUR TRS-80 




m 

Offer 
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AUTO-WRITER 




NEW! 




YOU ALREADY OWN THE BEST DATA 
MANAGER AVAILABLE . . . 



It's Your Word Processor . 



= Ubb your word processor to create and maintain a 
FREE FORMAT data base. There is NO NEED TO ABBREVIATE 

. because of fixed-length fields. 

Sort your data base by any field. 

Print form letters and reports, automatically selecting and 
extracting information from your data base. 

Use format codes to control the printing of form letters and 
reports. 

Create subsets of your data base with the powerful SELECT-IF 
software. 

Requires 48K, 2 disk drives, and lower case Model I or III. 
Available for most Disk Operating Systems. 

NOW AT THE SPECIAL INTRODUCTORY PRICE OF S72.83 

[Manual available separately for 820.001 

auto-writer IN A CLASS BY ITSELF 

WRITE OR CALL NOW FOR A FREE BROCHURE 

MIDWEST DATA SYSTEMS 

a division of Walonick Associates, Inc. 

5624 Girard Ave. So., Minneapolis, MN 55418 

^148 [612)866 8022 




!!NOW AVAILABLE!! 

I NDEX 

Sequential 

Access 

Method 

* Get and Put Records to Disk File by "KEY" 

• Read File in Key Sequence Without Sorting 

* Delete Records Without Recopying File 

* Add Records to Disk Files in Any Sequence 

• Variable Key Length From 1 to 50 Characters 

• Machine Language or Basic Subroutines. 

BUSINESS APPLICATION ADVANTAGES 

- Improved Disk Utilization 

- Easier Program Development 

- Improved Operating Characteristics 

- Reduce or Eliminate Sorting 

- Improved Performance 



ISAM SUBROUTINES 
ISAM UTILITIES 



Documentation 

On Diskette $90.00 



NEW! MACHINE LANGUAGE + BASICSUBS — $140 

— PLUS — Free Mailing List Sample Application 

Add 6% Sales Tax for California Orders 

TRS-80 MODEL I, II, & III and CPM SOFTWARE FROM 
Johnson Associates - or - Telephone Order Line 

For Bank Card Sales 



P.O. Box 1402 
Redding, CA 96001 



(916)221-0740 



WRITE FOR FREE CATALOG 



graphics character) it adds a 
blank. Finally, before returning, 
it checks at line 50650 to see if 
there are any alphanumeric data 
to be printed or if Z0$ is all 
blanks (ASCII code 32). The 
routine sets Z2 to minus 1 (logi- 
cal true) as a flag meaning 
"Nothing to be printed" and to 
zero (logical false) if there is 
something alphanumeric to 
print. 

Lines 50220-50260 do the 
same job for your row of pixels. 
The program Points at each pix- 
el in the row ZY from Over ad- 
dress ZO(1) to ZO(2). If the pixel 
is set (lighted), Point returns a 
logical true; O and # are added 
to the two print strings ZP$(1) 
and ZP$(2) respectively. The pro- 
gram constructs your line printer 
pixel by overprinting the O with 
the n . This operation creates a 
nice little black rectangle when 
the LP IV is set in Tiny mode. If 
the pixel is not set (unlighted), 
the program adds a blank to 
your print strings. Line 50260 
checks to see if there are any 
pixels to be printed and sets the 
flag Z1 appropriately— logical 
true (minus 1, if there is nothing 
to be printed, and logical false 
(zero) otherwise. 

Now you are ready to print. 
Line 50270 checks to see 
whether you are in the middle 
row of pixels for the current row 
(ZR) of print cells. If you are, and 
if there is alphanumeric infor- 
mation to be printed (IFZ2 
checks the flag Z2 for logical 



true or false), the program 
LPRINTS it in the appropriate 
horizontal location. Allowing a 
two-column margin, you Tab 
over to your first print position 
ZO(1)— thus TAB (ZO(1) + 2). 
Since each print cell is two pix- 
els wide, the program takes ad- 
vantage of another nice feature 
of the LP IV and ensures that 
your alphanumeric string Z0$ 
lines up properly with the 
graphics by printing it double 
width. The CHR$(27);CHR$(14) 
starts the double width opera- 
tion; the LP IV terminates it au- 
tomatically. The CHR$(27); 
CHR$(138) is a full reverse line 
feed which keeps you on the 
same print line by cancelling the 
automatic full line feed forward 
inserted by the LP IV. 

Finally, line 50280 prints the 
graphics. If there are no graph- 
ics to print (IFZ1 checks the ap- 
propriate flag), the program rolls 
the paper forward one-half line 
with CHR$(27);CHR$(28). If there 
are graphics, however, the pro- 
gram prints two ZP$ strings. 
First, it LPRINTs the string of Os 
(ZP$(1)), and rolls back the paper 
to the same line with CHR$(27); 
CHR$(138). It then overprints the 
string of #s (LP$(2)) and posi- 
tions the print head on the next 
half-line by using only a half 
reverse, CHR$(27);CHR$(30). 
Then you are ready for your next 
row of pixels— NEXT ZY. 

The program finishes by roll- 
ing the paper up another half 
inch, returning the LP IV to 10 



Program Listing 2 



CLEAR 1000: DEFINT A-Z: DIM ZO( 2) , ZD ( 2) , ZPS ( 2) ,ZT( 2) , ZB( 2) 
VR=15360: CNS=CHRS (14) : CFS=CHRS<15> 



\Hl '*** SKETCHER — Screen Drawing Board 

1005 * by Jay F. Rosenberg — 10/23/81 

\l \l '<** USe With GRAPHyx /SUB for Printed Graphics Output 

1026 

1030 VR=15360: CN$=CHR$ (14) : CF$=CHR$(i5) 

1040 POKE 16412,1: POKE 16419,191 

1050 CLS: CU=542: PRINT g CU,""; 

1060 F0RR=1T01 

1070 XS=": AX=0 

1080 FORR0=1TO1 

1090 T$=CHR$(PEEK(VR+CU)) 

1100 PRINT @ CU,CN$;: FOR N=l TO 15: NEXT N 

1110 PRINT @ CU,CF$;: PRINT @ CU,T$; 

1120 FOR N=l TO 15: NEXT N: X$=INKEY$ 

1130 R0=-(X$<>"") : NEXTR0 

1140 AX=ASC(X$) 

1150 IF AX=27 THEN GOSUB 1500 

raf ix 

1160 IF AX = 8 OR AX=9 OR AX=10 OR AX=91 THEN GOSUB 1600 'Arrow 

1170 IF (3KAX AND AX<91) OR (96<AX AND AX<128) THEN POKE VR+CU,A 



'Solid block 
'Center cursor 
'Begin Main 
'Null Inputs 
'Begin input 
'Save screen 
'Blink cursor 
'Restore screen 
'Get keypress 
'Loop if none 
'Find ASCII 
'SHIFT UP-ARROW = G 



1180 R=-(AX=31) : NEXTR 

1190 POKE 16412,0: POKE 16419,176 

1195 '* 

1200 

1205 

1210 GOSUB 50000 

1215 '* 

1220 FORR=lT01: XS=INKEY$: R=- <X$=CHR$ (13) 

til <ENTER> 



•Exit on <CLEAR> 
'Normal Cursor 



'LP IV Graphics 
!XTR 'Loop here un 

Program continues 
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Quality Computer Services presents. . 



ft 



12m $0195/ 

For TRS: Apple;Heatrf,S-100 and more 
6,12,20,40and 00 Megabyte systems 

Completely assembled and tested subsystem including: 



> Switchable power supply 

> Winchester drive 

> Host adapter card 

• Sealed case 

• Expansion 

The enclosier, controller 
and power supply have been 
designed to allow for future 
backup hardware or increased 
storage 

• Software 

• Auto attach CP/M* , 

• Hard disk utilities I 

• Real time clock J a., m 



• Formatting program 

Assigns alternate sectors 
for any weak sectors detected 
during formatting assuring 
the lowest possible error rate 

• Warranty: The system has a full one year 
warranty on all parts and workmanship 

• Also available: attach for TRSDOS, 
OASIS*, Apple DOS 

• Optional 5 1 / 4 " floppy (shown) 



•.:***""" -> ; ..,. 



w»«»fwmt'miw^ ->~ 



.;..;.:;■&*/ 






r*»i 



m 



See local dealer 

or call: 

QuCeS 

178 Main Street 

Metuchen, New Jersey 

201-548-2135 



> Quantity discounts available. Distributor, Dealer 
and OEM inquries invited. 

•OASIS isa trademark of Phase One Systems, CP/M is trademark of Digital Research 



wm 



Toll free number: 800 631 5944 



Program continued 



1230 
1240 

1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1600 
1610 
1620 
1630 
1640 
1650 



CLS: END 



'Program exit 



GX$="": 1$="": AI=0 
F0RR1=1T01 

I$=INKEY$: AI=ASC(I$+CHR$(1) ) 

IF 47<AI AND AK58 THEN GX$=GX$+IS 
R1=-(AI=13) : NEXTR1 

NG=VAL(GX$): IF 3KNG AND NG<192 THEN POKE VR+CU.NG 
RETURN 



Graphics Routine 

'Begin input 

'Get keypress 

Save if numeral 

■Exit if <ENTER> 



IF AX=8 THEN: IF CU/64<>INT(CU/64) THEN CU=CU-1 

IF AX=9 THEN: IF (CU-63 ) /640INT ( (CU-63 ) /64) THEN CU=CU+1 



IF AX=10 THEN 
IF AX=91 THEN 
PRINT @ CU,"" 



IF CU<960 THEN CU=CU+64 
IF CU>63 THEN CU=CU-64 
i RETURN 



'Move cursor 



UNITS 



30 o: 



2:0 n> 



100: 



cpi mode by CHR$(27);CHR$(19), 
and POKEing that cursor back 
to its normal small blinking self 
before returning from GRAPHIX/ 
SUB to the calling program. 

Using GRAPHIX/SUB 

Program Listing 2, Sketcher, 
lets you put graphics on the 
screen. 

Most of Sketcher will by now 
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197S 197<? 1980 1981 1982(est) YEAR- 
SALES OF COMPUTERIZED WIDGETS 

Fig. 1- 



look familiar to you. The house- 
keeping lines 1020-1050 estab- 
lish the string space and arrays 
GRAPHIX/SUB will use. They de- 
fine the beginning of video RAM 
(15360), introduce abbreviations 
for "cursor on" and "cursor off" 
control commands, and POKE 
in a solid block cursor which is 
then positioned at the center of 
a blank screen. As before, you 
handle cursor blinking. Lines 
1080-1130 are the "Repeat 
flash-cursor Until input-from- 
keyboard" loop which we packed 
into line 50120 of GRAPHIX/SUB. 
When a character is input into 
X$ by the INKEY$ command, the 
program exits from this loop and 
(at line 1140) finds the ASCII 
code for that character. 

If you input an arrow (ASCII 
codes 8, 9, 10 and 91), line 1160 
calls the "Move Cursor" subrou- 
tine at 1600-1640 which checks 
for the edge of the screen and 
moves the cursor one position in 
the direction corresponding to 
the arrow. The cursor PRINT® 
address is stored in CU and 
operated on directly, since in 



PRODUCTS FOR YOUR RADIO SHACK 







MICROTEXT COMMUNICATIONS VIA YOUR MODEM! 



Now you can use your printer with your modem! Your computer can be an 
intelligent printing terminal. Talk to timeshare services or to other personal 
computers; print simultaneously through a second printer port; and re-display 
text stored in memory. Download text to Basic programs; dump to a cassette 
tape, or printer, or both. Microtext can be used with any printer or no printer at 
all. It features user-configurable duplex/parity for special applications, and can 
send any ASCII character. You'll find many uses for this general purpose 
module! Available in ROMPACK, ready-to-use, for $59.95. 



SOFTWARE DEVELOPMENT SYSTEM 

The Micro Works Software Development System (SDS80C) is a complete 6809 
editor, assembler and monitor package contained in one Color Computer program 
pack! Vastly superior to RAM-based assemblers/editors, the SDS80C is non- 
volatile, meaning that if your application program bombs, it can't destroy your 
editor/assembler. Plus it leaves almost all of 16K or 32K RAM free for your 
program. Since all three programs, editor, assembler and monitor are co-resident, 
we eliminate tedious program loading when going back and forth from editing to 
assembly and debugging! 

The powerful screen-oriented Editor features finds, changes, moves, copys and 
much more. All keys have convenient auto repeat (typamatic), and since no line 
numbers are required, the full width of the screen may be used to generate well 
commented code. 

The Assembler features ail of the following: complete 6809 instruction set; 
complete 6800 set supported for cross -assembly; conditional assembly; local 
labels; assembly to cassette tape or to memory; listing to screen or printer; and 
mnemonic error codes instead of numbers. 

The versatile ABUG monitor is a compact version of CBUG, tailored for debugging 
programs generated by the Assembler and Editor. It features examine/chanae of 
memory or registers, cassette load and save, breakpoints and more. SDS80C 
Price: $89.95 



THE 




GAMES 






Star Blaster — Blast your way through an asteroid field in this action-packed 
Hi-Res graphics game! Available in ROMPACK; requires 16K. Price: $39.95 
Pac Attack — Try your hand at this challenging game by Computerware, with 
fantastic graphics, sound and action! Cassette requires 16K. Price: $24.95 
Berserk — Have fun zapping robots with this Hi-Res game by Mark Data 
Products. Cassette requires 16K. Price: $24.95 

Adventure — Black Sanctum and Calixto Island by Mark Data Products. Each 
cassette requires 16K. Price: $19.95 each. 



ROMLESS PAK I — is an empty program pack capable of holding two 2716 or 

2732 EPROMs, allowing you up to 8K of program! The PC board inside comes 

with sockets installed, ready to go with the addition of your custom EPROMs. 

Price: $24.95 

2-PASS DISASSEMBLER — with documentation package. 16K; cassette. 80C 

Disassembler Price: $49.95 

CBUG — Machine language monitor. CBUG Cassette Price: $29.95 

CBUG ON 2716 EPROM: Can plug into Romless Pak I. CBUG ROM Price: 

$39.95 

PARALLEL PRINTER INTERFACE — serial to parallel converter allows use of all 

standard parallel printers. PI80C Price: $69.95 

Assembly Language Programming, by Lance Leventhal. Price: $16.95 

MEMORY UPGRADE KITS: 4-16K Kit Price $39.95. 16-32K (requires soldering 

experience) Price: $39.95 

PARTS & SERVICES: SAMs. 6809Es, RAMs, PIAs. Call for prices. 



fz-a^ ^_ WE SHIP FROM STOCK! 

■^\D©[^5) — U^^ GOODSTUFF! Master Charge/Visa and C0D Accep ted 

W©U^^ P.O. BOX 1110 DEL MAR, CA92014 714-942-2400 
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TRS-80" DISCOUNT - BUY DIRECT 

Q^D WE SELL THE FULL LINE OF TRS-80 AT WHOLESALE PRICES c^b 




MODEL II 

26-4002 64K 1 Drive 
Ask About Hard Drives 

MODEL III 

26-1062 16K 

26-1066 48K with 

2 Drives, RS232 $2059 



COLOR COMPUTER 

26-3001 4K 

26-3002 16K Ext. Basic 

26-3003 32K Ext. Basic 

POCKET COMPUTER 

26-3501 Pocket Computer $188 

TRS-80 COLOR COMPUTER 
*DISK DRIVES* 

26-3022 Disk Drive #1 $498 

26-3023 Disk Drive 02, 3, 4 $338 

LEARN TO 

"DO IT YOURSELF" 

AND SAVE 



TRS-80" 



THOUSANDS OF 

SATISFIED 

CUSTOMERS 

DISCOUNT 
SOFTWARE 



WRITE FOR YOUR 
FREE CATALOG 

ORDER TOLL FREE 

1-800841 0860 

•LARGE INVENTORY 
•FAST DELIVERY 

TM - TANDY CORPORATION 
FREE COPY OF WARRANTY UPON REQUEST 

MICRO 
MANAGEMENT 
SYSTEMS, INC. 

DEPT. NO. U 
115 C. SECOND AVE. S.W. 
CAIRO, GA. 31728 
GA. 912-377-7120 



TRS-80 



TM 



MODEL III SOFTWARE 

26-1563 Scripsit I & III $79.00 

26-1566 Visicalc I $83.00 

26-1567 Visicalc III $83.00 

26-1552 General Ledger $90.00 

26-1553 Inventory Ctl $90.00 

26-1556 Payroll $180.00 

26-1555 Accts. Receivable. . $135.00 

26-1554 Accts. Payable $135.00 

26-1558 Bus. Mail List $90.00 

26-2201 Fortran I $90.00 

26 1562 Profile $72.00 

26-1592 Profile III Plus $180.00 

26- 1 565 Microf iles $90.00 

26-1569 Visicalc $180.00 

26-1590 Super Scripsit $180.00 

26-1591 Scripsit Dictionary. . $135.00 

26-1582 Time Manager $90.00 

26-1580 Project Manager $90.00 

26-1581 Personnel Manager. . $90.00 
26-1568 Medical Off. Syst. . . $270.00 
26-2203 Cobol $180.00 

COLOR COMPUTER SOFTWARE 





26-4515 

26-4511 

26-4512 

26-4501 

26-4502 

26-4503 

26-4504 

26-4505 

26-4507 

26-4701 

26-4703 

26-4705 

26-4540 

26-4508 

26-4509 

26-4513 

26-4520 

26-4621 

26-4560 

26-4531 

26-4534 



MODEL II SOFTWARE 

Profile Plus $270.00 

Visicalc II $265.00 



Profile II $162.00 

General Ledger. . . . $180.00 
Inventory Mgmt. . . . $180.00 

Payroll $360.00 

Accts. Receivable. . $270.00 

Accts. Payable $270.00 

Mail List II $108.00 

Fortran $270.00 

Cobol $270.00 

Compiler BASIC $180.00 

Statistical Analysis . $90.00 
Medical Off. System$675.00 
Manuf. Inventory. . . $675.00 

Job Costing $135.00 

Time Accounting. . . $450.00 
Personnel Search. . . $270.00 

Westlaw $225.00 

Scripsit 2.0 $360.00 

Scripsit Dictionary. . $180.00 



POCKET COMPUTER SOFTWARE 



^ 95 



•See List ol Advertisers on page 402 
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Convert your TRS-80 Model I or III into a 

DEVELOPMENT SYSTEM 

Now you can develop Z-80 based, stand-atone devices such as games, robots, 
instruments and peripheral controllers, by using your TRS-80 as a development system. 
The DEVELOPMATE plugs into the expansion connector of your TRS-80 and adds 
PROM PROGRAMMING and IN-CIRCUIT-EMULATION capabilities to your 
system (with or without expansion interface). 

Complete instructions and sample schematics are included to help you design your 
own simple stand-alone microcomputer systems. THESE SYSTEMS CAN BE AS 
SIMPLE AS FOUR ICs. one TTL circuit for clock and reset, a Z-80, an EPROM, and 
one peripheral interface chip. 

When the In-Circuit-Emulation cable is plugged 
into the Z-80 socket of your stand-alone system, 
the system becomes a part of your TRS-80: You 
can use the full power of your editor/assembler's 
debug and trace programs to check out both the 
hardware and the software. Simple test loops 
can be used to check out the hardware, then the 
system program can be run to debug the logic of 
your stand-alone device. 

Since the program is kept in TRS-80 RAM, 
changes can be made quickly and easily. When 
your stand-alone device works as desired you 
use the Developmate s PROM PROGRAMMER 
to copy the program into a PROM. With this 
PROM, and a Z-80 in place of the emulation 
cable, your stand-alone device will work by itself. 

The DEVELOPMATE is extremely compact: Both the PROM programmer and the 
In-Circuit-Emulator are in one small plastic box only 3.2" - 5.4". A line-plug mounted 
power supply is included The PROM programmer has a personality module which 
defines the voltages and connections of the PROM so that future devices can be 
accommodated. However, the system comes with a universal" personality module 
which handles 2758.2508I8K). 271 6,25 16(16K), 2532I32K), as well as the new elec- 
trically alterable 2816 and 480161 16K EEPROMs). 

The COMPLETE DEVELOPMATE 81. with software, power supply, emulation 
cable. TRS-80 cable, and universal personality module, is ONLY S329! 

please indicate model 1 or model 3 version 
ORION INSTRUMENTS 

1 72 Otis Avenue, Dept. M, Woodside. CA 94062 

(415)851-1172 
Master Charge and Visa phone orders accepted 
California residents please add 6"o sales tax. ^ -jg.. 




* * * 
Good This Month 



RIBBON SALE *** 

NEW LOW PRICES! 

RADIO SHACK-CENTRONICS-EPSON PRINTERS 



INSERTS 



RELOADS 



NEW 



EXACT REPLACEMENTS made ln\Vou SEND your used I CARTRIDGES 

our own shop feature LONG-LIFE ^sCARTRDGES to us. \ (from the 

.and HEAVY INKING. Our instructions ^^ We RELOAD \ manufacturer) 

ike inserts easy to put in. ^s^ them for you. 

Cartridges NOT 



DAISY WHEEL I 

Carbon Film (26-1419) 

COLORS ZX1 

Long-Life Fabric (1449) 
LP VI-VIII (26-1418) 

LP lll-V (26-1414) 

I p l-ll-iV 7 00 Zip-Pack 
t-r I II IV 730/737/779 

EPSON MX 70-80-100 

CENTRONICS 7-meg 

702/703/704/753 



included. 
26.00/6 50.00/dO2 

32.00/6 60.00/doz 
25.00/3 95.00/doz 
20.00/3 76.00/doz 

21.O0/3 80-OO/doz 
11.00/3 42.00/doz 
21.00/3 80.O0/doz 



15.00/3 

18.00/3 

9.00 ea 

9.00 ea 

9.00 ea 

9.00 ea 
10.00 ea 



22.00/3 



21.00/2 
22.00/2 
25.00/2 

l°o 25/2 
100 46/2 
26.00/2 



Volume 1 



MODEL II 8" GAME DISCS Vo,um « * 



Biorhythms, Trap 
Rip Cord, Yacht Sea 
Concentration & 4 More 



$25.00 each 



Ugly, Bingo 

Towers, Blackjack 

Farkle, Pony & 3 More 



SEND CHECK, MONEY ORDER or C0D($2 .00 ups) TO- 

e$ BCCOMPCO s 

800 South 17 Box 246 417 932-4196 
^152 Summersville MO 65571 

We Pay Shipping on PREPAID Orders! Net 30 Accounts Available 

/in the image maRing 



WORRIED ABOUT ORDERING BY MAIL? Relax. We've been business many years and know how To pleaso me 
smallest and jaigest account You receive some of the finest ribbons available made of our own exclusive 
IMAGE PLUS " labnc and carbon film. Our ribbons fit your printer exactly. COMPARE, but BEWARE! We order 
all our competitor s products and are amaied at what we get.Have you ever received a new fabric ribbon you 
had to unwind and dump out on the table before you could use it? We have. Or, carbon film inserts that had no 
end-of-fibbon sensor? Or. /-meg cartridges with only HALF enough ribbon at full retail? RIBBON manufacturing 
and distribution is our only business. We use the latest state-of-the-art production equipment and are blessed 
with a fine, dedicated staff. We fully guarantee all our products because we make them ourselves. You must 
;ompletely satisfied, period. Our ribbons are made fresh daily and are shipped within 24 hours. Write or cal 

iquines welcome. -jy. f aM _ Presjden , 



chute and newsletter 'INK SPOTS". Dealer inq 



this case we do not need the row 
and column counts. 

If you input any standard key- 
board character (ASCII codes 
32-90 and 97-127), line 1 170 dis- 
plays it by POKEing it into the 
appropriate screen location. 
The only new twist, in fact, is in 
line 1150 and the little subrou- 
tine (beginning at 1500) which is 
called there. Line 1150 checks 
for ASCII code 27, the code cor- 
responding to the combination 
of Shift and the up arrow. Press 
Shift and up arrow together 
whenever you want to display a 
graphics character at the posi- 
tion of the cursor on the screen. 
The cursor disappears, and line 
1150 calls the graphics routine 
at 1500. 

In the graphics routine, the 
ASCII code for the graphics 
character you wish to display 
(128-191) is input from the key- 
board in the form of a string 
(GX$). Lines 1510-1540 are an- 
other Repeat .. .Until loop 
which accepts inputs from the 
keyboard until Al, the ASCII 
code of the input, equals 13 (that 
is, until you press Enter). The 
ASC function used in line 1520 
converts each keypress into its 
ASCII code. (CHR$(1) is added to 
l$ before using ASC, since the 
ASC function will crash on a null 
string input. If there has been no 
keypress, l$ will be "" and Al will 
be set to ASC(CHR$(1)), which is 
1.) Line 1530 checks to see if you 
have input a numeral 0-9 (ASCII 
codes 48-57); if so, the routine 
adds it to the string GX$. When 
you press Enter, Basic's logical 
true for Al equals 13 forces an 
exit from the input loop. Line 
1550 then uses the VAL function 
to convert the string of numerals 
(GX$) into an integer (NG). 

Finally, if NG is the ASCII 
code of a valid alphanumeric or 
graphics character (32-191), the 
corresponding character is 
POKEd into the cursor position 
on the screen and control re- 



turns to the main program. The 
inclusion of all valid alphanu- 
meric codes in addition to the 
graphics codes allows you to 
display and print characters 
from 91-96 which are not other- 
wise accessable from the key- 
board. 

Press the Clear key to exit the 
main program. Clear corre- 
sponds to an ASCII code of 31, 
which line 1180 establishes as 
the Until condition for the en- 
tire Repeat. . .Until loop begun 
at line 1060. When the screen 
looks the way you want it press 
Clear. The cursor vanishes 
again (POKEd back to normal by 
line 1190) and then reappears a 
few moments later, along with 
the message line and first in- 
struction for GRAPHIX/SUB 
(called at line 1210). 

Sketcher line 1220 (another 
Repeat. . .Until loop) pauses 
and holds the picture on the 
screen following the LP IV print- 
er operations so that you can 
compare the screen graphics 
with the printer graphics. Press 
Enter one last time to end. 

Load Sketcher and GRAPHIX/ 
SUB, power up your LP IV, and 
start drawing. Fig. 1 and 2 show 
sample outputs. Fig. 1 is a bar 
chart or histogram for the sales 
of computerized widgets (You 
know what they are!). Fig. 2 is 
the graphic representation of a 
classical zoological equation. 
The printed versions are a little 
compressed as a result of the 
difference in the depth-to-width 
ratio, but still every bit as recog- 
nizable as their screen versions. 

Notice in printing alphanu- 
meric data in double width that 
the labels are horizontally cen- 
tered in the boxes. You may 
wish to center the labels verti- 
cally as well, by compensating 
for the fact that the LP IV prints 
letters and numbers on a single 
line, while they are two pixels 
deep on the screen (the top two 
rows of a print cell). ■ 
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Fig. 2. 
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The smash hit program 
•E/Z-SCREEN. You con se< 
Jin crcliofi, right on yoUf < 
puter. ■,"..,.: i ~ - , ' 

E/Z-SCREEN is the revotu 

new system that makes 
^designing of professional 
. quality screens a snap by 

letting you design them right . 

on your TRS-80* screen. 
:Once in place, the E/Z-SCREEN 

system starts the show by 

"talking" to you. It auto- 
matically produces "user 

friendly" disk BASIC code, 

giving you access to a host 

of screen processing. 

functions. 

This and many other 
•E/Z-SCREEN features cai 
save you untold time, effort 
and can actually make screen 
design kind of enjoyable! Here's how. 

E/Z-SCREEN DESIGN 

By using your keyboard, E/Z-SCREEN's formatting ; 
commands let you format and modify your screen, Like 
changing channels, you can keep changing your 
layout until you're perfectly happy with it. And since 
what you see on screen is what you get, you never get a 
layout or write a program you're not completely 
satisfied with. 

Want to center a line? Maybe a few? Just give the 
command and watch it happen— automagically! You 
can even repeat information, horizontally or vertically. 

Best of all, if you still don't like what you see, you can 
totally rearrange the screen design— even after you've 
written your program. 
E/Z-SCREEN lets you move any and all fields of 



information, re-sequenc«« 

i -,i? much more And you see 

it all ha open vVhen y6i /re 

finally satisfied: save your 

screen on disk and go on to 

..e^ianc pMfei But dp 

design completion. E/Z-SCREI 

reaiiy goes to work for you. 

THE GRAND FINALE 

E/Z-SCREEN automatically 

generates the screen process 

code, making your screen 

. work and look like those 

written for larger industrial/ 

A computers. The; code 

controls the displaying 

and reading of data and 

the printing of text on the 

screen— for up to 12 

screens per program! 

What's more, the keyboard 

operator is truly the program director, in total control of 

' data being entered: Data changes, corrections, and 

■ erasures are all made easily by using the various 

• A " f / cursor control keys. 

A MATTER OF RECORD 

E/Z-SCREEN even makes. documentation Of your 
program easy by automatically cross-referencing and 
printing it on paper (if printer is connected to system). 

EASY ON THE BUDGET 

E/Z-SCREEN costs about the same as an average black 

and white TV. Only $149.95. 

So to order, call toll free 800-223-1087. 

In N.Y. State call 212-751-8891. 

For more information, write SOURCE LIB Systems, Ind,, 

1670 Pershing St., Valley Stream, NY. 11880. 



•Compatible with TRS-80 Models I and III, dual disk 
48K memory. TRS-80 trademark of Tandy, Corp. 



SOURCE UB 

Systems 



2 



All major credit cards accepted. N.Y. State residents 
add appropriate sales tax. 



GRAPHICS 



Use Boothe's techniques on your Model II. 



Pictures at a Model II Exhibition 



Jesse W. Baker 

P.O. Box 145 

Fort Kent, ME 04743 



A shortage of fun programs 
for the Model II character- 
izes all the computer maga- 



zines. Everyone writes programs 
for the Level II or the Model III 
and by-passes the Model II com- 



ir~. 




Fig. 1. 
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Fig. 2. 
Vlarch 1982 



The Key Box 

Model II Basic 
Model II 



pletely. I own a Model II and I too 
like to play with my computer; 
so I rework programs to run on 
my computer. 

The Model ll's graphic capa- 
bilities are limited, but it can do 
a nice job with what it has if you 
take the time. Usually, you can 
modify programs written for the 
Level II without much hassle. 
You can also modify programs 



05 REM'GRAPHICS IN 3-D 

06 REM'MODIFIED BY JESSE W. BAKER FOR THE TRS-80 

07 REM* MODEL II MICROCOMPUTER AND LINE PRINTER V 

08 REM* BASED ON A PROGRAM WRITTEN BY BOB BOOTHE. 
20 CLEAR 500 

30 GOSUB 270 

40 CLS:LPRINT CHR$<27);CHR$(28):LPRINT CHR$(27);CHR$(14) 

50 PRINT@910,CHR$(26)" PROGRAM RUNNING "CHR$(25) 

60 DEFINT H — Z 

70 DIM A$(132) 

60 FOR X = 1 TO 121 

90 H = 0:L = 200 

100 FOR Q = 1 TO 132:A$(Q) = " ":NEXT 

110 FORY = 1TO80 

120 X = (X1— Y)*2 

130 IF X < 1 THEN 250 

140 IF X> 80 THEN 240 

150 C = SQRf(X— 40)*(X-40) + (Y-40)*(Y-40)) + 1 

160 A = C*.1213 + .63:M = X— SIN(A + A*A/6)/A/SQR(A)*50 + 40 

170 IF M > H THEN 200 

180 IF M < L THEN 220 

190 GOTO 240 

200 H = M 

210 IF M > L THEN 230 

220 L = M 

230 A$(M) = "X" 

240 NEXTY 

250 FOR I = 1 TO 132:LPRINT A$(I);:NEXT:LPRINT 

260 NEXT X1 

270 CLS:PRINT@910,CHR$(26)" END OF PROGRAM "CHR$(25):END 

280 SYSTEM"FORMS P = 138.L = 130" 

290 RETURN 

To change the program so It will print different forms, 

change line 160 as follows: 

160 M = X + EXP(-.004*C*C)*75 + 5 

160 M = X - EXP(-.004*C*C)*75 + 40 



Program Listing 1. 



-Orchestra-90 



TM 




by Jon Bokelman 

Stereo Music Synthesis and Percussion 
for the Model 111. 



• All the great features of Orchestra-85 enhanced by 
Jon Bokelman's SPECIAL COMPOSER'S EDITION software. 

• Orchestra-90 now includes ORCHUTIL, a powerful utility 
program for ASCII/Binary conversion, music file packing, 
Model I to Model lil tape conversion, and tape/disk 
transfer. 

• Plays existing Orchestra-80 and 85 music files in stereo. 

• Plugs into any 16K Model III Level II or disk system without 
voiding the warranty. 



Special Composer's Edition 

Orchestra-90™ $149.95 

plus $2.00 postage and handling 
($5.00 for overseas airmail ) 
CA residents add 6% sales tax 
MasterCard and Visa accepted 
Please specify TAPE or DISK version. 



Software Affair 

858 Rubis Drive, Sunnyvale, CA94087 
(408) 295-9195 




'TM 



^ FANFARE 

B|K by Jon Bokelman, author of Orchestra-80, 85 and 90 
PLAY MUSIC AND SOUND EFFECTS 



IN UP TO FOUR-PART HARMONY 
THROUGH YOUR MODEL I 
OR MODEL III CASSETTE PORT! 



Includes our four finest software-only synthesizers: • 

SOLO Plays single musical notes and effects. 

DUO Plays two simultaneous musical notes 

or effects, (two-part harmony) 

TRIO Plays three simultaneous musical notes 

or effects, (three-part harmony) 

QUARTET Plays four simultaneous musical notes 
or effects, (four-part harmony) 

Now you can add fantastic music and sound 
effects to your BASIC program! Our machine- 
language synthesizers are called from BASIC. 
Here's your chance to experiment with music 
synthesis at an incredibly low price! 



BONUS 

Includes a full-length graphics cartoon 
demonstrating sound effects by FANFARE, 



These software synthesizers play through the 
cassette port— no hardware is required 

Each synthesizer comes complete with a special 
song that you will enjoy 

FANFARE includes four music synthesizers and 
sample music for each (ready to load and 
play) plus complete documentation. Supplied 
on cassette. 



$24.95 SUPPLIED ON DISK 

plus $2.00 postage and handling 
($5.00 for overseas airmail) 
CA residents add 6% sales tax 
Mastercard and Visa accepted. 




Software Affair 

858 Rubis Drive, Sunnyvale, CA 94087 
(408) 295-9195 



■ See List ol Advertisers on page 402 
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written in straight Basic. 

Bob Boothe's article "A Turn 
of the Screw" (80 Microcomput- 
ing, April 1981) featured a series 
of programs for the TRS-80 and 
a Base 2 Printer. I wanted to do 
the same with my equipment. 
Could I make them work on my 
Line Printer V? 

I modified his program number 
5. First I added a GOSUB state- 
ment in Line 30 which sends you 
to the FORMS command. The 
Line Printer V can print 12 lines 
per inch, and 15 characters per 
inch (condensed mode), so I add- 
ed this instruction to the pro- 
gram (Line 40). An additional line 
displays the phrase, "PROGRAM 
RUNNING" (Line 50), on the 
screen. I prefer an X so I changed 



another line to print an X instead 
of a *(Line 230). 

I added another line that 
clears the first message from 
the screen and replaces it with 
"END OF PROGRAM" (Line 
270). The subroutine set up in 
Line 30 allows you to use the 
FORMS command to disable 
the page default settings, and 
insert P = 138, L = 130 (Line 280) 
which allows the program to 
print everything on standard 8 x 
1 1 V4 inch paper. 

Line 160 changes the shapes 
you print on the printer (see 
Figs. 1-3). All three of these pro- 
grams are identical except for 
that line. 

Two other programs that I 
modified to run on the Model II 




print a head of a famous bunny 
and makes the outline. These 
also print on 8 x 1 1 Vz inch paper. 
I made many changes in this 
program and included a gener- 
ous supply of remark state- 
ments to help you along. If you 
want just the outline, change 
Line 110 to read 110 LPRINT 
TAB(X + 15);. 



Send along any graphics pro- 
grams you may have modified 
for the Model II and want to 
share.! 

Jesse Baker is a high school 
teacher and is working toward a 
M.Ed, in Educational Computer 
Curriculum design and develop- 
ment. 



Fig. 3. 
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'BUNNY HEAD PROGRAM 

LPRINT:LPRINT:LPRINT 

FOR I = 0TO4 'THIS LINE SETS THE COUNTER FOR THE READ STATEMENT 

READ B(l) 'THIS LINE READS DATA LINES STARTING AT 210 

NEXT I 

GOSUB 170 

L = 42 THIS LINE DETERMINES WHAT CHARACTER YOU WANT PRINTED 

LPRINT 

READXrIF X<0 THEN 80 X SETS THE LEFT MARGIN OF THE PRINTOUT 

IF X>128 THEN 160 THIS SETS THE RIGHT MARGIN OF THE PRINT OUT 

LPRINTTAB(X + 15);:READY THIS LINE TABS LINE 90 OVER TO CENTER 

PRINTOUT 

FOR I = X TO Y 

LPRINTCHRS(L); THIS LINE PRINTS THE CHARACTER FROM LINE 70 

NEXT I 

GOTO90 

GOSUB170:GOTO360 

FOR I = 1TO6:LPRINTCHR$(10);:NEXTI THIS LINE INPUTS A LINE FEED 

RETURN 

'DATA POSITIONS FOR LPRINTING OF ' 

THIS IS READ BY LINE 40 

DATA 2,21,14,14,25 

DATA 1,2, - 1,0,2,45,50, - 1,0,5,43,52. - 1,0,7.41.52, - 1 

DATA 1,9,37,50, - 1,2,11,36,50, - 1,3,13,34.49, - 1,4,14.32.48,-1 

DATA 5,15,31,47, - 1,6,16,30,45, - 1,7,17,29,44, - 1,8,19,28,43, - 1 

DATA 9,20,27,41, - 1,10,21,26,40, - 1,11,22,25,38, - 1,12,22,24.36, - 1 

DATA 13,34, - 1,14,33, - 1,15,31, - 1,17,29, - 1,18.27, - 1 

DATA 19,26, - 1,16,28, - 1,13,30, - 1,11,31, - 1.10,32. - 1 

DATA 8,33, - 1,7,34, - 1,6,13,16,34, - 1,5,12,16.35. - 1 

DATA 4,12,16,35, - 1,3,12,15,35, - 1,2,35, - 1,1,35, - 1 

DATA 2,34, - 1,3,34, - 1,4,33, - 1,6,33, - 1,10,32,34,34, - 1 

DATA 14,17,19,25,28,31,35.35, - 1,15,19,23,30,36,36, - 1 

DATA 14,18,21,21,24,30,37,37, - 1,13,18,23,29,33,38, - 1 

DATA 12,29,31,33, - 1,11,13,17.17,19,19,22.22,24,31, - 1 

DATA 10,11,17,18,22,22,24,24,29,29,-1 

DATA 22,23,26,29, - 1,27,29, - 1,28,29. - 1,4096 

END 



Program Listing 2. 



Instructor of Finance and Accounting at UCLA has written 

AND EDITED THESE NEW PROFESSIONAL PROGRAMS FOR THE TRS - 80® MODEL II 



BUSINESS MANAGEMENT I ($125) 

• Mortgage/Annuity Program 

• Effective Interest Rate Analysis 

• Depreciation Analysis 

• Savings Analysis 

• Internal Rate of Return Program 

• Present Value Analysis with Plot 

BUSINESS MANAGEMENT II ($100) 

• Lease versus Purchase Analysis 

BUSINESS MANAGEMENT III ($110) 

• Linear Regression 

• Confidence Limits on Linear 
Regression 

• Statistical Analysis 

• Curve Fitting 

• Multiple Regression with Plot 

Write or call for free brochure. 




isfflS- 



n 



Each system on a single 8" diskette 
with TRSDOS Version 2.0A. 
Complete support, extensive documen- 
tation and examples for each program. 
All programs are user-oriented 
and "Ready to Go'.' 
Programs operational for past 10 years. 
Computer consulting available and 
other software packages under 
development. 
Programs written and compiled in an 
efficient program language. 

Save postage & handling. 
Send check or Money Order today to 

CENTURY SOFTWARE SYSTEMS 

1875 Century Park East, Suite 1730, 
(213) 879-591 1 ^505 Los Angeles, CA 90067 



PMQQQIMQQQQQQQQQQ^ 
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THS-80 INFORMATION SERIES • VOLUME III 



Ih'iniis linflnnif Hi f si 

THE ClMTQMTJRJSham 

& OTHER MYSTERIES 



m 




Ever wanted to do things to your 
TRS-80 thdt Radio Shack said couldn't be 
done? 

How about upper/ lower case, reverse 
video, high- resolution graphics, a high- 
speed clock, audible keystrokes, an extra 
keyboard, and a real-time clock? 

Still not enough' 

How about using an 8 -track as a mass 
storage device, making music, controlling 
a synthesiser, monitoring your data bus, 
and individual reverse characters' All 
these hardware modifications, plus lots 
more, are in The Custom TRS-80 and Other 
Mysteries by Dennis Buthory Kitsz - the 
latest book from IJG Computer Services. 



If the 
thought of using a screwdriver 
gives you the shivers then you can turn 
to the software section. In this you learn 



m 



1260 W. Foothill Blvd. 
Upland, California 91786 

(714) 946-5805 

TRS-80 is a trademark of Tandy 



how to make 
BASIC programs auto- 
execute, reset the memory size, patch 
into the interpreter, test memory with 
machine- language, pack program lines 
with machine code, and generate sound 
effects. 

The Custom TRS-80 and Other Mysteries is 
more than 300 pages of practical infor- 
mation, and tested software, for $29.95. 
Order your copy now, and start turning 
your TRS-80 into a five- hundred- dollar 
supercomputer! Pick one up at your local 
IJG dealer and B. Dalton bookstores. 



UTILITY 



Upgrade Model II Profile. 



Graphics for Profile 



Charles R. Wood 
327 Seventh Avenue 
Pelham, NY 10803 

One of the Model ll's most 
useful features is its graph- 
ics character set. These graph- 
ics should be available for use in 
Profile for special CRT forms, 
but Profile does not allow ac- 



cess to them. In addition, the 
graphics in my Epson MX-80 
printer should also be available 
to underscore columns and 
headings for reports. 

If you want to highlight a cer- 
tain area on the CRT you can 
use the graphics to paint fancy 
borders with matching corners. I 



use graphics to stress that 
some fields require a data entry, 
while other data is optional. 
When designing reports, I em- 
phasize summary columns with 
very ornate underlines. 

Converted Graphics 

I enhanced Profile by adding a 



Program Listing 1. 

100 'PROGRF - 9 JULY 1981 Graphics for PROFILE+ by Charles R. Wood 

102 'Machine code support is "PROGRF/mc" 

112 'char ' |' turns on graphics in PROFILE; 'space' for off 

114 '@ thru - (upper case alpha) for normal graphics. Also 160-191 for printer 

115 ' thru RO (lower case alpha) for revers graphics. Also 192-223 for printer 
120 CLEAR 2000 

122 SYSTEM "LOAD PROGRF/mc" 

125 DEFUSR8=(&HF050) :DEFUSR9=(&HF060) 'RAM2CRT, CRT2RAM 

128 DEFUSR7=(&HF070) 'VDCHAR 

130 DEFINT I-K:DEFSTR B-D 

140 DIM BB(7) ,KB(240) ,KV(960) ,KW(960) 

150 CLS:PRINT "PROGRF - PROFILE Graphics Converter" :PRINT:PRINT 

152 INPUT "Screens(S) or Reports(R) ";BB(0) 

154 KB(0)=0:IF BB(0)="R" THEN KB(0)=1 'flag for reports 

155 IF BB(0)="r" THEN KB(0)=1 

156 INPUT "Name of File ";BB(0) 
158 I=LEN(BB(0)) :IF I>8 GOTO 156 

160 BB(6)=LEFT$("/PMP",4) 'Ext for screens 

162 IF KB(0)=1 THEN BB(6) =LEFT$< "/PRT" ,4) 'Ext for reports 

164 BB( 7) =BB(0)+LEFT$(" 0000000", 8-1) 

166 BB(1)=BB(7)+BB(6) '1st screen or report file name 

168 BB(0)=LEFT$(BB(1) ,11) 'Delete last byte of EXT 

170 BB(2)=BB(0)+"2" '2nd screen/report 

172 BB(3)=BB(0)+"3" 

174 BB(4)=BB(0)+"4" 

176 BB(5)=BB(0)+"5" 

200 ON ERROR GOTO 2000 

201 ' Note: Opening a non-existing file will create the file. PROFILE canno 
t accept a null file. Therefore, this program will KILL the null 

file. 
204 PRINT:PRINT:PRINT"First ";:IF KB(0)=0 THEN PRINT'screen "; 

ELSE PRINT "report " ; 
206 INPUT "to edit ";KF 
208 INPUT "Last to edit";KL 
210 IF KF<1 OR KF>5 OR KF>KL THEN 204 
212 IF KL<KF OR KL>5 THEN 204 
215 FOR K=KF TO KL 'screens/reports 
220 OPEN "D",1,BB(K) ,256 

222 FOR I=1TO960:KV(I)=&H2020:NEXT I 'spaces to CRT array 
225 K2=7:IF KB(0)=1 THEN KZ=8 
240 FOR Kl=l TO KZ 'records 

242 IF Kl=7 AND KB(0)=1 GOTO 912 'Forget Rec#7 of PRT 
245 FIELDl,120 AS CA,120 AS CB 
250 GET 1,K1 

255 IF Kl=l THEN CLS: PRINT"Processing graphics characters" 

320 FOR I=1TO120 'KB is array for 3 lines; 1 byte/element. Element has ASCII 
330 KB(I)=ASC(MID$(CA,I,1) ) 
340 KB(I+120)=ASC(MID$(CB,I,1) ) 
350 NEXT I 
390 Jl-1 

400 FOR I=J1 TO 239 

420 IF KB(I)=124 GOTO 490 'found a | 
430 NEXTI 

440 GOTO 630 'checked all 3 lines 
490 J5=INT( (I+80)/80) 



IF KB(0)=1 THEN J5=132 'End of this line 



Program continued 



graphics converter called PRO- 
GRF to the menu (see Program 
Listing 1). PROGRF, written in 
Basic, accepts previously cre- 
ated files from Profile. It con- 
verts keyboard characters to 
graphics characters and writes 
the graphics back to the same 
files. The augmented CRT forms 
are compatible with Profile. 
Data files are not affected. At 
run time, the graphics are dis- 
played along with the standard 
character set. 

Model II graphics consist of 
32 characters (hex 0-1 F) and 
their reverse video equivalents 
(hex 80-8F). You need all 64 for 
effective forms creation. To use 
them, PROGRF translates the 
keyboard characters from @ 
(hex 40) to UL (hex 5F) into the 
graphics group hex 0-1 F. Like- 
wise, lowercase alpha charac- 
ters (hex 60-7F) signal PROGRF 
to add the eight-bit to the graph- 
ics character, causing reversed 
video for the other 32 graphics. 
You can make up a chart of 
graphics versus keyboard char- 
acters by writing the alphabetic 
characters in the graphics col- 
umn on page 300 of the TRSDOS 



The Key Box 

Model II 
64K RAM 
TRSDOS 2.0 
1 Disk Drive 
Printer 
Profile 
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then your TRS-80 COLOR COMPUTER needs the 

Word Processing Lowerkit 

It converts your screen from an illegible checkerboard to this: 



fled 
of 



is photograph usas taken of an 
television screen bemcj 
a Color Computer uronodi- 
except for the installation] 
lo^ier k i t . Characters* 




J 



• Complete and ready to install — no software needed 

• Nothing to solder — fully assembled, tested, guaranteed 

• Compatible with all Color Computer software 

• Absolutely no loss of hi-resolution graphics modes 

• Optional cut-off switch restores original reverse-caps display 

• European, Kata Kana (Japanese) and Greek characters optiona 

• Designed by 80 Microcomputing's Dennis Bathory Kitsz 




$79.95 complete 

MSB Electronics 

Drawer 766, Barre, Vermont 05641 
(802)476-7311 

Bare board and kits available. Call or write for information. 

Dealer inquiries invited. *TRS-80 is a trademark of Tandy Corporation 

COD— Visa—Mastercard Dealer Inquiries Invited 



•328 



• See List of Advertisers on page 402 



80 Microcomputing, March 1982 • 285 



BIS 



Bayesian 

Investment 

Services 



Send $1.00 for 
instructive catalog 
with sample output 
of TRS-80* 
investor programs 
written by economist 
Dr. Richard Harriff 
of BIS. 

Stock Timer™ 
Commodity Timer™ 
Option Valuator™ 
Convertible 
Valuator™ 
Portfolio Valuator™ 

Write or call: 



BIS 



757 Santa Rosita 
Solana Beach, CA 92075 
(714)755-6225 

TRS-80 is a trademark of Tandy Corp. 



♦SPECIAL** SPECIAL 

TRS-80 TANDON ADD ON 

IMMEDIATE DELIVERY 



SINGLE SIDED $215.00 
DOUBLE SIDED $335.00 



COMPLETE SYSTEMS 
SINGLE SIDED $345.00 
DOUBLE SIDED $465.00 

INCLUDES^ 
MINI DISK DRIVE 
FUSED POWER SUPPLY 
VENTED CABINET 
CABLE 

90 DAY WARRANTY 
FACTORY ASSEMBLED 
FACTORY TESTED 

THESE ARE NEW 5" FD's 



I 



2 INTERFACE, INC ■* ^ 

20932 CANTARA ST 
CANOGA PARK, CA 91304 
(213)341-7914 

VISA AND MASTER CHARGE ACCEPTED 



Program continued 

491 IF J5>160 AND Kl=7 THEN 630 'Don't bother with CRT line #22 
500 FOR J3=I+1 TO J5 'Find 1st 'space' before end of line 
510 IF KB(J3)=32 THEN 518 

516 NEXT J3 

517 GOTO 520 'leave J5 at 80,160 or 240; or 132 for printer 

518 J5=J3-1 

520 FOR J4=I+1 TO J5 'convert to graphics 

521 IF KB(J4)<64 OR KB(J4)>127 THEN 532 'Skip existing graphic codes 

522 IF KB(0)=1 THEN 599 'EPSON graphics 

523 ' Process for MOD II graphics 

525 IF KB(J4)>95 THEN KB(J4) = (KB( J4) OR &H80) 'Reverse video 

530 KB(J4)=(KB(J4) AND &H9F) 'Drop 6,7 bits 

532 NEXT J4 

535 KB(I)=32 'replace with a space 

540 J1=J5+1 'start again, after converting the last field 

543 KW=240:IF KB(0)=1 THEN KW=132:IF J1>KW THEN 630 

550 GOTO 400 

599 'EPSON graphics 

600 KB(J4)=KB(J4)+96:GOTO 532 'Shift into 8bit region 
604 GOTO 643 'Bypass CRT display 

630 J=(K1-1)*120 'base for video xfer 120 words/3 crt lines 

633 FOR I=1TO120 

634 J1=(KB(2*I) AND &H7F) 'only + numbers 

636 KV(J+I)=(KB(2*I-1) OR (Jl*256) ) '2 bytes into 1 integer (word) 
638 IF KB(2*I) >(&H7F) THEN KV( J+I) =(KV( J+I) OR &H8000) '8-bit added 
641 NEXT I 

643 GOSUB 840 'write 3 CRT lines to disk 

644 PRINT "CRT lines";Kl*3-2; " to ";K1*3 
646 NEXT Kl 'next record 

650 PRINT CHR$(30); 'paint complete CRT for editing 

651 FOR 1=1 TO 960:KW(I)=KV(I) :NEXT I 'save assembled screen to KW 
653 I=USR8(VARPTR(KV(1) ) ) 

655 KF=0 'flag for normal mode 

656 PRINT@(22,0) , " I (cntrl-zero) to start graphics, 'space' to stop"; 

657 PRINT@(23,0) ,"ESC to finish editing, Fl to reinstate screen"; 

659 I=USR9(VARPTR(KV(1) ) ) 'lines 23/24 into KV 

660 PRINT CHRSI20); 'home 

662 IK=0 'initial cursor position 

664 C=INKEY$:IF C="" THEN 664 

666 IC=ASC(C):IF IC=27 THEN 740 ELSE 670 'esc? no disk rewrite needed 

668 C=INKEY$:IF C="" THEN 668 ELSE IC=ASC(C) 'loop start 

670 IF IC=27 THEN 735 'esc, end edit 

671 IF IC=1 THEN 730 ELSE IF IC=17 THEN 735 'cntrl A,Q 
674 IF IC<32 GOTO 690 'control codes 

676 IF KF=1 GOTO 700 'graphics 

678 IF IC=124 THEN KF=1:G0T0 664 'turn on graphics w/ | 

680 PRINT CHR$(IC); 'print chrctr 

681 IK=ROW(0) *80+POS(0) ' & get its position 

682 IF IK>1599 THEN IK=IK-1600:PRINT@IK, ; 'wraparound 
684 I=USR9(VARPTR(KV(1) )) 'update KV 

686 GOTO 668 'next character 

690 IF IC=31 THEN IC=10 'dn aro 

691 IF ICO30 THEN 695 'up aro 

692 IK=IK-80:IF IK<0 THEN IK=IK+1600 

693 PRINT @IK,;:G0T0 684 

695 IF IC<8 THEN 668 ELSE IF IC>24 AND IC<27 THEN 668 'ignore 

696 GOTO 680 

700 IF IC<>32 GOTO 704 'test for space bar 

702 KF=0:GOTO 681 'graphics off 

704 IF IC>95 THEN IC=(IC OR &H80) 'reverse video 

706 IC=(IC AND &H9F) 'drop 6,7 bits 

708 I=IK/2+l 'word position in KV 

710 IF FIX(IK/2)*2=IK THEN 712 ELSE 718 'which byte? 

712 KV(I)=(KV(I) AND &HFF00) 'delete old RH byte 

714 KV(I)=(KV(I) OR IC) "add new RH byte 

716 GOTO 726 

718 KV(I)=(KV(I) AND &HFF) 'delete old LH byte 

720 ID=(IC AND &H7F) 

722 KV(I)=(KV(I) OR (ID*256)) 'add new LH byte 

724 IF IC>127 THEN KV(I) = (KV(I) OR 8.H8000) 

726 I=USR8(VARPTR(KV(1) ) ) 'update PIX 

728 IK=IK+1:PRINT@IK,;:G0T0 682 

730 CLS:F0R 1=1 TO 960 :KV(I) =KW(I) :NEXT I 

732 GOTO 653 

735 CLS:PRINT "Do you want to: 1. Re-edit this screen ";: 

736 PRINT§(1,16) ,"3. Make no changes to disk 4. Return to PROFILE "; 

737 C=INKEY$:IF C="" THEN 737 

738 PRINT C:I=ASC(C) : IF K49 OR I>52 THEN 737 

739 ON 1-48 GOTO 650, 750, 915, 960 

740 PRINT?(22,0) ,"No editing required for screen/report #" ;K;STRING$(40,32) 

741 PRINT@(23,0) ,STRING$(70 ,32) ; 

742 GOTO 915 

750 'rewrite 7 records after screen edit 

751 CLS: PRINT "Copying to disk file ";BB(K) 
753 FOR Kl=l TO 7 

758 FOR 1=1 TO 240 STEP 2 "convert from integer to string 

761 J=(K1-1)*120 + (I-D/2 +1 'integer index 

764 KB(I+1)=(KV(J) AND &H7F00)/256 

765 IF KV(J)<0 THEN KB ( 1+1) = (KB ( 1+1) OR 4H80) 
767 KB(I)=(KV(J) AND &HFF) 

770 NEXT I 

773 GOSUB 840 'write kl record to disk 

776 NEXT Kl 

780 GOTO 912 'next screen 

840 CC="":CD="" 'sub to write 1 record back to disk 

843 FOR J=l TO 120 'convert values back to ASCII 

846 CC=CC+CHR$(KB(J) ) :CD=CD+CHRS(KB( J+120) ) 

847 NEXT J 

850 LSET CA=CC:LSET CB=CD 'Into write buffer 

853 POT 1,K1 

856 RETURN 

912 PRINT §(20,0), "Screen/Report f";K; "has been rewritten" ;STRING$(40 ,32) 

915 CLOSE 

930 NEXT K 'Next File 

940 FOR 1=1 TO 4000.-NEXT I 

944 CLS:PRINT"Do you want to: 1. Edit another file 2. Review this file"; 

946 PRINT§(1,16) , "3. Return to PROFILE 

949 C=INKEY$:IF C= n " THEN 949 

951 PRINT C:I=ASC(C) :IF K49 OR I>51 THEN 949 

953 ON 1-48 GOTO 100,200,960 

960 SYSTEM "M" 

2000 IF ERR=60 OR ERR=62 THEN RESUME 2020 

2002 PRINT "ERR «";ERR;" AT ";ERL:STOP 

2020 CLS:PRINT "No file name ";BB(K); ", Screen/Report #";K 

2022 CLOSE:KILL BB(K) :GOTO 930 
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Level IV Products, Inc. 
Is Expanding Again! 

3 Locations To Serve You... 



HEADQUARTERS 


LEVEL IV 


RADIO SHACK* 


DIVISION 


COMPUTER CENTER 


DEALER STORE #P-130 


32429 Schoolcraft Road 


182 North 20th Street 


134 South Front 


Livonia, Michigan 48150 


Battle Creek, Michigan 49015 


Dowagiac, Michigan 49047 


313/525-6200 


616/963-2212 


616/782-6600 



Our Purchasing Power, ($5 Million plus Gross Sales) allows us to offer the best of RADIO 

SHACK*, as well as other popular Hardware and Software at the 

LOWEST DISCOUNT PRICES AVAILABLE! 

OUR POLICY IS THAT IF WE SELL IT... WE ALSO SERVICE IT! 

CALL US TOLL FREE IF YOU DON'T SEE THE ITEM YOU'RE LOOKING FOR 



TYPICAL PRICES (PARTIAL LISTING) 

TRS 80* Color Computer, 32K w/ext Bas 499.00 

TRS 80* Mod III, 48K w/1-40 TR Drive 1589.00 

TRS 80* MOD II, 64K w/1-8" Drive 3375.00 

TRS 80* MOD 16, 128K w/1-Double 8" Drive CALL 

TRS 80* MOD III, 6.4MEG Winchester Drive 2795.00 

5W Add on Drives for MOD I, III, Color, etc from 228.00 

8" Add on Drives for MOD II, MOD 16 from 540.00 

Printers, Radio Shack*, Epson, Citoh, etc CALL 

Technical Service (7 technicians on staff) 24.00/hour 

UPGRADE YOUR PRESENT COMPUTER CALL FOR A QUOTE! 



WARRANTY POLICY: 

The Radio Shack* 90 Day Warranty requires 
construction from Radio Shack* Supplied 
components, at slightly higher prices. 

Equipment containing non-R/S components is 
covered by our 6 month parts and labor warranty. 

Inquire when ordering to ascertain your coverage. 



TERMS OF SALE: 

We allow a 2% discount for cash pre-paid 

orders, personal checks require 2 weeks for bank 

clearance. 

VISA, Master Charge and COD. orders accepted, 

deposits are required for all special order and 

assembly items 



SHIPPING: 

Foreign orders and large items shipped best-way 
frieght collect, most others are shipped promptly 
from stock via U.RS. add 1.5% or $2. 50 minimum, 
and $1.50 if C.O.D. 



DEALER'S NOTE Some key areas are still available for both re-sale 
and servicing dealerships, contact our Headquarters Division for 
Details. 



TOLL FREE ORDER HOT LINE 
800-521-3305 



HARDWARE/SOFTWARE 

Service Line 

313 / 525-6200 



Your One Stop Computer Shopping Center 



•TRADE MARK OF TANDY CORPORATION 



■See List of Advertisers on page 402 
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RAM $15.99 



ONE YEAR GUARANTEE. INCLUDES RAM TEST AND INSTRUCTIONS 

Premium 16K high speed ram for TRS-80 MODEL II l/l, and COLOR COMPUTER. 
MODEL 1 owners add 2.00 for 2 dip shunts. 

COLOR COMPUTER SOFTWARE 

SUPER "COLOR" WRITER 
At last ! ! Fast, machine code, character oriented word processing for the TRS-80™ 
COLOR COMPUTER and any printer FEATURES • 32K compatible • choice of 
display color • key beep • help command • words typed & words left • tab key • 
repeat key • word wrap around • block move • duplicate & delete • global search & 
replace • quick paging • paragraph scrolling • line scrolling 

SPECIAL FEATURES automatic linking of cassette text files for hands-off 
continuous printing • unique movable window for viewing any part of the text. 

PRINT FEATURES send printer control codes, along with text, to printer • full use 
of printer's special features during normal printing • set margins, line length, line 
spacing, page length, and page spacing within the text for continuous printing • 
automatic centering • right justification • page numbers & titles. 
TAPE* $49.95 ROM PAK* $74.95 DISK $99.95 

'Tape I/O only, not disk compatible. 

SUPER "COLOR" TERMINAL all the features of VIDEOTEXTM and more! Allows 
COLOR COMPUTER to communicate with computers like TRS-80 MODEL lll/l & 
APPLE II etc services like COMPUSERVE via MODEM or RS232 DIRECT! Features 

• upload & download basic programs • print or save data to tape • half & full duplex 
TAPE $39.95 ROM PAK $49.95 DISK $69.95 
SUPER "COLOR" BUG examine & change memory contents in the color computer 

• step video display to any location including ROM • look at contents of 
ROMPACKS' • access high res graphics & create & debug machine language 
programs TAPE AND DOCUMENTATION $19.95 Rom Pak $29.95 

GAMES 

MODEL III / 1 16K AND COLOR COMPUTER EXT/BAS. 
FEATURE QUALITY GRAPHICS AND SOUND! 
ADVENTURE 3-PAK TAPE $24.95 

This TRILOGY OF 3-D FANTASY GAMES takes you to the WORLD UNDER THE 
CIMEEON MOON. Engage in ritual combat with tooamoath. narthokc monsters 
and skilled warriors Advance in rank with play experience Then adventure through 
DAZMAR'S UNDERWORLD OF DOOM to the lorbidden rums of castle argaan. 
Search for the eye of dazmar while avoiding the sorceror's intricate traps Survivors 
must then negotiate treacherous trails among the perilous peaks of the ugrek 
moutams to the FORSAKEN GULTCH where the wicked idol awaits restoration 

VEGAS 5 PAK TAPE $19.95 

The THRILLS OF A VEGAS CASINO at home Five action packed Vegas games for 
up to four players CASINO CRAPS «21 • ONE ARMED BANDIT • UP & DOWN THE 
RIVER • KENO Bank tracks players winnings from game to game • realistic cards 

• regulation tables • boards • authentic sounds • lively graphics • official rules in 
each game 

COMBAT 3 PAK TAPE $24,95 

Three action packed two player games featuring lifelike graphics and sound of 
LASER FIRE. CANNONS, and PHOTON TORPEDOES 

2-1-0 TANK COMBAT five terrains • the experienced arcade player can design 
combat scenario STELLAR BATTLE pilot a flex wing fighter at incredible speeds in 
enemy space taking out dorian lye fighters defending the imperial star fortress 
GALACTIC BLOCKADE maneuver your craft in a course that boxes your opponent 
but avoid cosmic debns and hostile space probes' 



MODEL lll/l SOFTWARE 

REQUIRES 16K MODEL III OR LEVEL II BASIC 
READ THIS! Add graphics to your programs in minutes or draw schematics, 
graphs, logos, pictures, etc with graphics and lettering & save them as 
subroutines or programs'' SUPER SKETCHER does more and works |ust like a text 
editor with graphics • image frames can be edited and animated on screen • 
generate, load & save graphics, basic subroutines & programs ♦ includes EPSON 
MX-80, R.S.LPVII & R.S.LPVIII graphics screen print driver and more 
TAPE (TAPE I/O) $19.95 requires 32K DISK (DISK AN D TAPE I/O) $29.95 

SUPER WRITER word processing that combines the best features of other good 
word processors and those of the SUPER "COLOR" WRITER including automatic 
tape of disk file linking and the movable window feature except B7W display See 
SUPER "COLOR" WRITER for details' MODEL l/LII needs lower case mod 
MODEL lll/l TAPE & DOCUMENTATION $49.95 DISK $59.95 

AUTOMATIC MENU SYSTEM power up and automenu takes over. Execute 
programs and command files, or LIST. LOAD, enter DEBUG. BASIC, or TRSDOS 
with single keystroke' Features options menu with library of commands 
MODEL III DISK & DOCUMENTATION $15.95 

CODES for THE ELECTRIC PENCIL enter printer control codes within text file to 
send to smart printers Includes drivers for EPSON MX-80. CENTRONICS 737, MPI 
88SERIES, and file tocustomize for other printers 
TAPE $19.95 DISK $24.95 

DISK INVENTORY for the MODEL III manage your disk programs A menu driven 
utility featuring sort & print by name. disk, program type, extension, etc. 
MODEL III DISK $29.95 

TRS-80 is a Registered Trademark of Tandy Corp 
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Master Charge. VISA and CO D 

accepted 

Allow additional 2 weeks for 

personal checks 

When ordering specify computer type 

Add $3.00 shipping & handling 

MN Res add 5% sales tax 



nELsan 

SDFTURRE , 
SUSTEITIS / 



P.O. Box 19096 
Minneapolis, Minn. 
55419 




612/827-4703 



manual (the ASCII code chart). 
When composing a screen, con- 
trol-zero enables the shift to 
graphics. Hitting space turns off 
the graphics. 

After you design a screen us- 
ing Profile, PROGRF processes 
the file and allows further edit- 
ing of the CRT. PROGRF then 
displays the finished screen. 
You can edit using the same 
control system. When you fin- 
ish, press Escape to rewrite the 
forms file to disk. The files af- 
fected by this process are file- 
name/PMP, PM2, and so on for 
screens and filename/PRT, PR2 
and so on for reports. 

If you are using Profile plus, 
you can add PROGRF to a 
menu. Select option one (Define) 
on the Profile plus menu. When 
you are prompted for a menu 
name, remember that PROGRF 
is used only for programming 
special forms. As such, it should 
be accessible to programmers 
who set up forms; select a menu 
name accordingly. Likewise, in- 
clude in this menu only pro- 
grammer-related functions. You 
may define up to 12 functions, 
including the clerk, print and 
label programs from Profile. 



Then add PROGRF by typing: 



G Graphics Converter and Editor 
BASIC PROGRF -F:1 



The user menu is now linked 
to PROGRF with keystroke G. 
Exit from PROGRF (line 960) 
goes back to menu M. If you 
are using other versions of Pro- 
file, run PROGRF after loading 
Basic -F:1. 

A small machine code pro- 
gram, PROGRF/mc (see Pro- 
gram Listing 2), is required to 
support the USRx programs. It 
serves as linkage to TRSDOS 
SVC's VDGRAF and VDCHAR. 
To create PROGRF/mc use 
Debug to type code between 
FO50 and FOA8; use Dump to 
hold it. PROGRF loads the ma- 
chine code during initialization. 

If you use other printers alter 
lines 599 and 600 to take advan- 
tage of their graphics capabili- 
ties. The CRT will not reproduce 
the graphics of a printer, but you 
can make equivalencies. ■ 

Charles Wood, an electronics 
engineer, specializes in comput- 
er interfaces. 



F050 


0100 
0120;* 


ORG 


F050H 






0130;* 


SUPPORT PROGRAMS FOR 'PROGRF' 




0140;* 






* 














0160; 








F050 CDA0F0 


0170 USR8 


CALL 


SUB 


;(HL) = RAM BUFFER 


F053 3E5E 


0180 


LD 


A,94 


;F CODE 


F055 0600 


0190 


LD 


B,0 


;RAM TO VIDEO 


F057CF 


0200 


RST 


8 


;SVC #94 


F058C9 


0210 


RET 






F060 


0220 


ORG 


F060H 




F060 CDA0F0 


0230 USR9 


CALL 


SUB 


;(HL) = RAM BUFFER 


F063 3E5E 


0240 


LD 


A,94 


;F CODE 


F065 0601 


0250 


LD 


B,1 


;VIDEO TO RAM 


F067CF 


0260 


RST 


8 




F068C9 


0270 


RET 






F070 


0280 


ORG 


F070H 




F070 CDA0F0 


0290 USR7 
0300 


CALL 


SUB 


;(HL) HAS ADRS OF 
;FULL INTEGER 


F073 46 


0310 


LD 


B,(HL) 


;ADRS IS FOR LS BYTE 


F074 00 


0320 


NOP 






F075 3E08 


0330 


LD 


A,8 


;F CODE 


F077 CF 


0340 


RST 


8 




F078 


0350 


RET 






F0A0 


0360 


ORG 


F0A0H 




F0A0 5E 


0370 SUB 


LD 


E,(HL) 


;LS BYTE OF ADRS 


F0A1 23 


0380 


INC 


HL 




F0A2 56 


0390 


LD 


D,(HL) 


;MS BYTE OF ADRS 


F0A3 EB 


0400 


EX 


DE.HL 


;HL HAS ADRS OF INTEGER 


F0A4 56 


0410 


LD 


D,(HL) 


;LS BYTE OF INTEGER 


F0A5 23 


0420 


INC 


HL 




F0A6 5E 


0430 
0440 


LD 


E,(HL) 


;DE = INTEGER 

;HL = ADRS OF INTEGER 


F0A7 2B 


0450 


DEC 


HL 


;RESTORE 


F0A8 C9 


0460 


RET 






0000 


0470 


END 








Program Listing 2. 
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Your best 

Model l/lll 

peripheral buy 

is a modem. 



Considering expanding your TRS-80 
Model I or III? Then you should know 
that only one kind of peripheral can 
give you all these extra capabilities 
... in a single unit: 

• Computer-to-computer data 
communications, for better 
personal or business manage- 
ment. 

• Access to free "bulletin board" 
resources. 

• Access to Source, Compu- 
Serve and other time-sharing 
systems. 

• Services like electronic mail, 
instant news and financial re- 
ports. 

• An almost limitless supply of 
new games and other enthusi- 
ast activities. 

Of course, we're talking about a 
modem. A far more sensible first 
step in expanding than, say, joy- 
sticks, or a voice box, or a printer. 
And, therefore, your best peripheral 
buy. 

A modem opens up a whole new 
world to you. A world of thousands 
of computers and computer people 
just like you, in homes and busi- 
nesses around the block and across 
the country. A world you tap through 
your telephone. 

But don't simply settle for any mo- 
dem. For the most modem satisfac- 
tion, you need to make the best mo- 
dem buy. 

And that's LYNX. 




The new LYNX for TRS-80 Model I and Model 
III. It's the latest innovation from the people who 
are making data communications affordable. It's 
the best first step you can take in expanding. It 
makes your microcomputer a whole new animal. 




□LYisnco 



Your best 

Model l/lll 

modem buy 

is LYNX. 



The new LYNX is the ideal modem 
for your Model I or III. That's because 
it's the key element of a total direct- 
connect telephone communica- 
tions package. 

This package includes all serial 
and computer bus interfaces, cables 
and terminal software . . . and comes 
to you with these remarkable fea- 
tures: 

• SINGLE PRICE: $299.95! 

• Compatible with both Model I 
and III. 

• No separate purchases 
quired. 

• One-year warranty. 

• Auto dial/auto answer. 

• Works with any software, 
eluding ST-80 by Micklus. 

• Active clear, break, and "con- 
trol" keys. 

• Half or full duplex, variable word 
length, parity and stop bits. 

• Dial from phone, keyboard, or 
memory. 

• Works with or without Model I 
expansion interface. 

• Works with or without Model III 
RS-232 card. 

• Can be placed on either side of 
Model III. 

• No tools needed to install. 

No other modem gives you so much 
in a single package. And when you 
compare the LYNX price with the to- 
tal cost of bringing any other modem 
on line, it could save you OVER $100! 



re- 



m- 



^49 



123 LOCUST STREET LANCASTER, PENNSYLVANIA 17602 
Phone 717/291-1116 





TRS-80 is a trademark of the Radio S 
FCC Registration Number 

icrocomputer retailer, or call 


ack D 
A909h 

one 


vision of Tandy Corporation. 
(E-68171-DM-N 


V/SA- 




Consult your local rr 


of these LYNX handlers toe 


lay. 


THE BOTTOM LINE 
Milford, NH 
800/228-3900 


B. T. ENTERPRISES 
Centereach, NY 
516/981-8568 




BREEZE/ QSD COMPUTER PLUS 
Dallas, TX Littleton, MA 
21 4 / 484-2976 800/343-81 24 


THE PROGRAM STORE 
Washington, DC 
800/424-2738 


STEVENS RADIO SHACK 
Phoenixville, PA 
800/345-6279 




SIMUTEK 
Tucson, AZ 
800/528-1149 


PROC 
Jerich 
800/6 


JRAMS UNLIMITED 

o, NY 

45-6038 



■See List ol Advertisers on page 402 
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HARDWARE 



Get rid of those white streaks. 



Video Snow Shovel 



Brian Smith 
6770 Halifax Street 
Burnaby, BC Canada 
V5B 2R4 



Video snow, the black streaks 
against white characters, is 
most apparent with large, rapidly 
changing areas of white graphics. 
The root of the problem is that 



the TRS-80 display is memory 
mapped by the CPU. In addition, 
the display memory is continual- 
ly scanned by the video cir- 
cuitry. This circuitry reads the 
display memory and translates 
it into characters on the screen. 
The CPU and video circuitry can- 
not access the display memory 
at the same time: The CPU has 



VID* >- 



DLY BLANK >- 



o 



o 



-^ VIDI 



-> VWAIT* 



Fig. 1. Conceptual Circuit. 



FROM Z36 PIN 8 >- 
FROM Z27 PIN 7 >- 



higher priority. When the CPU 
reads or writes part of the dis- 
play memory, the video circuitry 
is locked out. The result is a 
black streak, or glitch, on the 
screen. 

For a more complete descrip- 
tion of display circuits' op- 
erations read Radio Shack's 
TRS-80 Microcomputer Tech- 
nical Handbook. 

The Solution 

My solution is to give the 
video circuitry higher priority 
than the CPU. 

The display is made up of 192 
lines of 384 dots per line. Each 
character is 12 rows of 6 dots. 



DLY 8LANK 



9 I Z36A 



TO 

Z3I PIN I, 
Z49 PIN I, 
Z64 PIN I, 
Z7 PIN 4 



VWAIT * 
6 I Z36A X> * 3 j Z36A ^o ■ > TO Z40 PIN 24 



'CUT TRACE 



Fig. 2. Version 1 Schematic. 
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The maximum display is 16 lines 
of 64 characters. After display- 
ing a full line of dots the electron 
beam in the picture tube turns 
off and moves back to the left 
side of the screen to begin a new 
line. When the bottom line is 
complete the electron beam re- 
turns to the top left corner. The 
TRS-80 maintains black borders 
along all four sides. I will call 
these periods when the electron 
beam is not displaying anything 
blanking periods. 

When the CPU accesses dis- 
play memory during a blanking 
period we do not see any black 
streaks. The snow removal solu- 
tion is simple: Let the CPU read 
and write the display memory 
only during blanking periods. In 
other words, reverse the prior- 
ities of the CPU and video cir- 
cuitry for reading the display 
memory. 

By using the WAIT* input to the 
CPU, access is blocked and the 
CPU is put into a wait state until 
the video circuitry enters a blank- 
ing period. Then the CPU is re- 
leased and allowed to continue. 

This does not slow down 
faster real-time graphics games. 



EPSON 

PRINTERS & ACCESSORIES 

Common Feature* of the MX80, MX80FT & MX100 Printers 



80 characters per second 
Replaceable print head by user 
User programable from BASIC 
Bi-directional logic seeking printhead 
96 ASCII characters 
Programable tabs (vert./horz.) 
Cartridge ribbons 
Self-test mode 



Tractor/pin teed paper flow 
Extreme reliability 
12 type fonts under software control 
9x9 & 9x18 matrix 
Programable form feeds 
Compressed/expanded letters 
Parallel interlace standard 
Double strike & emphasized modes 



MX80 . The Printer that started it all. All of the above features plus extreme ease of use 
CompleteTRS80 block graphics set as well as user selectable international symbols. Gives 
correspondence quality printing in several user selectable modes. Oip switcn pins may be 
set for dedicated applications. Complete forms programability from BASIC software 

MX80FT All the features of the MX80 but with FRICTION feed as well for the use of 
single sheets of paper or roll paper. An exceptional buy for the user needing the single sheet 
capability. In the compressed mode 132 characters can be printed across the width of a page 
which means it can be used for any printouts that normally need a 15 inch wide printer. 

MX100 An exceptional printer with a extra quiet printhead and extra heavy duty 
construction for the intense use of a business environment. Does not have the TRS80 graphic 
blocks but comes standard with Bit-Image graphics which allow the user control of 
individual dots for designing specialized graphs, symbols, etc A best buy for business use. 

MX70. . For the budget minded a excellent entry level printer It has most all of the 
features mentioned above including Bit-Image graphics in place of the TRS80 graphic blocks 
set. The Printer is unidirectional only. Expandable text can be printed but not compressed 
Only single density printings is supported on the MX70. An inexpensive heavy duty printer. 

$CALL for BEST prices on Epson Printers 
All Printers & accessories in STOCK now!!! 

If you buy your EPSON somewhere else you'll probably pay too much! 
EPSON ACCESSORIES, INTERFACES & CABLES 



GRAFTRAX 80 option (bit-image & italics) $79 
CABLE Model I interface & Model III $35* 

* $25 if purchased with printer 
CABLE & INTERFACE to Model I Keyboard. $85 

APPLE interface & cable $89 

PET IEEE interface & cable (Pet) $79 

SERIAL RS232 unbuffered int.card $65 

SERIAL RS232 2k buffered int card $149 

Epson to Color Computer card/cable $59 

RIBBONS and CARTRIDGES in Stock 



All 



$CALL 



800-433-5184 



TEXAS COMPUTER SYSTEMS I 



Offers Lowest Prices on 




Model II 64K 




The best buy for small business needs 
and yet completely expandable as 
your business grows. Easy to use for 
the beginning operator. We have in 
STOCK all accessories and disk 
expansions as well as printers and 
software. IMPORTANT: We also 
have CP/M for the Model II plus a 
large amount of support software. All 
of these items at our fabulous 
DISCOUNT prices. We ship from DFW 
by air and fully insured for FAST safe 
delivery. 



HARD DISK SUPPORT FOR THE MODEL II...NOW! 

5. 10 or 20 Megabytes (up to 80 Megabytes) for the Model II Full CP/M support. Also full 
support for TRSDOS and all TRSDOS software Multiple computers (multi-user) can be con- 
nected to these hard disk systems and can share and access common data bases under both 
CP/M and TRSDOS The same common data base can even be accessed simultaneously by 
several users We use top of the line CORVUS Hard Disk Drives which have a proven track 
record and have outsold all of their competitors combined in the microcomputer market 
Model I and III are also supported by these Hard Disk Systems SCall for our LOW prices 



COLOR COMPUTERS 



Radio Shack LINE PRINTERS Line Printer VI 

Daisy Wheel II $1695 Line Printer VII $325 

Line Printer V $1580 Line Printer VIII $699 



Orginal mfg warranty on these items 

4K Level 1 $308 

16K Level 1 $439 

16K Extended Basic $459 

32K Extended Basic $569 

Color Disk 0...$499 Disk 1. .$349 



TCS 180 day Limited warranty on TCS items 

16K Level 1 $369 

16K Extended Basic $439 

32K Extended Basic $499 

32K Upgrade Kit (TCS) $79 

EPSON/COLOR Int & cable $59 



TRS80 MODEL Ml COMPUTER SYSTEMS 

The following with Radio Shack Warranty: _, , „ , _„ 

,, , . ... .,„, ..„ The following with quality TCS memory & our 

Model III IbK $825 own 180 day limited warranty: 

Model III 32k $979 Model III 32K $909 

Model III 48k $1089 Model III 48K $969 

Model III 48k 2 Drives RS232.$2069 



CUSTOM SOFTWARE FROM TCS 

Completely Integrated BINARY SEARCH TREE programs now available. This series of 
programs fully implements the B-TREE structures including INSERTION, DELETION. EDITING 
& TRAVERSAL. No more sorting or long data file searches and yet files can be larger than 
memory. Duplicate keys are fully supported Files can be retrieved in sorted order via B- 
TREE Traversal. Each of the programs come with fully commented source code so that you 
can use the modules in your own programming. A Screen oriented Input routine is also 
included in each module The following B-TREE programs are now available and each 
includes all of the mentioned modules and full documentation: 

B-TREE Library (organize your horn* library kayad by author) $39.95 

B-TREE Vldao (organlza your vtdao cacsarta library, print* labalt, ate) $39.95 

B-TREE Mailing L.Tmt (kayad by nama or zlp.labal printing.atc) $49.95 



EPSON PACK A Utility Soft- 
ware package for MX80 & 80FT. 

MX80/CMD will send all printer commands 
from DOS. BIGLETT/BAS prints large Graphic 
Letters EPSON/SUB merges with BASIC pro- 
grams allowing 2 letter mneumonic 
commands to be sent to printer JKL Patchs 
allow JKL in NEWDOS 80 1.0 & NEWDOS 2.1 to 
send graphics properly DEMO/BAS tutorial 
program of use of printer. LABEL/BAS custom 
label making program with graphics. DEF- 
STATE/SUB allows one word BASIC com- 
mands for centered titles, titles with borders, 
etc A great program package for EPSON fans 
SPECIAL DEAL $24 95 with printer $3495 
seperately Specify Model 1 or ill. disk only 



EPSON PACK 2 - GRAFTRAX 

version for MX80. 80FT & MX100. This 
package includes updated versions of 
modules in original Epson Pack. A screen 
oriented BIT IMAGE GRAPHICS generator util- 
ty is provided Create your special 
characters, symbols, etc. directly on your 
monitor and then send to printer. Printout in- 
cludes code to generate graphics and will 
save needed code as BASIC program line to 
disk. Then MERGE these into your BASIC pro 

8 ram. Also demo programs showing use of 
it-Image graphics Full documentation 
INTRO SPECIAL: $24.95 with printer or 
GRAFTRAX. $34.95 aaparataly. $7.50 tor 
update ot old Epson Pack 



ZAP3 - Direct read/write access to any TRSDOS 1.2 or 1.3 sector Disable Passwords & 
access levels Self prompting. Modify any sector in HEX or ASCII. Includes many patches to 
TRSDOS 12 & 13. Also COPflT to allow backups of SCRIPSIT, VISICALC. etc Just. ..$24 95 
SDIR - Super directory manipulation for TRSDOS 1.2 or 1.3. Alpha 4 column directory & 
free space. Display a range of programs by extension. Change name and date Generate 
report of location of any program on diskette. Just. $14.95 

SPECIAL DEAL: Buy ZAP3 & SDIR together for .... $29.95 



MODEL III DISK EXPANSION KITS 

We use the highest quality fibergjass Our DISK DRIVES are made by Tandon the 

controller BOARDS with double sided same company that makes the drives used by 

glass epoxy board and gold plated contacts in Radio Shack These drives are 40 track, 

our ICS systems The finest switching double density. 5 millisecond steppinq rate 

power supply available is also provided and are fully burned in for 48 hours These 

The aluminum mounting HARDWARE dr i ves have the same specifications as the 

has slotted holes for easy installation of the dr j ves used by Radio Shack No soldering or 

drives and includes all the power and data modifications to existing circuitry is 

cables necessary to install the controller, necessary The following kits are available 
drives and power supply 

KIT 1 Controller, Power Supply & Mounting Hardware $379 

KIT 2 Controller, Power Supply, Hardware & 1 Disk Drive (595 

KIT 3 Controller, Power Supply, Hardware & 2 Disk Drives $819 

KIT 4 One Tandon Disk Drive (bare drive only) $219 

KIT 5 16K of High Quality TCS Memory chips $49.95 

KIT 6 32k of High Quality TCS Memory chips $79.95 

MODEL III 48K 2 DISK DRIVES KIT.. ..$1753 

Yes. you read it right A complete 48k 2 Disk Drive Model III computer system for just 
$1753 Here's what you get one TRS80 Model III 16k Computer in factory carton, one 
CONTROLLER. POWER SUPPLY & HARDWARE kit (kit 1). two Tandon Disk Drives 
and 32K of TCS Memory You also receive several important extras that make this a 
complete super kit These extras include a complete illustrated instruction and trouble 
shooting manual, a TRSDOS 1 3 operating system and manual and a special diagnostic 
Diskette for testing the unit after you have put it together The only tool necessary — a 
screwdriver EVERYTHING is included in this kit and the price is right. ..$1753 

MODEL III 48k 2 DISK DRIVES ... $1895 

Above KIT fully assembled, with 48 hour burn-in test & 180 day TCS Limited Warranty!! 
DEALER INQUIRIES ARE INVITED ON THE ABOVE TCS KITS 



For last, efficient service. H63ft Of 



we can air freight from Dallas 



CASIO ELECTRONIC ORGANS have arrived!!! 

The fantasic CASIO Electronic Organs are here in force Fully equal to any $2000 traditional 
Organ with dozens of exciting NEW features not seen on other musical instruments: 

CASITONE CT— 403 (25 ln«trum«nU,16 rythm«, chord mamory.atc.) $519 

CASITONE CT-701 (programable, barcoda raader.51 kaya.atc.atc.) $835 



TEXAS COMPUTER SYSTEMS 

P.O. Box 1327 Arlington, Texas 76004-1327 

VV Toll Free Number 800 433-5184 
^ Texas Residents 817 274-5625 - 59 



Payment: Money order, cashiers or certified 
check. Prices above reflect 3% cash Discount 
Call for Visa/MC card prices 



Prices subject to change at any time 
No Tax out-of-state. Texans add 5%. 
Many items shipped FREE. Call for quote. 



'See List ol Advertisers on page 402 
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Even the most intensive graph- 
ics program spends little time 
accessing the display memory. 
Games that combine intensive 
graphics with simultaneous 
sound generation suffer slight- 
ly. The sound quality deter- 
iorates because the wait states 
change timing loops. 



FROM Z36 PIN 8 > 
FROM Z27 PIN 7 > 




} TO Z40 PIN 24 



The Circuit 

Fig. 1 shows a conceptual ver- 
sion of the video de-glitcher cir- 
cuit. It functions identically to 
the actual circuit and iseasierto 
understand. DLY BLANK is high 
when characters are displayed 
and low during blanking peri- 
ods. VID* goes low when the 
CPU addresses the display 
memory. Normally, VID* goes 
directly to the video RAM selec- 
tors, allowing the CPU to access 
the display memory. With the 
de-glitcher installed, the new 
signal (VID1*) decides whether 
the CPU or video circuitry can 
access the display memory. 
VID1* is low only when both 



'CUT TRACE 

Z36A 74LS02 



VWAIT* signal from the WAIT* 
line until VWAIT* goes low. If 
this is not done, the de-glitcher 
circuit will fight with other de- 
vices over whether the WAIT* 
signal should be low or high. 
Any other devices using the 
WAIT* input should also be 



"Let the CPU read 
and write the display 
memory only during 

blanking periods. " 



VID* and DLY BLANK go low. 
The CPU can access the display 
memory only during blanking 
periods. 

VWAIT*, when low, puts the 
CPU into a wait state. It goes low 
when VID* is low (the CPU is try- 
ing to access the display mem- 
ory), and DLY BLANK is high (the 
video circuitry is displaying 
characters). With VWAIT* high 
the CPU operates normally. 

The actual circuit, (Fig. 2 and 
3) is less obvious than Fig. 1. 
Fig. 2 is the simple version and 
Fig. 3 includes a switch to turn 
the de-glitcher off. The second 
version is for those who want no 
sound distortion in their graph- 
ics and sound programs. 

To use other modifications or 
peripherals with the WAIT* in- 
put, add a tristate buffer to 
either of the circuits in Fig. 2 and 
3. The buffer removes the 
292 • 80 Microcomputing, March 



isolated with a tristate buffer. 
(See Fig. 4). 

On the simple version (Fig. 2), 
the buffer is added between 
Z36A pin 1 and Z40 pin 24. On 
the switchable version (Fig. 3) it 
is installed between Z36A pin 1 
and S1 point F. 

Installation 

The following are step by step 
instructions for installation of 
the video de-glitcher. Since only 
one or two integrated circuits 
are added, I use piggy-back in- 
stallation rather than construc- 
ting a circuit board. 

- ©Open the case and place 
the main circuit board, compo- 
nent side up, on a flat surface. 

- • Locate Z36 on the board. 

- • Bend all pins except 7, 8, 
and 1 4 on the new 74LS02 (Z36A) 
into a horizontal plane. 

- • Install Z36A on top of Z36, 
1982 




Fig. 3. Version 2 Schematic. 

soldering pins 7, 8, and 14 of 
Z36A to the corresponding pins 
on Z36 (see Fig. 5). 

— • Solder a wire between pins 
5 and 10 of Z36A. 

— ©Solder a wire between pins 

10 and 11 of Z36A. 

-~- • Solder a wire between pins 

11 and 12 of Z36A. 

■**• Solder a wire between pins 
8 and 6 of Z36A. 
— • Solder a wire between pins 

2 and 3 of Z36A. 

— • Solder a wire between pins 

3 and 4 of Z36A. 

— • Solder a wire from Z27 pin 7 
to Z36A pin 9. 

_ • Cut the trace between Z36 
pin 8 and Z31 pin 1 (see Fig. 7). 
Depending on which version 
of the circuit you use follow the 
indicated steps in Fig. 9. 

A1. Solder a wire from pin 13 of 
Z36A to the point indicated in 
Fig. 8. 

A2. Solder a wire from pin 1 of 
Z36A to the point indicated in 
Fig. 6. 



B1. Solder a wire from pin 13 of 

Z36A to the point indicated in 

Fig. 8. 

B2. Locate Z75 on the circuit 

board. 

B3. Bend all pins except 7 and 14 

of the new 74LS125 (Z75A) into a 

horizontal plane. 

B4. Install Z75A on top of Z75, 

soldering pins 7 and 14 to the 

corresponding pins on Z75. 

B5. Solder a wire between pins 1 

and 2 of Z75A. 

B6. Solder a wire from pin 1 of 

Z36Atopin2ofZ75A. 

B7. Solder a wire from Z75A pin 3 

to the point indicated in Fig. 6. 

-C1. Install the new switch in a 

suitable place on the TRS-80s 

case. 

C2, Solder a wire from pin 8 of 

Z36A to point A on the switch. 
-C3. Solder a wire from pin 13 of 

Z36A to point C on the switch. 
"C4. Soldera wire from point B on 

the switch to the point indicated 

in Fig. 8. 

C5. Solder a wire from pin 1 of 



Z36A: 


74LS02 


275A: 


74LS1 25 (optional) 


S1: 


DPDT toggle switch (optional) 




Thin-gauge insulated wire, such as wire wrap wire 




Table 1. Parts List. 



FROM Z36A PIN I > 



Z75A74LSI25 




TO Z40 PIN 4 
OR S/b POINT F 



Fig. 4. Buffer Circuit. 



Z36A to point F on the switch. 
C6. Solder a wire from point E on 
the switch of the point indicated 
in Fig. 6. 

D1. Install the new switch in a 
suitable place on the TRS-80s 
case. 

D2. Solder a wire from pin 8 of 
Z36A to point A on the switch. 
D3. Solder a wire from pin 13 of 
Z36A to point C on the switch. 
D4. Solder a wire from point B on 
the switch to the point indicated 
in Fig. 8. 

D5. Locate Z75 on the circuit 
board. 

D6. Bend all pins except 7 and 14 
of the new 74LS125 (Z75A) into a 
horizontal plane. 
D7. Install Z75A on top of Z75, 
soldering pins 7 and 14 to the 
corresponding pins on Z75. 
D8. Solder a wire between pins 1 
and 2 of Z75A. 

D9. Solder a wire from pin 1 of 
Z36A to pin 2 of Z75A. 
D10. Solder a wire from pin 3 of 
Z75A to point F on the switch. 
D11. Solder a wire from point E 
on the switch to the point in- 
dicated in Fig. 6. 

The video de-glitcher is now in- 
stalled. Double check your wiring 
and reassemble the computer. 

Testing 

Power up to begin testing. If 
you do not see a normal display, 
immediately turn the machine 
off and recheck your wiring. If 
everything looks fine run any 
program with video glitches or 
type in the following program: 



10 'QUICK VIDEO DE-GLITCHER TEST 

20 CH = 

30 FOR I = 15360 TO 16383 'VIDEO 

MEMORY ADDRESSES 

40 POKE l,CH 

50 CH = CH + 1 

60IFCH > 255 THEN CH = 

70 NEXT I 

80 GOTO 20 

You should see no snow on 
the screen with this program 
running. If you installed Version 
2, try switching the de-glitcher 



on and off. Note the difference 
in the displays. If you still see 
snow, the circuit is not working 
properly. Go back and check 
your wiring. 

Postscript 

After designing and installing 
the video de-glitcher, I looked at 
a Model III schematic. It uses a 
technique similar to mine to 
eliminate snow on the new 
machine. ■ 
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Fig. 8 



Version 1 without buffer circuit: 
Version 1 with buffer circuit: 
Version 2 without buffer circuit: 
Version 2 with buffer circuit: 



Follow steps starling with A. 
Follow steps starling with B. 
Follow steps starting with C. 
Follow steps starting with D. 



Fig. 9 



WHEN IS 

AN AD 

NOT 

AN AD? 
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Effective advertising is more 
than good luck. 

If your advertising is not 
producing results, you are losing 
money. Money lost on 
advertising and money in lost 
sales. 

Successful advertising is a 
combination of product 
research, stimulating concepts 
and proven marketing 
techniques. 

Riley, Shepherd and 
Associates is an agency 
dedicated to profiting you. With 
the talent and experience to 
create advertising that sells. But 
it has to start with you. 

If you would like to get more 
from your advertising dollar, 
clip out and return the coupon. 
We'll handle it from there. 



NAME 



.TITLE 



COMPANY 

ADDRESS 

CITY STATE 

PHONE 



ZIP 



Riley, Shepherd & Assoc. 

ADVERTISING/GRAPHIC DESIGN 
159 East Huntington Dr., Suite 2, Arcadia, California 91006 

Telephone: (213) 445-96% 



-50' 



sSee List of Advertisers on page 402 
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GRAPHICS 



LOAD 80 



Computer negatives. 



When Black is White 



Thomas W. Tache 
1522 Melrose Parkway 
Norfolk, VA 23508 



Readers of 80 Microcom- 
puting may recall an article 
by Valerie Vann in the December 
1980 issue entitled "Seasons 
Greetings." In particular, I liked 
the snow-covered countryside 
scene so much that I reproduc- 
ed it on my printer. The beautiful 
scene on my video display ap- 
peared on my printer (as logical- 
ly it should) reversed. The snow 
was black! I decided to create 
the equivalent of a photographic 
negative of the picture with the 
graphic characters 128-191. 

Graphics Characters 

Analysis of the graphics 
codes reveals an interesting 
characteristic. A graphics char- 
acter consists of six segments 
to a block— all. some, or none of 
which may be turned on. Those 
segments of any character 
which are turned on appear 
white on the screen. (The seg- 



ments of the same character, 
displayed on the printer, appear 
black.) Since character 191 is all 
segments on and character 128 
is all segments off they are op- 
posites (or complements) of 
each other. Character 190 has 
one segment turned off, and 
character 129 has that segment 
turned on. Thus, characters 190 
and 129 are also complements 
of each other. This pattern holds 
true throughout the graphics 
codes. Character 189 comple- 
ments 130, 188 complements 
131, 187 complements 132, and 
so on through 160 and 159. With 
a simple mathematical formula 
it is possible to convert one 
graphics character to its neg- 
ative counterpart. 

The formula is based on the 
above relationship. If we add 

128 and 191, we get 319. If we 
add 129 and 190, we also get 
319. Any character code added 
to its complement equals 319. If 
we subtract 128 from 319, we get 
191; 191 from 319 equals 128; 

129 from 319 equals 190, and so 
on. Thus, subtracting any graph- 
ics character in the range 



128-191 from 319 yields the 
complement of that character. 
Doing this to all characters in a 
picture results in the negative of 
that picture. If we let N equal the 
number of a character code and 
C equal the complement of that 
character, then the formula is 
C = 319-N. 

Program Listing 1 demon- 
strates an application of this 
formula. Fig. 2 is the equivalent 
of a photographic negative of 
Fig. 1. Fig. 3 shows a reference 
chart of the graphics codes. 

Program Analysis 

I used remark statements 
liberally and numbered each 
section with multiples of one 
hundred. 

The 100 series line numbers 
identify the program. The 200 
series initialize the printer and 
the program. The 300 series al- 
lows the operator to select the 
negative option. The 400 series 
processes the data. The 500 
series prints the picture. The 600 
series on is the data. All but the 
300 and 400 series are straight- 
forward. 



The 300 series prepares the 
interpretation of the space com- 
pression codes. If you want a 
negative reproduction of the pic- 
ture, the program interprets the 
space compression codes as a 
string of character 191 . If you do 
not want a negative, the pro- 
gram interprets the space com- 
pression codes as a string of 
character 128. CR holds the 
character used in the string sub- 
stituted in place of the space 
compression code. SELECTS 
holds the operator's choice for a 
negative reproduction. 

The 400 series section dem- 
onstrates the technique which 
produces a negative. A 
For. ..Next loop beginning at line 
402 fills an array of A$(L). The 
variable N included throughout 



The Key Box 

Basic Level II 
Model I or III 
16K RAM 
Printer required 
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Fig. 1. Black Snowscape. 
'Microcomputing, March 1982 



Fig. 2. White Snowscape. 



Color computer owners 




Yes, that's right - for as little as 
$298.00 you can add 32K of dynamic 
RAM, and a disk interface, to your 
TRS-80 Color Computer! If you just 
want the extra memory it's only 
$199.00, and you can add the disk 
interface later for $99.00. 

Just plug the Color Computer In- 
terface (CCI), from Exatron, into 
your expansion socket and "Hey 
Presto!" - an extra 32K of memory. No 
modifications are needed to your 
computer, so you don't void your Ra- 
dio Shack warranty, and Exatron give 
both a 30 day money-back guarantee 
and full 1 year repair warranty on 
their interface. 

The CCI also contains a 2K 
machine-language monitor, with 
which you can examine (and change) 
memory, set break-points, set memo- 
ry to a constant and block-move 
memory. 

So what about the CCI Disk Card? 
Well as we said it's only an extra 
$99.00, but you'll probably want 
Exatron's CCDOS which is only 
$29.95 - unless you want to write your 
own operating system. The CCI Disk 



Card uses normal TRS-80 Model I 
type disk drives, and CCDOS will 
even load Model I TRSDOS disks into 
your color computer - so you can 
adapt existing TRS-80 BASIC pro- 
grams. 

As a further plus, with the optional 
ROM Backup adaptor, you can dump 
game cartridges to cassette or disk. 
Once the ROM cartridge is on cas- 
sette, or, disk, you can reload, examine 
and modify the software. The ROM 
Backup adaptor is only $19.95. 

For more information, or to place an 
order, phone Exatron on their Hot 
Line 800-538 8559 (inside California 
408-737 7111), or clip the coupon. 




excellence in electronics 

exatron 




DEALER ENQUIRIES INVITED 



Exatron, •" 94 

181 Commercial Street, 

Sunnyvale, CA 94086 



□ Please send a 32K Color Computer 
Interface for $199.00 

D Please send a CCI Disk Card for $99.00 

D Please include CCDOS and manual 
for $29.95 

□ Also include a ROM Backup adaptor 
for $19.95 

Please add $5.00 for shipping to all orders, 
and 6 percent sales tax in California. 

Name 

Address 

City 

State Zip 

Charge my: 

D MasterCard Interbank Code 

L_ Visa Expiration Date 

Card 

□ Check enclosed for 

□ Ship COD ($2.00 extra) 



Signature 



32K HAM plus Disk [nierfac 



TKS-.mi i> ;i trademark of Tandj 



the data statements indicates 
the number of data characters 
in each level of A$(L). It might be 
a good idea to add a line 409 IF Y 
< 128 OR N > 128 THEN PRINT 
"ERROR IN DATA WHEN L = 
";L;"AND Z = ";Z: STOP. Once 
the program has run correctly, 
delete this statement. After N 
has been read, another For... 
Next loop reads data state- 
ments until the number of data 



statements read (Z) equals N. As 
the statements are read, the pro- 
gram performs the tests shown 
in Table 1. 

Line 418 contains the for- 
mula. Remember, 319 is the 
magic number. This technique 
works with any Level I or Level II 
system, with or without a print- 
er. The only catch is that you 
must make the picture using the 
graphics characters: It will not 



work for pictures drawn using Thomas Tache is systems an- 

SET commands. ■ alyst with Q.E.D. Systems Inc. 



13 1 
1 36 

1 3-7 

*m 

1 6B5 



131 



1 S5 

Zm 

1S2 



1 S3 

fa 
1 SB 

J 
1S3 

c 



13S 



1S1 



Line Function 

412 Data values greater than 191 are space compression codes. My printer in- 

terprets them as graphics characters; therefore it was necessary to con- 
vert them to strings of spaces. If value is a graphics character, skip 414. 

414 The space compression code minus 192 equals the number of spaces to 

be equated (Y-192). CR will be either character 128 or character 191, as 
determined in line 318. Add it to the line. 

416 Was the negative option selected? 

418 If so, and data value is a graphics character, convert the character to its 

complement. 

420 If value is a graphics character, it was not added in 414; add it now. 

422 End the For.. .Next loops. 

Table 1. Line Functions. 



1 63 


17B 


144 


1 73 


1 65 


1 76 

-1 


1 6S 

■ 


1 73 

H 


1 67 


1 72 


16B 

■ 


171 
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1 63 
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1 7BJ 
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15E> 


1 S3 


15 1 
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1 SB 
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1 52 
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IE. 7 


1 53 
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1 56 
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1S5 


1 ss 
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1 B6 
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15E 
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1 S3 


157 
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1B2 


13S 


IE. 1 
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1 53 
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1SG9 


1 SO 


153 
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Fig. 3. Graphics codes and their complements. 



100 

102 

104 
106 
108 
110 
112 
114 
116 
118 
120 
122 
124 
126 
128 
130 
132 
134 
136 
138 
140 
142 
200 
202 
204 
206 
208 
210 
212 
214 
216 
218 
300 
302 
304 
306 

308 

310 
312 
314 
316 
318 
320 
322 
400 
402 

404 
406 
408 
410 
412 
414 
416 
418 
420 
422 
424 
426 
428 
500 
502 
504 



THIS PROGRAM DEMONSTRATES A TECHNIQUE 
WHICH WILL PRODUCE THE EQUIVALENT OF 
A PHOTOGRAPHIC NEGATIVE OF A PICTURE. 



WRITTEN: 
BY: 



8/2/81 REV: 

THOMAS W. TACHE' 
1522 MELROSE PKWY 
NORFOLK, VA 235 08 



/81 



DATA AND THE BASIC DISPLAY FOR THE 
PICTURE WAS TAKEN FROM AN ARTICLE IN 
THE DEC '80 ISSUE OF 80 MICROCOMPUTING 
ENTITLED 
"SEASONS GREETINGS". 
BY: VALERIE VANN 

631 G STREET 
DAVIS, CA 95616 



LPRINTCHRS(27) ;CHRS(65) 
LPRINTCHRS(27) ;CHRS(54) 
LPRINTCHR$(29) ' 



CLEAR2000:DIMA$(16) :CLS' 



PRINT"ENTER " ;CHR$ (34) ; "N" ; ' 

PRINTCHR$(34) j ' 

PRINT" FOR NEGATIVE OF PICTURE " ' 

PRINT'PRESS <ENTER> ALONE TO ";' 

PRINT'PRINT THE ORIGINAL " ; ' 

PRINT'PICTURE"; ' 

INPUT SELECTS' 

CR=191 ' 

IF LEFT$(SELECT$,1)="N" GOTO 322' 

CR=128' 



F0RL=1T016' 

* REA 

A$(L)="":READN' 
F0RZ=1T0N' 
READ Y' 

IF Y<=191 GOTO 416' 
A$(L)=A$(L)+STRING$(Y-192,CR) ' 
IFLEFT$(SELECT$,1)O"N"THEN420' 
IF Y<=191 THEN Y=319-Y' 
IFY<=191THENA$(L) =A$(L) +CHR$(Y) 

NEXTZ:NEXTL' 



CLS' 

PRINTCHRS(28) 

F0RL=1T016' 



INITIALIZE PROGRAM 



THIS SECTION 
ALLOWS 

THE 

OPERATOR 

TO 

SELECT 

THE 

NEGATIVE 

OPTION 



THE 

DATA 

VALUES 



FIND GRAPHIC CHAR . 


CREATE 


SPACES 


DETECT 


OPTION 


CONVERT 


CHAR 


ADD TC 


LINE 



END READ LOOP 



506 
508 
510 
512 
514 
600 
602 
604 
606 
608 
610 
612 
203 
614 
616 
194 
618 
620 
622 
624 
626 
628 
630 
632 
634 
636 
638 
640 
642 
644 
646 
648 
650 
652 
654 
656 
658 
131 
660 
662 
664 
666 
668 
670 
672 
674 
676 
678 
680 
682 
684 
686 
688 
690 
692 
694 
696 
698 
700 
702 
704 
706 
708 



PRINTAS(L) ; ' 

LPRINTTAB(10)A$(L) 

NEXTL' 

STOP' 



THE 
PICTURE 



DATA9, 197, 144, 215, 136, 208, 172, 198, 144, 202 

DATA19, 200 ,160, 184, 188, 191, 191, 191, 191, 189, 188, 176, 215 

DATA129,195,160,186,189 f 176,207 

DATA25, 200, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, 149 

DATA207, 129, 201, 176, 190, 191, 191, 191, 141, 176, 199, 130, 197 

DATA27, 194, 129, 197, 130, 139, 143, 191, 191, 191, 191, 159, 143 

DATA131, 197, 130, 211, 135, 128, 176, 191, 191, 191, 189, 188, 180, 144, 

DATA27, 196, 144, 206, 168, 203, 129, 199, 160, 196, 188, 191, 191 
DATA191, 191, 191, 191, 191, 191, 143, 188, 188, 180, 176, 144, 194, 160, 

DATA30, 194, 160, 186, 198, 129, 199, 168, 191, 176, 198, 144, 197 

DATA198, 17 6, 188, 188, 191, 191, 191 ,191, 191, 191, 191, 191, 189 

DATA176,196,130,133,198 

DATA43, 128, 160, 184, 190, 183, 179, 202, 176, 188, 191, 191, 191 

DATA191, 188, 176, 200, 186, 176, 195, 168, 143, 131, 131, 131, 131 

DATA176, 187, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, 188 

DATA188,188,17 6,17 6,196 

DATA58, 128, 129, 184, 191, 191, 191, 191, 188, 176, 195, 176, 188 

DATA143, 131, 175, 191, 191, 191, 191, 188, 176, 178, 131, 135, 194 

DATA160, 140, 172, 191, 191, 191, 189, 176, 144, 128, 176, 176, 190 

DATA191, 135, 191, 191, 143, 191, 191, 191, 191, 191, 191, 135, 131 

DATA131,143,131,131,129,130,196 

DATA60, 140, 175, 191, 191, 191, 191, 172, 188, 176, 129, 194, 130 

DATA128, 184, 190, 191, 175, 191, 191, 191, 191, 17 8, 17 9, 17 9, 139 

DATA128, 160, 184, 188, 191, 191, 191, 131, 143, 140, 140, 142, 179 

DATA17 9, 17 9, 17 9, 188, 140, 140, 128, 172, 179, 143, 191, 191, 191 

DATA191, 189, 188, 180, 196, 160, 188, 190 ,191 

DATA64, 134, 187, 191, 191, 191, 191, 189, 180, 17 8, 139, 132, 176 

DATA188, 183, 17 9, 188, 188, 191, 191, 191, 191, 191, 191, 191, 191 

DATA189, 191, 189, 188, 191, 143, 179, 188, 128, 143, 143, 143, 179 

DATA17 9, 179, 188, 188, 188, 191, 191 ,140, 143, 143, 143, 143, 131, 131, 

131,131,131,131,179 

DATA17 9,188,191,191,143,191 

DATA54, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191 

DATA191, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, 143 

DATA191, 143, 179, 188, 188, 143, 143, 17 9, 188, 191, 143, 143, 131 

DATA131, 131, 203, 176, 188, 191, 191, 191, 191, 191, 159, 143, 179 

DATA188,128,188 

DATA50, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191, 191 

DATA191, 191, 143, 191, 191, 143, 143, 143, 179, 179, 179, 188, 128 

DATA188, 191, 143, 179, 188, 191, 143, 131, 207, 176, 190, 191, 191 

DATA191, 143, 131, 143, 179, 188, 190, 191, 143, 179, 128, 179 

DATA49, 191, 191, 143, 191 ,191, 191, 143, 143, 143, 179, 179, 17 9 

DATA188, 188, 128, 188, 188, 191, 143 ,143, 143, 179, 179, 179, 128 

DATA17 9, 18 8, 191, 191, 143, 129, 208, 13 8, 191, 191, 191, 191, 191 

DATA191, 128, 182, 131, 135, 137, 188, 191, 191, 191, 191 

DATA45, 179, 179, 128, 188, 188, 188, 191, 191, 143, 143, 143, 179 

DATA179, 179, 128, 188, 188, 188, 191, 191, 191, 191, 191, 191, 191 

DATA191, 143, 135, 129, 212, 131, 191, 191, 191, 188, 176, 152, 143 

DATA175,191,140,132,129,162,191 

DATA41, 143, 143, 128, 17 9, 17 9, 188, 188, 188, 191, 191, 191, 191 

DATA191, 191, 191, 191, 191, 191, 191, 143, 143, 143, 131, 131, 216 

DATA160, 184, 191, 191, 131, 131, 191, 143, 135, 17 9, 188, 182, 13 9 

DATA144,162,191 

DATA32, 191, 191, 188, 159, 143, 143, 143, 143, 143, 131, 131, 131 

DATA131, 131, 129, 221, 176, 176, 188, 188, 191, 191, 191, 188, 194 

DATA1 5 2, 143, 143, 167, 17 9, 18 8, 191 



Program Listing 
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Hew to Buy or Sell 

Computer Equipment 

and Software 



START HERE 
WITH... 




Begin your search in the 
index of Computer Shop- 
per's bargain filled pages. 
Locate the category and 
page number of items 
that interest you from 
TRS-80 and Apple to soft, 
ware and peripherals. 




► 



Start or add to your com- 
puter system by finding 
money saving bargains in 
each month's issue from 
individuals who no longer 
need their personal equip- 
ment. 




^Illlllllllllllllllllllllllllllllllllllllllllllllllllllllllll^ 



You've got your computer 
hardware, but what about 
the software? Use a Com- 
puter Shopper ad to find 
what you need. Someone 
advertising in Computer 
Shopper probably has what 
you want. 




If you need help with any 
computer related problem 
whether it's an interface 
problem or advice on the ; 
right peripheral for a home- 
brew system, use the free 
HELP column especially 
designed for that purpose. 



W4A 



ii 



► 



As you outgrow your 
system or want to trade up 
(most dealers won't take 
trade-ins), use Computer 
Shopper ads to sell your 
items to 20,000 readers na- 
tionwide for the low cost of 
12 cents per word. ■'■ 9 




Computer Shopper is THE nationwide magazine for buy- 
ing, selling and trading Micro and Mini-computer equip- 
ment and software. Each issue has over 60 pages full of 
bargains of new and used equipment. 

You can save hundreds of dollars by getting the equip- 
ment you need from the hundreds of classified ads in- 
dividuals place in Computer Shopper every month. 

Now is the time for you to join over 20,000 other com- 
puter users who save time and money with a subscription 
to Computer Shopper. 

Subscribe today and get your first issue and a classified 
ad absolutely FREE. Type or print your ad on a plain piece 
of paper and send it along with your subscription. 

Just fill in the coupon or MasterCard or VISA holders 
can phone TOLL FREE 1-800-327-9920 and start making 
your computer dollar go further today. 



Cut out and mail to: COMPUTER SHOPPER 

P.O. Box F138 • Titusville, FL 32780 

Yes, I'll try Computer Shopper, I understand that if I'm 
not satisfied with my first issue I can receive a full re- 
fund and keep the first issue free. 

□ 1 year $10.00 ($30.00 in Canada) 

□ I have enclosed my free classified ad. 

□ I want to use my free ad later, send me a coupon. 

NAME: 



ADDRESS: 

CITY: _ 

STATE: 



COmPUTSR HHOPPSR 

P.O. Box F138 • Titusville, FL 32780 
Telephone: 305-269-3211 



^ 39 



sSee List of Advertisers on page 402 
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GENERAL 



A variety of peripherals and expansions make it easy. 



Broadening the TRS-80 Horizon 



David D. Busch 

515 East Highland Avenue 

Ravenna, OH 44266 



In "Radio Shack versus the 
Competition" (80 Microcom- 
puting, November 1980) I dis- 
cussed the most common expan- 
sion options available to the 
TRS-80 Model I owner, and com- 
pared sticking with Radio Shack 
with going to an outside supplier 
for these goodies. 

The intervening months have 
altered the picture considerably; 
I have reversed my recommen- 
dations in some cases. In addi- 
tion, the Model I is no longer pro- 



The Key Box 

Model I or III 
Disk Drive 
Printer 
Modem 
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duced in this country, and 
Model III users have a new set of 
considerations. Some 300,000 
happy owners are ready to ex- 
pand their sytems. 

My original premise was that 
the computer hobbyist or small 
business user is not very hard- 
ware oriented, and may also be 
a novice programmer. These 
users want a plug-in, turnkey 
computer system; they are at 
least moderately apprehensive 
about choosing between Radio 
Shack's offerings and lower- 
priced upgrades from the neigh- 
borhood House of Computers. 

Additional Memory 

For the Model I, the upgrade 
from 4K to 16K was almost auto- 
matic. With the Model III, this 
expansion is even simpler: It is 
unnecessary to purchase an ex- 
pansion interface to add memo- 
ry chips up to 48K. Some enter- 
prising firms have recently intro- 
duced "keyboard" memory 
units so owners of the Model I 
sans interface can also add the 
maximum amount of memory 
without purchasing a disk con- 
troller board. 

Should you purchase your 
RAM chips from Radio Shack or 

1982 



some other source? I added 
"foreign" RAM to my Model I 
keyboard, and decided to go 
with Radio Shack for the 
"touchier" expansion interface 
memory when I upgraded in late 
1979. If I were purchasing a 
Radio Shack computer today, 
my choices would be reversed. 

The price differential today is 
as significant as ever. Expand- 
ing a Model III 16K machine to 
48K costs $198 using Radio 
Shack memory chips. Other sup- 
pliers sell identical sets of chips 
for about $20 per 16K, or 
$40-$50 total. Much sifting out 
of faulty chips has taken place in 
the last few years; a user should 
have little difficulty getting a set 
that works well. Some potential 
memory problems caused by 
connectors between the expan- 
sion interface and CPU in the or- 
iginal Model I do not exist in the 
Model III. 

With the help of widely avail- 
able "memory test" programs 
which root out faulty RAM 
chips, even neophyte users face 
little chance of being stuck with 
an untraceable problem. 

To avoid these difficulties, I 
elected to go with Radio Shack 
memory in 1979. There seems to 



be only one solid reason to do so 
today: A single vendor is respon- 
sible for the health and reliabili- 
ty of your computer. Radio 
Shack will repair computers 
containing foreign memory 
chips, but it does not accept re- 
sponsibility for problems 
caused by them. 

Because Radio Shack bun- 
dles its Model III ROM and the 
firsM6K upgrade kit, the simpl- 
est course is to add both as a 
package. 

Mass Storage Alternatives 

Options for storing programs 
and data become more numer- 
ous every day. Standard cas- 
sette recorder use has dropped 
off severely, replaced, in most 
cases, by disk systems. Disk of- 
fers faster access to data, as 
well as expanding capabilities 
through Disk Basic, and sophis- 
ticated operating systems like 
NEWDOS80and LDOS. 

Although Radio Shack's disk 
drives cost significantly more 
than others, I purchased two 
"original equipment" drives for 
my system. Local servicing 
seemed preferable to shipping 
them across country to some 
other manufacturer. The extra 



money was an investment in 
maintaining close, convenient 
service facilities. I use my com- 
puter in business and can hardly 
afford to have my machine out 
of commission for long periods 
of time. 

As it turns out, both drives 
function poorly at the same 
time. Taking the drives less than 
a mile from my home was attrac- 
tive, but I did not know I would 
be doing it so often. One drive, a 
Tandon-built unit, made five 
trips to the shop during the war- 
ranty period, and continued to 
act up after the warranty 
expiration. 

My second drive, a Shugart 
model, expired after several 
years of faithful service. The 
several days' service I originally 
enjoyed is a thing of the past. 

Meanwhile, my friends who 
own Percom and other model 
disk drives are happily comput- 
ing. Here in the remote reaches 
of Ohio they must seek service 
help from distant sources. But 
some out-of-warranty shops are 
fast and reliable. 

I plan to upgrade to a four 
drive system in the near future; I 
will consider seriously drives 
manufactured by makers other 
than Radio Shack. 

Model III users purchase their 
disk controller circuitry only at 
the time they get their initial 
drive. They must consider 
whether to get that drive from 
Radio Shack (which will stand 
behind the entire computer), or 
from another supplier. Other 
firms build disk controllers for 
first drives, but in most cases, 
the user must install it. 

Another factor is the availabil- 
ity of 80-track drives from out- 
side firms. Given the Model 
Ill's double density capabil- 
ities, data storage possibil- 
ities are prodigious. 

Printers 

Several years ago, not many 
printers were available, and all 
were expensive— $800 and up. 
Radio Shack offered what was 
basically a line of Centronics 
printers sold at prices several 
hundred dollars higher than the 
same, frequently discounted, 
units in Centronics trade dress. 

Today, you can buy 80 col- 



umn dot matrix printers for $300 
and up, with fancy features such 
as proportional spacing, graph- 
ics, and near letter-quality of- 
fered at very low prices. Radio 
Shack's printers are competi- 
tively priced, and can be pur- 
chased on sale from time to time 
as genuine bargains. 

Daisy-wheel printers, gaining 
in popularity, are available for 
about $1400-$3500. Radio 



". . .both drives 

function poorly 

at the same time." 



Shack's own version is priced 
at the lower middle end of 
that range. 

Radio Shack or the competi- 
tion? A printer can be large, 
bulky, heavy and hard to ship. If 
you plan on heavy use and ex- 
pect to require service frequent- 
ly, find a reliable local service 
outlet. Radio Shack offers thou- 
sands of drop-off points for 
printers. Many local computer 
stores have their own service 
technicians. 

However, mail-order purchase 
of a printer is not out of the 
question. My own Integral Data 
Systems unit has functioned 
perfectly for nearly three years 
without a service call. I give it 
only light-duty use: 30 pages of 
program listings a week, and an- 
other 30-50 pages of text. 

You may use your printer 
more heavily, but except for 
those using their computers for 
writing, issuing invoices, or 
printing checks or mailing 
labels, a sidelined printer 
seldom brings an entire system 
to a screeching halt. 

Modems and Serial Interfaces 

Radio Shack stacks up well in 
this area. I have used my rugged 
and reliable Modem I, a direct 
connect unit, for some months. 
At $149 it cost less than more 
portable acoustic units, but 
those have fewer features. 
Linked through the cassette 
port, it is one way to give Model I 
users without an expansion in- 



YOU DON'T NEED 
AN EXPANSION INTERFACE! 

Running out of room? 

Increase the memory in your TRS-80 " Model I or PMC ; ° up to 48K with no external 
hardware! The INTERNAL MEMORY'" plugs in inside your keyboard case with NO 
SOLDERING and can be easily removed at any time. I kindreds of satisfied customers 
have proven that the INTERNAL MEMORY is reliable, does not cause heat or power 
supply problems, and is compatible with virtually all hardware! and software. 



IM-IB INTERNAL MEMORY" 1 ' (32K) 
IM-2 INTERNAL MEMORY™ (48K) 



$85.50 complete ($59.50 less RAM) 
$140.00 complete ($89.50 less RAM) 



SPEED UP your TRS-80/PMC-80 and add a PRINTER! 

The SI'RINTER™ plugs into the Z-80 socket in your TRS-807PMC case with NO 
SOLDERING. The SPRINTER equips your computer with a standard parallel printer 
port (extending out the case by the expansion connector) with no other hardware or 
software needed. In addition, the SPRINTER allows software selection of 8 different 
speeds from % to 3 times "normal" (no delay line needed). Speed automatically 
switches to normal during cassette and disk operations. 



SPRINTFR '■' speed-up/printer port (assembled & tested) 
SPRINTER''" speed-up only; no printer port 



S99.50 
$69.50 



All products guaranteed for 1 year with a 30-day return privilege. PLEASE INCLUDE 
$3.00 SHIPPING IN U.S., $5.00 for CANADA, 15% for overseas orders. 

Send a self addressed stamped envelope for more information. 



. /famtcA (Dnquneesuna, 



VtSA* 



3555 South 3200 West Salt Lake City, Utah 84119 (801) 967-2324 

DEALER INQUIRIES INVITED 

Prices valid through end of month on front cover. 



COLOR COMPUTER SOFTWARE 



EDITOR ASSEMBLER 
DEBUGGER 



$6 



95 



CCEAD: This 8K Basic Program supports cassette files, has lull cursor control, line in- 
sertion/deletion, and much more. Two pass assembler supports full 6809 instruction set 
& addressing modes, lists to screen or printer. Debugger allows memory examine/mo- 
dify, program execution if not delighted return wiltiin 2 weeks for a full refund You get 
fully commented Basic source & complete instructions Requires Ext. Basic & 16K ... 
CASSETTE S6.95 

DELUXE TERMINAL PROGRAM 

verything! PLUS it's in a convenient plug- 



Automatic or manual capture 
Selectable Capture characters 
Exchange Basic programs 
Word mode means no split words 
And much, much more 



COLORCOM/E: This terminal program has f 
in cartridge LOOK at these features. 

• Complete upload & download support 

• Selectable baud rate & parity 

• Full or half duplex 

• Write to any printer or cassette 

• Supports ANY serial printer 

Use with CompuServe. The Source, etc. Talk to other Color Computers Works with any 
model Color Computer & full duplex RS232 modem CARTRIDGE S49.95 

STRIPPER: The Stripper takes off all that excess fat in your Basic Programs Three valu- 
able commands: ( 1 1 Delete Remarks: (2) Pack Lines. (3) Delete Spaces. Fully automatic, 
is not fooled by GOTO's. GOSUB's. etc Your programs will run faster and take up much 
less memory CASSETTF S7 9b 

BOOTSTRAP: Th.s Cartridge automatically loads and executes Basic programs from 
cassette at power-up. Can't fail. Ignores data files. Machine Language files, or Basic lies 
that have errors. For those programs that have to run' CARTRIDGF S34.40 

RS232 EXPANSION CABLE: With this cable you can connect 2 devices at the same 

time to the RS232 part of your Color Computer. Great for printer & modem 

RS232 Cable $20 00 

CUSTOM CARTRIDGES: Put YOUR Basic program into a convenient ROM Cartridge 
It'scasy! Runs instantly at powcr-up. trees up memory Use for Ad displays, schools, etc 
Call or write for info FROM $4 1 65 



Send check, money order. 

or Visa/MC Number: 

Include $1 for postage ana 

handling: Visa/MC Phone 

'or fast service 




P.O Box 10234 
Austin. Texas 78766 
(5121837-4665 

^154 
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ZIP UP YOUR 



x 



MODEL I 



SPEED-UP UNIT - an easy to install electronic device that enables programs 
to run 2 to 3 times faster. It's the fastest and finest quality speed-up unit 
on the market. 

• guaranteed to double processing speed- no additional 
purchases required. 

• programs will run up to 3 times faster (5.3 mhz) by adding 
a Z80B microprocessor and delay line - not supplied. 

• returns automatically to normal speed during disk and 
cassette operation - no software patches required. 

• keyboard power-on light changes color to indicate operating 
speed. 

$45.00 

VIDEO I. Reverses the video display to provide black characters and 
graphics on an all white screen for a much easier to read presentation. 
Software controlled. Cures pulling and distortion problems commonly ex- 
perienced with TRS-80 monitors. For use with TRS-80 monitors only. 
Assembled. 

$24.00 

"SATISFACTION GUARANTEED" 



Add $2.00 postage & handling - California residents add 6% sales tax 
-Foreign orders add 15%. 



ARCHBOLD ELECTRONICS 

10708 Segovia Way Rancho Cordova, CA 95670 

(916) 635-5408 

Dealer inquiries invited 



Make 

Money 

Selling 



terface a dial-up connection. 

My RS-232 interface is also a 
Radio Shack unit. The board it- 
self has performed faultlessly. I 
must jiggle and tighten the con- 
nector at intervals to ensure 
good contact. Fortunately, I use 
an intelligent terminal program 
that tests the RS-232 every time 
the program is run. Only on rare 
occasions has my serial inter- 
face crashed during use. 

Other modems, such as the 
Micro Connection and the Lynx, 
allow telecommunications with- 
out an RS-232 board. 

In my case, the RS-232's prob- 
lems are minor, and would not 
weigh heavily should I have to 
choose again. I like the Modem 
I's low, low price. 

Software 

There are no overriding 
reasons to stick with Radio 
Shack software for any particu- 
lar applications. Some offerings 
are pale imitations of popular 
programs offered elsewhere. 
Others, such as Scripsit, be- 



come standards against which 
all similar programs are mea- 
sured. In a few areas Radio 
Shack lags badly behind the 
state of the art (for example, 
Disk Operating Systems). 

If the software you need is not 
available from Radio Shack,, it 
will generally be offered by out- 
side firms now writing for the 
TRS-80 Models I and III. Fortu- 
nately, many good magazines 
review software and provide val- 
uable information on the relative 
worth of each new package. 

The hundreds of thousands of 
TRS-80 owners have a treasure 
trove of programming available 
at low cost. Software is possibly 
the most exciting of all expan- 
sion offerings, the area in which 
it is easiest to go right. ■ 

David Busch is a partner in a na- 
tionwide public relations/photo- 
journalism firm. Since 1974, he 
has written more than 200 com- 
puter and word processing-orient- 
ed articles. He owns, operates, or 
programs five different microcom- 
puters. 





microcomputing 



the only major journal for the users of the TRS-80*, a sure bet for getting the computer 
enthusiast into your store. Once through the door you can sell him anything. 

We know 80 will make you money . . . it's the only magazine for the TRS-80* users and you know how many 
of those there are. So call today and join the dealers who make money with 80. 

For information on selling 80 Microcomputing, call 603-924-9471 and speak with Ginnie Boudrieau, our 
Bulk Sales Manager. Or write to her at 80 Microcomputing, Pine Street, Peterborough, NH 03458. 

*TRS-80 is a trademark of Tandy Corp. 
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Poor 

Man's 

Floppy 



HIGH SPEED CASSETTE SYSTEM 



Now the widely acclaimed 
JPC Cassette System is available 
for your TRS-80* computer. 
The price is only $90.00 

TC-8 Cassette System 
JPC Products 
Albuquerque, NM 
Kit: $90 
Assembled: $120 

by Carl A. Kollar 

1 guess I don't have to tell any TRS-80 owners 
how frustrating the cassette system that 
comes with the computer can be. Even with the 
factory mod that's available, the annoyance of 
loading and checking programs becomes just 
barely tolerable. 

If you're like me, after you've just plunked 
down a chunk of money for a Level II 16K ma- 
chine, "you ain't got nuttin left" for even one 
disk drive at 500 bucks apiece. So you suffer. 

A reasonable alternative is the Exatron 
Stringy Floppy (ESF). This will cost you about 
250 bucks and totally eliminates your loading 
and saving problems, automatically and fast. 
I've had one of these for about six months and 
love it! 

But, if the price is still too steep, have I got a 
device for you! 

The Device 

The February 1980 issue of Microcomputing 
had an ad that intrigued the hell out of me. It 
was a high-speed cassette system by JPC Prod- 
ucts acclaimed as a "poor man's floppy." It 
made all sorts of seemingly ridiculous claims 
such as "loads five times faster," "stores 50,000 
bytes on a 10-minute cassette," "less than one 
bad load in a million bytes with the volume con- 
trol anywhere between one and eight." 

All this for a measly [90] bucks? How could 
this be? A call to Albuquerque answered a few 
questions: Yes, it had its own power supply, 
and, it stored programs five times faster be- 
cause it utilized higher density data. The com- 
puter outputs the information at a higher rate 
out of the rear keyboard connector. 

The ad had even claimed anyone could build 
it even if you have never soldered before. JPC 
would make it work, if you couldn't — for free. 
I was sold. I placed my order, and it arrived 
about two months later (parts shortage). 

I work in electronics, so I found the unit ex- 
ceptionally easy to build. It took about an 
hour. The manual is superb. (That's better than 
ereat.) It was clear, concise and exact with no 




FOR TRS-80 



[Reprint of June 1980 Review, 80 Microcomputing] 




ambiguities. Important parts placements are 
stressed (polarity markings on electrolytics, 
bands on diodes, etc.). 

JPC was right! With these instructions, you 
couldn't go wrong. The board quality is excel- 
lent. It is double-sided and parts locations are 
clearly marked on the component side of the 
board. There are no jumper wires to install. 
JPC utilizes PC traces and plated-through 
holes for connections to traces on the other side 
of the board. 

Also, there are absolutely no adjustments or 
settings to bother with. 

The documentation is a sheaf of 8 Vi x 1 1 pa- 
pers stapled together. It is written in the nicest 
format I've seen in a while. Each command 
and/or subjects is covered on its own sheet in 
large type. All explanations are in easy to read 
English — not computerese. 



Commands and Features 
SAVE"filename": Saves your BASIC pro- 
gram on cassette. 

LOAD: Reads the next BASIC program from 
the cassette. 

LOAD" filename": Searches for and loads the 
specified file from cassette. 
LOAD? and LOAD?"Filename": Reads file 
from cassette, and compares contents to mem- 
ory. 

LOADN: Prints a list of all the programs on a 
cassette, until interrupted by the "break" key. 
LOADN"filename": Same as above except the 
tape will stop at the end of the program named. 
KILL: Removes the file manager program 
from memory so that the extra memory can be 
used by large programs. 

RSET: Allows the operator to rewind and posi- 
tion the tape on tape recorders that have these 
functions tied to the motor control jack. 
RUN"filename": TC-8 searches for a specified 
program and runs it immediately. 
PLT"filename": Same as SAVE "filename", 
except it is for use with system tapes. 
GET: Same as LOAD, except it is for use with 
system tapes. 

GET"filename": Same as LOAD "filename", 
except it is for use with system tapes. 
GET? and GET?"filename": Same as LOAD? 
and LOAD?"filename", except it is for use 
with system tapes. 
GETN and GETN"filename": Same as 



LOADN and I. O A DN" filename", except it is 
for use with system tapes. 
OPEN: Required before cassette input or out- 
put of a data file can be attempted. 
CLOSE: Required to end a cassette data file. 
PRINT*: Allows numerical or string data to be 
output to a cassette file. 

INPUTS: Allows numerical or string data (o be 
input from a cassette file. 

I haven't counted them, so I don't know 
about the "one load in a million bytes'* claim, 
but my son, Anthony (age 11), loaded about 30 
of his programs from his Radio Shack format 
tape to a new TC-8 format tape. He's run them 
all and found no bad loads. 

Unlike the standard tape system, you can po- 
sition your tape anywhere before the program 
you want and not have to look for a blank spot 
between programs. The TC-8 patiently waits 
for the program you want and then starts load- 
ing without getting confused by the portion of 
the previous program you just fed it. 

Try that on your regular cassette system; 
you'll wear out the reset button. ■ 

ORDER NOW 

To order your TC-8 kit, send your check or 
money order for $90.00 plus $3.50 postage 
and handling to JPC PRODUCTS CO., 12021 
Paisano Ct., Albuquerque, NM 87112 (New 
Mexico residents add 4% sales tax). Credit card 
orders accepted by phone or mail. Personal 
checks will delay shipment. We will otherwise 
immediately ship you the TC-8 kit, the cabinet, 
the ribbon cable, the power adapter, an instruc- 
tion manual, and a cassette containing the 
software. 




S 42 



PRODUCTS CO. 
Phone (505) 294-4623 
12021 Paisano Ct. 
Albuquerque. N.M. 87112 
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HARDWARE BREAKTHROUGH 

DESIGN SOLUTION inc. presents the AN-SERIES DEVELOPMENT SYSTEM 
forTRS-80™, Apple II™, Commodore PET™, Superbrain™* 

$ qq*5 DISK CONTROLLER *129 9S DOUBLE DENSITY CONVERTER 




An afford- 
able multidrive 
floppy disk in- 
terface. The AN- 
f 760 supports 35, 40, 

80 and 160 track 
drives. Using proprie- 
tary Digital Data Separ- 
ation Techniques, maxi- 
mum permissible data 

transfer integrity is assured. Read, write, and step LED 
indicators prompt operator during all disk I/O. The 
AN-760 comes complete with power supply module and 
operation manual. (Operating system software optional.) 

8K FIRMWARE INTERFACE 

8K Bytes of 
User Program- 
able Firmware 
{4-2716 Eproms) 
' are automatically 
loaded by system 
/12345 Command con- 
trolled by a 2716 con- 
troller chip. The user can 
create his own firm 
operating system to load and execute programs from 
Eprom or to provide user defined arithmetic functions. 
Comes complete with power supply, operation manual 
and controller chip. (The AN-522 requires AN-551 Eprom 
programmer.) 
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EPROM PROGRAMMER 




An enhanced 
version of our 
original Eprom 
Programmer, the 
AN-551 will now pro- 
gram the single sup- 
ply 2516, 2716, 2532 
and 2732 
Eproms from Basic or 

machine language. Software provided will load Eprom 
from TRS-80 Ram or load TRS-80 Ram from Eprom with 
complete on-screen verification. The AN-551 comes com- 
plete with power supply and operation manual. 

All connections made to AN-SERIES products from your bread- 
board are simply pushed through the front panel. Custom connec- 
tors on the P.C.B. provide super reliable connection for thousands 
of operations. All AN-SERIES products are warranted for a full 
90-DAYS under DSI's limited warranty policy. Complete documen- 




Using DSI Pro- 
prietary Data 
Separation and 
Write Precompen- 
sation Techniques, 
the AN-920 provides 
approximately 1.6 times 
more data 
storage capacity on 

your 5 1 /4 disk drives. The AN-920 can be used in con- 
junction with the AN-760 FDC or the TRS-80 expansion 
interface. Double Density System comes complete with 
power supply module and operation manual. (Required 
Newdos-80 Ver 2.0 Disk Operation System Optional.) 

MULTI-RANGE DVM INTERFACE 

Analog Sig- 
nal Interface 
is now as easy 
as turning a knob. 
EE-1670 provides 
DVM functions volts, 
and milli-amps and 8 
ranges, 1-200 milli- 
volts, 0-2, 0-20, 0-200 
volts, 0-200 micro amps, 
0-2, 0-20, 0-200 milliamps, standard banana jacks and test 
leads create perfect connection scheme for real time 
analog data acquisition. EE-1670 system is complete 
with power supply and manual of operation. 

RS-232 INTERFACE 

Can be con- 
figured to 
communicate 
with data com- 
munications equip- 
ment or data termin- 
al equipment at 110, 
150,300,600,1200,2400, 
4800 and 9600 Baud. The 
AN-464 provides 20MA 

loop output and RS-232C through a DB-25P connector. 
Software selectable odd/even parity, 5-8 bit word lengths 
and stop bit formats are standard along with power sup- 
ply module, software driver, and operation manual. 

tation is provided for each model in an attractive folder, including 
theory of operation, and special interest projects and applica- 
tions. All units are supplied with external power supply modules 
that connect through a mini-jack on the front panel. 





DESIGN SOLUTION inc. 

BOX 1225, FAYETTEVILLE, AR 72701 



C.O.D. add $5.00 — Other add $3.00 S/H. 

(Exports slightly higher) 

Orders and Information: (501) 521-0281 



HARDWARE BREAKTHROUGH 



DESIGN SOLUTION inc. presents the AN-SERIES DEVELOPMENT SYSTEM 
for TRS-80™, Apple II™, Commodore PET™, Superbrain 1 



«TM* 




DSI AN 7000 COMPUTER 

True TRS-80™ work-a-like capability is now 
available in kit form from DSI. The AN-7000 pro- 
vides a full 16K of dynamic ram, with a com- 
plete modulated video interface system for use 
with standard televisions, Z-80B Micro-processor, 
cassette interface, membrane keyboard, finished 
case and power supply module, as well as every 
component needed for ROM-less assembly. Save hun- 
dreds of dollars by assembling the AN-7000 processor 
yourself with only common hand tools. Step by step in- 
structions with clear cut pictorials and schematics create a very straight-forward work environment as 
you assemble your own system from scratch. Totally flexible, the AN-7000 will interface with all Model I 
Level II hardware accessories including the DSI AN-760 FDC and AN-1000 Megadrives. The AN-7000 system 
represents the most significant break-through in user assembled computer equipment available. The 
AN-7000 kit comes complete with all parts necessary for a full 16K, Z-80 based CPU, less the 12K basic in- 
terpreter ROMS. 



$179.95 



New DOS 80™ ver 2.0 is available at special package 
purchase rates for the AN-760 and AN-1000. Contact 
tact DSI for complete DOS pricing. 



A Registered Microsoft™ TRS-80 Level II work-a-like 3 
chip set with manual and complete documentation is 
available for the AN-7000. The Microsoft-DSI basic 
package lists at $89.95. 





DSI EGADRIVE 
$590. oo 

This single or double density 80 track 
dual sides 5 1 /4" floppy disk drive is a 
must for all serious TRS-80 and DSI 
systems users. With almost 1 million 
bytes of unformated data storage capaci 
ty in the MFM double density mode the 
AN-1000 provides the utmost in stability 
of performance at a very reasonable 
price. Track to track access time 3 ms, 
soft error rate 1-10 9 reads, hard errors 1-10 12 
reads, and media life 4x10", clearly represent the 
AN-1000 technology. Complete with power supply, 
case, cable and operation manual. 



All connections made to AN-SERIES products from your bread- 
board are simply pushed through the front panel. Custom connec- 
tors on the P.C.B. provide super reliable connection for thousands 
of operations. All AN-SERIES products are warranted for a full 
90-DAYS under DSI's limited warranty policy. Complete documen- 



tation is provided for each model in an attractive folder, including 
theory of operation, and special interest projects and applica- 
tions. All units are supplied with external power supply modules 
that connect through a mini-jack on the front panel. 



DESIGN SOLUTION inc. 

BOX 1225, FAYETTEVILLE, AR 72701 
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C.O.D. add $5.00 — Other add $3.00 S/H. 

(Exports slightly higher) 

Orders and Information: (501) 521-0281 



TECHNIQUE 



Add precision to your graphics animation. 



Smooth Graphics 



Ronald Goodman 
12702 Emelita Street 
North Hollywood, C A 91607 



Most Space Invader games 
move the aliens two X posi- 
tions to the left or right and three 
Y positions down at a time. Even 
arcade games move the aliens in 
blocks rather than single X or Y 
positions at a time. Why? A pic- 
ture of an invader might occupy 



three adjacent CHR$ graphic 
blocks. It is difficult to slide the 
invaders only one X position at a 
time, because a CHR$ is two X 
positions wide. Likewise, a CHR$ 
is three Y positions tall; it is 
easier to move the invader three 
full Y positions. The Assembly 
Language program shown in Pro- 
gram Listing 1 shifts graphics on 
the screen Va of a CHR$ position 
(one X position) left and right, 
and Va of a CHR$ position (one Y 







Program Listing 1. 




7D00 


00100 




ORG 


32000 




7D00 21003C 


00110 


A128S 


LD 


HL, 15360 


LINES 110- 


210 












7D03 010004 


00120 




LD 


BC,1024 


CHANGE ALL 


32 'S ON 












7D06 7E 


00130 


LOOPB 


LD 


A,(HL) 


THE SCREEN 


TO 128 'S 












7D07 FE20 


00140 




CP 


32 


SO THE SCR 


EEN IS 












7D09 2002 


00150 




JR 


NZ, LOOPA 


COMPATIBLE 


WITH THE 












7D0B 3680 


00160 




LD 


(HL) ,128 


SHIFTING P 


ROGRAM. 












7D0D 23 


00170 


LOOPA 


INC 


HL 




7D0E 0B 


00180 




DEC 


BC 




7D0F 78 


00190 




LD 


A,B 




7D10 Bl 


00200 




OR 


C 




7D11 20F3 


00210 




JR 


N Z , LOOPB 




7D13 CD7F0A 


00220 




CALL 


0A7FH 


GET M FROM 


X=USR(M) 












7D16 7D 


00230 




LD 


A,L 


LINES 230- 


320 












7D17 3D 


00240 




DEC 


A 


JUMP TO TH 


E SHIFT 












7D18 280A 


00250 




JR 


Z,UP 


DIRECTION 


REQUESTED 












7D1A 3D 


00260 




DEC 


A 


OR RETURN' 


S TO BASIC 












7D1B 283F 


00270 




JR 


Z,DOWN 


IF AN ILLE 


GAL NUMBER 












7D1D 3D 


00280 




DEC 


A 


WAS GIVEN. 


7D1E 2872 


00290 




JR 


Z,LEFT 




7D20 3D 


00300 




DEC 


A 




7D21 286D 


00310 




JR 


Z,RITE 




7D23 C9 


00320 




RET 








00330 




SHIFT 


SCREEN UP ROUTINE 


ROM LINE 34 


TO 640 












7D24 21003C 


00340 


UP 


LD 


HL, 15360 




7D27 010004 


00350 




LD 


BC,1024 




7D2A CB7E 


00360 


LOOP1 


BIT 


7,(HL) 




7D2C 2007 


00370 




JR 


N2,FIX1 




7D2E 0B 


00380 


NEXT1 


DEC 


BC 

Prog 


ram continues 



position) up and down. Use this 
program to shift banners, to 
make a picture of a car driving 
along, or for any other graphics 
application requiring precise 
shifting. The shifting ignores all 
non-graphic characters; shifting 
the letters by one X or Y position 
is impossible with software. 

Sometimes it is unnecessary 
to shift the entire screen. To 
modify the shift area for shift up, 
line 340 should load HL with the 
lowest spot on the screen you 
want to move. Line 350 should 
load BC with the number of posi- 
tions up from the spot you want 
to shift. You can modify shift left 
in the same way; line 970 should 
load HL and line 980 should load 
DE (instead of BC). For shift 
down, line 660 should load HL 
with the highest screen position 
to be shifted. Line 670 should 
load BC with the number of posi- 
tions down from the first spot 
you want to shift. Modify shift 
right like shift down; line 1380 
should load HL and line 1390 
should load DE. After the pro- 
gram is in memory, you can relo- 
cate it. If you call the program 
from Basic, use X = USR(D). If D 
equals one then shifting goes 
up. Two shifts down; three shifts 



The Key Box 

Basic Level II 
Model I or III 
16K RAM 



left; and four shifts right. If you 
call the program from another 
machine language program de- 
lete lines 220 and 230. When 
calling the program, load A with 
one for up, two for down, three 
for left and four for right. 

You can combine the program 
shown in Listing 2 with a Basic 
program. Change line 45000 to 
make X equal the starting ad- 
dress you desire (or leave it as is). 

The program in Listing 3 must 
be used with Listings 1 or 2. If you 
use Listing 1, POKE 16526-16527 
with the starting address you 
choose. Listing 2 takes care of 
the POKEs for you. 

Combination Shifts 

There are four possible dia- 
gonal shifts— left and up, right 
and up, left and down, and right 
and down. The program shown in 
Listing 4 shifts at a slope. A 
slope is a vertical increase or 
decrease divided by a horizontal 
increase or decrease. The verti- 
cal movement is Y and the hori- 
zontal movement is X. When 
running Listing 4, enter the X 
and Y separated by commas. 
This program then shifts some 
graphics along that slope. To 
enter a new slope, press the 
space bar while the graphics are 
moving. ■ 



Ron Goodman, a 15-year old 
Beatles freak, has been working 
on a TRS-80 for about two years. 
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Program continued 








7DEB 20F6 01460 JR NZ,LOOP4 












7DED 21003C 01470 LD HL, 15360 


7D2F 23 
7D30 78 










7DF0 114000 01480 LD DE,64 


00390 
00400 




INC 

LD 


HL 
A,B 


7DF3 0610 01490 LD B,16 
7DF5 CB7E 01500 LINE4 BIT 7,(HL) 


7D31 Bl 


00410 




OR 


C 


7DF7 2806 01510 JR Z,NOGRF4 


7D32 20F6 


00420 




JR 


NZ,LOOPl 


7DF9 CB86 01520 RES 0,(HL) 


7D34 C9 


00430 




RET 




7DFB CB96 01530 RES 2,(HL) 


7D35 C5 


00440 


FIX1 


PUSH 


BC 


7DFD CBA6 01540 RES 4,(HL) 


7D36 46 


00450 




LD 


B,(HL) 


7DFF 19 01550 NOGRF4 ADD HL,DE 


7D37 114000 


00460 




LD 


DE,64 


7E00 10F3 01560 DJNZ LINE4 


7D3A ED52 


00470 




SBC 


HL,DE 


7E02 C9 01570 RET 


7D3C CB7E 


00480 




BIT 


7,(HL) 


7E03 CB26 01580 GRAFC4 SLA (HL) ; SHIFT BYTE 


7D3E 280C 


00490 




JR 


Z, GOBAKl 




7D40 CB40 


00500 




BIT 


0,B 


7E05 CB96 01590 RES 2,(HL) 
7E07 CBA6 01600 RES 4,(HL) 


7D42 2802 


00510 




JR 


Z,NEXBT1 


7D44 CBE6 


00520 




SET 


4,(HL) 


7E09 CBB6 01610 RES 6,(HL) 


7D46 CB48 


00530 


NEXBT1 


BIT 


1,B 


7E0B CBFE 01620 SET 7,(HL) 


7D48 2802 


00540 




JR 


Z, GOBAKl 


7E0D 2B 01630 DEC HL 


7D4A CBEE 


00550 




SET 


5, (aw 


7E0E 46 01640 LD B,(HL) 


7D4C 19 


00560 


GOBAKl 


ADD 


HL,DE 


7E0F 23 01650 INC HL 


7D4D CB3E 


00570 




SRL 


(HL) - ; SHIFT BYTE 


7E10 CB78 01660 BIT 7,B 
7E12 28D3 01670 JR Z,NEXT4 


7D4F CB3E 


00580 




SRL 


(HL) ; SHIFT AGAI 


7E14 CB48 01680 BIT 1,B 


N 










7E16 2802 01690 JR Z,NEXBT4 


7D51 CBFE 


00590 




SET 


7,(HL) 


7E18 CBC6 01700 SET 0,(HL) 


7D53 CBB6 


00600 




RES 


6,(HL) 


7E1A CB58 01710 NEXBT4 BIT 3 ,B 


7D55 CBAE 


00610 




RES 


5,(HL) 


7E1C 2802 01720 JR Z,MORBT4 


7D57 CBA6 


00620 




RES 


4,(HL) 


7E1E CBD6 01730 SET 2,(HL) 


7D59 CI 


00630 




POP 


BC 


7E20 CB68 01740 MORBT4 BIT 5,B 


7D5A 18D2 


00640 




JR 


NEXT1 


7E22 28C3 01750 JR Z,NEXT4 




00650 


i 


SHIFT 


SCREEN DOWN ROUTINE FROM LINE 


7E24 CBE6 01760 SET 4,(HL) 


660 TO 950 










7E26 18BF 01770 JR NEXT4 


7D5C 21FF3F 


00660 


DOWN 


LD 


HL, 16383 


0000 01780 END 


7D5F 010004 


00670 




LD 


BC,1024 


00000 TOTAT. ERRORS 


7D62 CB7E 


00680 


LOOP 2 


BIT 


7,(HL) 


7D64 2007 


00690 




JR 


NZ,FIX2 


7D66 0B 
7D67 2B 


00700 
00710 


NEXT2 


DEC 
DEC 




HL 




7D68 78 


00720 




LD 


A,B 




7D69 Bl 


00730 




OR 


C 




7D6A 20F6 


00740 




JR 


NZ,LOOP2 






7D6C C9 


00750 




RET 








7D6D C5 


00760 


FIX2 


PUSH 


BC 




45000 X=32000 


7D6E CB26 


00770 




SLA 


(HL) ; SHIFT BYTE 




45005 READAS:IFASO"/**"THEN45005:DATA/** 

45010 M=INT(X/256) :L=X-M*256 :POKE16526 ,L:POKE16527 ,M 


7D70 CB26 

N 

7D72 CBFE 


007 80 




SLA 


(HL) ; SHIFT AGAI 




45020 READA:CS=CS+A:IFAO-1THENPOKEX,A:X=X+1:GOTO45020 


00790 




SET 


7,(HL) 




45030 IFCS<>32245THENPRINT"BAD CHECKSUM, CHECK DATA AND TRY AGAI 
N. " 


7D7 4 CBB6 


00800 




RES 


6,(HL) 




45040 RETURN 


7D76 114000 


00810 




LD 


DE,64 




50000 DATA33, 0,60, 1,0, 4, 126 ,254, 32, 32, 2, 5 4, 128, 35, 11, 120, 177, 32 


7D79 ED52 


00820 




SBC 


HL.DE 




50010 DATA243, 205, 127, 10, 125, 61, 40, 10, 61, 40, 63, 61, 40, 114, 61, 40 


7D7B 46 


00830 




LD 


B, (HL) 




50020 DATA109, 201, 33, 0,60, 1,0, 4, 203, 126, 3 2, 7, 11, 35, 120, 177, 32 


7D7C 19 


00840 




ADD 


HL,DE 




50030 DATA2 46, 2 01, 197, 7 0,17, 6 4, 0,237, 82, 2 03, 126, 40, 12, 2 03, 64, 40 


7D7D CB78 


00850 




BIT 


7,B 




50040 DATA2, 203, 230, 203, 72, 40, 2, 203, 238, 25, 203, 62, 203, 62, 203 


7D7F 280C 


00860 




JR 


Z,GOBAK2 




50050 DATA254, 203, 182, 203, 174, 203, 166, 193, 24, 210, 33, 255, 63, 1,0 


7D81 CB68 


00870 




BIT 


5,B 




50060 DATA4, 203, 126, 32, 7, 11, 43, 120, 177, 32, 246, 201, 197, 203, 38 


7D83 2802 


00880 




JR 


Z,NEXBT2 




5007 DATA203, 3 8, 203, 254, 203, 182, 17, 64, 0,237, 82, 70, 25, 203, 120 


7D85 CBCE 


00890 




SET 


1,(HL) 




50080 DATA40, 12, 203, 104, 40, 2, 203, 206, 203, 96, 40, 2, 203, 198, 193, 24 


7D87 C360 


00900 


NEXBT2 


BIT 


4,B 




50090 DATA214, 24, 75, 33, 0,60, 17, 0,4, 203, 126, 32, 28, 35, 27, 122, 17 9 


7D89 2802 


00910 




JR 


Z,GOBAK2 




50100 DATA32, 246, 33, 63, 60, 17, 64, 0,6, 16, 203, 126, 40, 6, 203, 142, 203 


7D8B CBC6 


00920 




SET 


0r (HL) 




50110 DATA158, 203, 174, 25, 16, 243, 201, 203, 46, 203, 182, 203, 174, 203 


7D8D CI 


00930 


GOBAK2 


POP 


BC 




50120 DATA158, 203, 142, 35, 70, 43, 203, 120, 40, 211, 203, 6 4, 40, 2, 203 


7D8E 18D6 


00940 




JR 


NEXT2 




50130 DATA206, 203, 80, 40, 2, 203, 222, 203, 96, 40, 195, 203, 238, 24, 191 


7D90 184B 


00950 


RITE 


JR 


RIGHT 




50140 DATA33, 255, 63, 17, 0,4, 203, 126, 32, 28, 43, 27, 122, 17 9, 32, 246 


970 TO 1360 
7D92 21003C 
7D95 110004 
7D98 CB7E 


00960 


S 


SHIFT 


SCREEN LEFT ROUTINE FROM LINE 




50150 DATA33, 0,60, 17, 64, 0,6, 16, 203, 126, 40, 6, 203, 134, 203, 150, 203 


00970 
00980 
00990 


LEFT 
LOOP3 


LD 
LD 

BIT 


HL, 15360 

DE.1024 
7,(HL) 




50160 DATA166, 25, 16, 243, 201, 203, 38, 203, 150, 203, 166, 203, 182, 203 
50170 DATA254, 43, 70, 35, 203, 120, 40, 211, 203, 72, 40, 2, 203, 198, 203 
50180 DATA88, 40, 2, 203, 214, 203, 104, 40, 195, 203, 230, 24, 191,-1 


7D9A 201C 


01000 




JR 


NZ,GRAFC3 






7D9C 23 


01010 


NEXT3 


INC 


HL 






7D9D IB 


01020 




DEC 


DE 




Program Listing 2. 


7D9E 7A 


01030 




LD 


A,D 






7D9F B3 


01040 




OR 


E 






7DA0 20F6 


01050 




JR 


NZ,LOOP3 




7DA2 213F3C 


01060 




LD 


HL, 15423 




7DA5 114000 


01070 




LD 


DE,64 




7DA8 0610 
7DAA CB7E 


01080 




LD 


B,16 
7,(HL) 




01090 


LINE3 


BIT 






7DAC 2806 


01100 




JR 


Z,NOGRF3 






7DAE CB8E 


01110 




RES 


1,(HL) 




5 GOSUB45000:REM LEAVE THIS LINE OUT IF YOU ARE USING LISTING 1 


7DB0 CB9E 


01120 




RES 


3,(HL) 




10 CLS:CLEAR100:FORX=1TO15:PRINTSTRINGS(64,191) ;:NEXTX 


7DB2 CBAE 


01130 




RES 


5,(HL) 




20 PRINT6474, "LITTLE SHIFT"; 


7DB4 19 


01140 


NOGRF3 


ADD 


HL,DE 




30 G(l) =1:G(2) =3:G(3) =2:G(4) =4:FORA=1TO20STEP4 :F0RD=1T04:F0RC=1T 


7DB5 10F3 


01150 




DJNZ 


LINE3 




OA:X=USR(G(D) ) :NEXTC,D,A 


7DB7 C9 


01160 




RET 






40 CLS:FORX=470TO598STEP64:FORY=0TO5:READG:PRINT@X+Y,CHR$(G) :NEX 


7DB8 CB2E 


01170 


GRAFC3 


SRA 


(HL) ; SHIFT BYTE 




TY,X 

50 PRINT@0,"USE THE FOUR ARROW KEYS TO MOVE THE FACE." 


7DBA CBB6 


01180 




RES 


6,(HL) 




60 A=PEEK(14 40 0) :IFA=8THENG=1ELSEIFA=16THENG=2ELSEIFA=32THENG=3E 


7DBC CBAE 


01190 




RES 


5,(HL) 




LSEIFA=64THENG=4ELSE6 


7DBE CB9E 


01200 




RES 


3,(HL) 




70 X=USR(G) :GOTO60 


7DC0 CB8E 


01210 




RES 


1,(HL) 




100 DATA152,163,147,163,147,164 


7DC2 23 


01220 




INC 


HL 




110 DATA149,160,136,132,144,170 


7DC3 46 


01230 




LD 


B,(HL) 




120 DATA130,164,179,179,152,129 


7DC4 2B 


01240 




DEC 


HL 






7DC5 CB7 8 


01250 




BIT 


7,B 






7DC7 28D3 


01260 




JR 


Z,NEXT3 




Program Listing 3. 


7DC9 CB40 


01270 




BIT 


0,B 






7DCB 2802 
7DCD CBCE 


01280 
01290 




JR 
SET 


Z,NEXBT3 
1,(HL) 










7DCF CB50 


01300 


NEXBT3 


BIT 


2,B 




7DD1 2802 
7DD3 CBDE 


01310 
01320 




JR 

SET 


Z,MORBT3 
3,(HL) 










7DD5 CB60 


01330 


MORBT3 


BIT 


4,B 






7DD7 28C3 


01340 




JR 


Z,NEXT3 




5 GOSUB45000:REM DELETE THIS LINE IF YOU ARE USING LISTING 1 


7DD9 CBEE 


01350 




SET 


5,(HL) 




10 CLS:DEFINTX-Z:INPUT"ENTER THE SLOPE Y/X (USE THIS FORM - Y,X) 


7DDB 18BF 


01360 




JR 


NEXT3 




";Y,X:CLS 




01370 


; 


SHIFT 


SCREEN RIGHT ROUTINE FROM LINE 




15 PRINT@472,CHRS(191) ; STRINGS ( 5 , 179) ;CHR$(140) ; STRINGS! 5 ,179) ;C 


1380 TO 1776 












HRSU91) ; 


7DDD 21FF3F 


01380 


RIGHT 


LD 


HL, 16383 




20 IFX>0THENFORM=1TOX:S=USR(4) : NEXTM:GOTO40 


7DE0 110004 


01390 




LD 


DE,1024 




30 1FX<0THENFORM=XTO-1:S=USR(3) : NEXTM 


7DE3 CB7E 


01400 


LOOP 4 


BIT 


7,(HL) 




40 IFY>0THENFORM=1TOY:S=USR(2) : NEXTM:GOTO60 


7DE5 201C 


01410 




JR 


NZ,GRAFC4 




50 IFY<0THENFORM=YTO-1:S=USR(1) : NEXTM :GOTO6 


7DE7 2B 


01420 


NEXT4 


DEC 


HL 




60 IFPEEK(14 400)=128THENRUNELSE20 


7DE8 IB 


01430 




DEC 


DE 






7DE9 7A 


01440 




LD 


A,D 






7DEA B3 


01450 




OR 


E 




Program Listing 4. 
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Encyclopedia for the TRS-80* 

What's the key to getting the most from your 
TRS-80*? No, it isn't disk drives or printers or joy- 
sticks. It's information. Without a continual sup- 
ply of information and ideas, you cannot realize 
the full potential of the TRS-80*. 

Our response to the clamor for additional infor- 
mation is the Encyclopedia for the TRS-80*, a ten- 
volume reference work of programs and articles 
carefully selected to help you make the most of 
your microcomputer. You can consider the 
volumes of the Encyclopedia to be an extension of 
the documentation that came with your TRS-80* . 
Each book is full of material on programming 
techniques, business, language, hardware, games, 
tutorials, education, utilities and interfacing. 

Unlike conventional encyclopedias, the 
Encyclopedia for the TRS-80* will never become 
stale or out of date. That's because the volumes of 
the Encyclopedia are being issued one-at-a-time, 
approximately six weeks apart. This means that 
each new volume will reflect the latest develop- 
ments and discoveries, making this a living ency- 
clopedia for TRS-80* users. 

The first four volumes are being issued during 
1981 . The remaining volumes will be issued during 
the first half of 1982. The deluxe COLLECTOR'S 
EDITION has a handsome green and black hard 
cover with a dust jacket. 
A soft cover edition is also available. 

DEALERS Please request discount information 
and catalog when ordering. Mail Dealer orders 
ATT: Wayne Green Books Dealer Sales. 



WAYNE GREEN BOOKS 

A division of Wayne Green Inc 
Pine Street 
Peterborough, NH 03458 
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Encyclopedia Loader 

The editors at Wayne Green Books want to help 
you use the programs in your Encyclopedia for the 
TRS-80*. So to help you maximize the use of your 
microcomputing time, we created Encyclopedia 
LoaderTM. 

By a special arrangement with Instant Soft- 
ware™, Wayne Green Books can now provide you 
with selected programs contained in each volume 
of the Encyclopedia for the TRS-80* on a special 
series of cassettes called Encyclopedia LoaderTM. 
Your encyclopedia provides the essential docu- 
mentation but now you'll be able to load the pro- 
grams instantly. 

With Encyclopedia LoaderTM you'll save hours 
of keyboard time and eliminate the aggravating 
search for typos. 

Save money with this introductory offer. 
Encyclopedia LoaderTM for Volume 1 of 
Encyclopedia for the TRS-80* which will normal- 
ly cost $14.95 is available for a limited time only at 
the introductory price of $12.95. 

To order specify EL8001 $12.95 . 

The Encyclopedia for the TRS-80 
is a Wayne Green publication 
Encyclopedia loader is manufac- 
tured by Instant Software, a 
division of Wayne Green Inc. 
* TRS-80 is a trademark of Radio 
Shack division of Tandy Corp 
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SPECIAL OFFER 




¥REE 



If you order the entire 
ten volume set of the 
Encyclopedia for the 
TRS-80* you'll receive 
the tenth volume FREE! 

10 Volume deluxe 
hard cover COLLECTOR'S 
EDITION -a $199.50 value. 
$164.00 EN8100 postpaid 

10 Volume soft cover 
edition, a $109.50 value. 
$83.00 EN8080 postpaid 
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YES, I want your special offerl 
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10 Volume deluxe hard cover 

COLLECTOR'S EDITION-a 
$199.50 value. EN8100 $164.00 

To order single hard cover volumes 
of the Encyclopedia please specify: 



10 Volume soft cover edition 

— a $109.50 value. EN8080 $83.00 



To order single soft cover volumes 
of the Encyclopedia please specify: 



WAYNE GREEN BOOKS 
SALES DEPT., PINE ST 
PETFRBOROUCH,NH 03458 
OR CALL TOLL FREE 
1-800-258-5473 

To order Encyclopedia Loader™ 

cassettes please specify: 



Volume 1 


EN81 01 $19.95* 


Volumel 


EN8081 $10.95* 


Volumel 


EL8001 $12.95* 


Volume 2 


EN81 02 $19.95* 


Volume 2 


EN 8082 $10.95* 


Volume 2 


EL8002 $14.95* 


Volume 3 


EN8103 $19.95* 


Volume 3 


EN8083 $10.95* 


Volume 3 


EL8003 $14.95* 


Volume4 


EN81 04 $19.95* 


Volume 4 


EN8084 $10.95* 


Volume4 


EL8004 $14.95* 


Volumes 


EN81 05 $19.95* 


Volume 5 


EN8085 $10.95* 


Volume 5 


EL8005 $14.95* 


Volume 6 


EN8106$19 95* 


Volume 6 


EN8086 $10.95* 


Volume 6 


EL8006 $14.95* 


Volume 7 


EN8107$19 95* 


Volume 7 


EN8087 $10.95* 


Volume 7 


EL8007 $14.95* 


Volume8 


EN81 08 $19.95* 


Volume 8 


EN 8088 $10.95* 


Volume 8 


EL8008 $14.95* 


Volume 9 


EN81 09 $19.95* 


Volume9 


EN8089 $10.95* 


Volume9 


EL8009 $14.95* 


VolumelO 


EN8110$19.95* 


VolumelO 


EN8090 $10.95* 


VolumelO 


EL8010 $14.95* 


PAYMENT ENCLOSED 


PLEASE CHARGE T 


OMY VISA 


MASTERCAR 
EXPIR 


D _ _AMEX 


CARD# 




INTFRRANKtf 


FS 


NAMF 


ADPRE^ 


CITY 






STATF 


ZIP 




SIGNATURE 












• rhese prices do not include shipping and handling Please add $1.50 per item in the US and Canada Allow 4-6 weeks after publication 
volumes will be shipped UPS if the complete street address is provided, otherwise shipment will be 4th (lass book rate ) Foreign orders please 
per item or $5.00 for surface mail per item Delivery outside the U.S. varies Prices are subject to change without notice. No C.O.D.'s. 


date for delivery (All 
add $10.00 for airmail 

8003 



GENERAL 






Trials and tribulations of mail order. 



When the Postman Doesn't Even 
Ring Once 



Robert E. Averill 
P.O. Box 99 
Belfair, WA 98528 



It was time for me to up-grade 
my TRS-80 computer system. I 
wanted an expansion interface, a 
disk drive, a good printer and a 
lowercase modification so that I 
could use a disk version of Scrip- 
sit instead of the tape version. 

I had seen plenty of good 
sounding advertisements for the 
hardware and software that I 
wanted, and most of them prom- 
ising that if I just dialed their 800 
toll free number I could have any- 
thing I wanted. 

I made a very careful list and 
narrowed down the selection of 
possible suppliers to five that 
seemed to have what I wanted at 
a price I felt I could afford. Next, I 
telephoned a friend and asked 
him where he had bought his new 
Epson MX-80 printer, which he 
was very happy with and had or- 
dered c.o.d. from one of the sup- 



pliers on my list. He said that he 
had received it via UPS three 
days from the date he ordered on 
their toll free number. 

By this time I was nearly jump- 
ing up and down with excite- 
ment—just imagine— I could be 
using my new printer in just three 
or four days if I phoned in now. I 
picked up the phone, dialed the 
number from the advertisement, 
and placed an order for an Epson 
model MX80FT printer and the ne- 
cessary interconnecting cables. I 
gave my purchase order number 
and asked what the full price 
would be including c.o.d. charges. 

I decided I didn't want to pay 
the extra c.o.d. charges so I told 
the order taker that I would put a 
cashiers check in the mail tomor- 
row for the whole amount to 
avoid mailing charges. I mailed a 
cashiers check for the amount, 
air mail and started my wait for 
the printer. 

Toll Free Fever 

I felt so excited that I called 
another 800 number and, using 
the same method, placed an or- 
der for a Radio Shack expansion 
interface, 16K of memory in- 
stalled and an MPI disk drive 
complete with an Apparat 40 



track NEWDOS + . I also gave 
them a purchase order number 
and sent them a cashiers check 
via air mail to avoid the mailing 
charges. I started to wait. 

Pacing the Floor 

On the fourth day, every time 
the phone rang or I heard a car or 
truck nearby I became breathless 
with anticipation. The fifth day 
was Saturday and I didn't expect 
to hear anything until Monday. 
By Friday of the next week, 
frustration and anger forced me 
to the telephone again. 

Once again I dialed the toll free 
numbers. The nice people who 
were going to send my printer 
right out to me told me that for 
some unfathomable reason, their 
supplier was slow in filling their 
orders. Would I settle for a stan- 
dard Epson printer and a friction 
drive kit? "Yes, that would be OK, 
just get it here." They assured me 
that it would go right out and 
they would send me a refund of 
the extra money, about $25. 

Out of Stock 

The business that was sup- 
posed to be sending me an ex- 
pansion interface and a disk 
drive had suddenly run out of 



stock of these items. They did 
have a disk drive in stock, but the 
only expansion interface they 
had was one that one of their 
employees was using at home. 
Would I mind receiving that one? 
I assured them that I didn't mind 
a slightly used unit as long as it 
was in good working order. They 
would send it right to me. 

Next on my order list was a 
lowercase modification kit. By 
this time I was beginning to think 
that although sending money 
with an order was less expensive 
it was a little foolish. My friends 
chided me for this action when I 
told them about my trials. When I 
ordered a lowercase unit I gave 
my credit card number for billing. 
I was told that there would be a 
slight delay because of a delivery 
problem but that I could expect 
to receive the unit in about three 
weeks. By now I knew how to 
wait and I agreed. 

Three weeks had passed since 
my first phone call and I still 
hadn't received anything. The ex- 
pansion interface and disk drive 
arrived 24 days after date of 
order. Three more phone calls 
and 33 days after order date 
brought the printer. The friction 
drive kit was another three weeks 
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in coming. At the time of this 
writing, the refund check for the 
overpayment on the printer has 
not yet arrived. 

The equipment arrived in ex- 
cellent condition and went into 
immediate operation as soon as 
it was installed and is still oper- 
ating well without difficulty of 
any sort. 

After four weeks of waiting for 
the lowercase unit I called; I got 
an answering machine which 
asked me to leave my phone 
number. I did. I received no an- 
swer back. Several calls later a 
person answered the phone tell- 
ing me that delivery problems 
were causing delays but that the 
unit should be on its way by Fri- 
day. Monday; still no unit. An- 
other call on the phone con- 
nected me to the answering ma- 
chine again. Again, I left my num- 
ber and received no phone call. 

Two months and four days 
after date of order I received the 
lowercase modification kit. It did 
not work. I sent the unit back, re- 
quested a credit to my credit card 



which I still have not received. I 
have since had a Radio Shack 
lowercase modification installed 
which works magnificently. 

A friend who wants to increase 
his computing capabilities re- 
cently asked me what I thought 
about ordering from advertisers 
in magazines. I told him that he 
should order equipment sent 
c.o.d. with the stipulation that if it 
does not arrive within a reason- 
able period of time, 7 days for ex- 
ample, the order should be 
cancelled. 

My experience with this type of 
ordering indicates that suppliers 
need to police their activities 
much more closely. Promises of 
delivery should be kept if possible 
and immediate notice given if they 
cannot be met. There seems to be 
need for these suppliers to clean 
up their PR act, their sales 
policies, and their bookkeeping 
procedures. ■ 

Mr. Averill is a free lance 
writer with Educational, Sales 
and Employee Orientation films. 



PLUG INTO... 



ACCES 



The Journal of Microcomputer Applications 



Numerical analysis, statistics, simulation, information 
retrieval, engineering design, engineering economics, proj- 
ect planning & management, personal finance, scientific & 
engineering applications. Subscribe now $16 for 6 issues. 
Send check, money order or company purchase order to: 
ACCESS, P.O. Box 12847, Research Triangle Park, NC 27709 





To: ACCESS, P.O. Box 12847 

Research Triangle Park, NC 27709 
Here's my $16. Sign me up for 6 issues. 



Name 
Address 

City 

State _ 



Published by LEDS Publishing Inc. 



Zip_ 



Really, what can you do with a dual sided 
disk drive on a Model I? Nothing - without 
the Dual Sided Disk Kit. Using it you can 
put up to 3 of them on your system. You 
don't have 3 dual sided drives? Now you can 
add them - painlessly. This kit lets you mix 
dual and single head drives, in any 
combination. That's not all, 35-, 40-, 77-, 
and 80-track drives can be combined in any 
order. 

The good news gets better. The Dual Sided 
Disk Kit isn't a new operating system, it's a 
set of fully tested patches applied to 
TRSDOS 2.3 or NEWDOS 2.1, and a special 
3 drive disk cable. You can continue using 
your system exactly the way you always 
have. You'll have more disk storage 
potential (1228 thousand bytes instead of 
358 thousand), and incredible flexibility. 

The Dual Sided Disk Kit is 100 % 
compatible with your existing system, you 
can read your old diskettes and ones you 
create can be read on any other system. 
There are no new commands to learn. It: will 
automatically detect your drive 
configuration. FORMAT, COPY, 
BACKUP, and SUPERZAP have been 
modified to prompt you for the the drive 
characteristics. The kit is so smart that if 
you copy a big disk to a small one (say an 
80-track dual sided to a 35-track single 
sided), it lists any files that weren't fully 
copied. Also, dual sided drives are treated as 
single drives with twice as many tracks. Files 
can overflow from one side to the other and, 
naturally, there's only one directory per 
diskette. 



The only thing easier than using the Dual 
Sided Disk Kit is installing it. No tools are 
required. Just connect the new drive cable 
and press RESET - that's all. By the way, 
the same is true for any dual headed drives 
you add to your system - no drive 
modifications are needed - plug 'em in and 
go. 

But of course we've saved the best news for 
last. The price is just $79.95 (plus 82.50 
shipping, Ca. residents add Q% sales tax). 
Now, two heads really are better than one. 

• Mix and match single and double headed drives 

• Mix and match drive sizes (35 to 80 tracks per side) 

• 100% upward and downward compatability with 
diskettes created under TRSDOS 2.3 or NF.WDOS 2.1 

• Xo drive modifications needed to run dual sided drives 

• Xo computer modifications required 

• Uses a single directory per diskette (up to 320 
granules/diskette) 

• Supports up to 3 drives 

• COPY. BACKUP, and FORMAT prompt driven 

• Copies 80 track onto 35 track and lists excluded files 

• Dual headed drives treated as sin file drive! 

• Includes special 3 drive cable 

• Complete hardware and software documentation 

• Easy installation - cable change only (supplied) 

,-367 

'NAIL DOWN YOUR ORDLK TODAY! 

•V- >»-.___-.------- 

f^KName 

Address 

City State Zip 

System track size: D35 O40 D77 D80 
DOS : OTRSDOS 2.3 DNEWDOS 2.1 
Please charge my: MC □ Visa O 



Account number 

Expires I 

Signature 








Sank No 



ARE 



HEARS « 
BETTER 
THAN1? 



COMPUTER DESIGN LABS 

P.O. Box 219 

Garden Grove, CA. 92642-0219 

(714) 539-1211 



■See List oi Advertisers on page 402 
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Did you know? 

Federal Law States: 

No seller in any sales transaction 
may impose a surcharge on a credit 
card holder who elects to use a 
credit card in lieu of payment by 
cash, check, or similar means. 

Have you ever been charged 2 to 3% extra for using your credit card? 

If you are a victim - 

You have a legal right to recover 
the surcharge from the seller. 

We suggest you write: 

Federal Trade Commission 

Division of Credit Practices 

Washington, D.C. 20580 

J( message ^/tow you/t fiends at 

MICRO MANAGEMENT 
SYSTEMS, INC. 





CAIRO, GA. 31728 

^96 
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-BASIC & PASCAL! 





ANNOTATED BASIC — A NEW TECHNIQUE FOR NEO- 
PHYTES.— BASIC programming was supposed to be 
simple — a beginner's programming language which 
was so near lo English Ihal is could be easily 
understood. But, in recent years, BASIC has become 
much more powerful and therefore much more difficult 
to read and understand. BASIC simply isn't basic 
anymore 

Annotated BASIC explains the complexities of 
modern BASIC. It includes complete TRS-80" Level II 



BASIC programs that you can use. Each program is an- 
notated to explain in step-by-step fashion the workings 
of the program. Programs are flowcharted to assist 
you in following the operational sequence. And— each 
chapter includes a description of the new concepts 
which have been introduced. 

Annotated BASIC deals with the hows and whys of 
TRS-80 BASIC programming. How is a program put 
together? Why is it written that way? By observing the 
programs and following the annotation, you can devel- 
op new techniques to use in your own programs— or 
modify commercial programs for your specific use. 
Annotated BASIC Volume 1 BK7384 $10.95 
Annotated BASIC Volume 2 BK7385 $10.95 
Order Both Volumes and Save! BK738402 $18.95 



INTRODUCTION TO TRS-80 LEVEL II BASIC AND 
COMPUTER PROGRAMMING— by Michael P. Zabin- 
ski Written by an experienced educator, this is the 
book for those beginners who want to learn about com- 
puters without having to become an expert. It has prac- 
tical programs, useful line-by-line comments, excel- 
lent flowcharts accompanied by line numbers and over 
200 exercises which help the reader assess progress, 
reinforce comprehension, and provide valuable prac- 
tical experience. BK1219 $10.95." 

50 BASIC EXERCISES— by J. P. Lamoitier. This book is 
structured around the idea that the best way to learn a 
language is through actual practice. It contains 50 
completely explained exercises: statement and 
analysis of the problem, flowcharts, programs and ac- 
tual runs. Program subjects include mathematics, 
business, games, and operations research, and are 
presented in varying levels of difficulty. This format 
enables anyone to learn BASIC rapidly, checking their 
progress at each step BK1 192 $12.95*. 

THE BASIC HANDBOOK — SECOND EDITION — by 
David Lien. This book is unique. It is a virtual 
ENCYCLOPEDIA of BASIC. While not favoring one 
computer over another, it explains over 250 BASIC 
words, how to use them and alternate strategies. If a 
computer does not possess the capabilities of a need- 
ed or specified word, there are often ways to ac- 
complish the same function by using another word or 
combination of words. That's where the HANDBOOK 
comes in. It helps you get the most from your com- 
puter, be it a "bottom-of-the-line" micro or an oversized 
monster. BK1 174 $19.95.* 

LEARNING LEVEL II — by David Lien. Written especial- 
ly for the TRS-80, this book concentrates on Level II 
BASIC. It explores every important BASIC language 
capability. Updates are included for those who have 
studied the Level I User's Manual. Sections include: 
how to use the Editor, dual cassette operation, printers 
and peripheral devices, and the conversion of Level I 
programs to Level II. BK1 175 $15.95.* 

BASIC BASIC (2ND EDITION)— by James S. Coan. This 
is a textbook which incorporates the learning of com- 
puter programming using the BASIC language with the 
teaching of mathematics. Over 100 sample programs 
illustrate the techniques of the BASIC language and 
every section is followed by practical problems. This 
second edition covers character string handling and 
the use of data files. BK1026 $10.50.* 

ADVANCED BASIC— Applications including strings and 
files, coordinate geometry, area, sequences and series, 
simulation and graphing and games. BK100G $10.75.* 



INTRODUCTION TO PASCAL— by Rodnay Zaks. A 
step-by-step introduction for anyone wanting to learn 
the language quickly and completely. Each concept is 
explained simply and in a logical order. All features of 
the language are presented in a clear, easy-to- 
understand format with exercises to test the reader at 
the end of each chapter. It describes both standard 
PASCAL and UCSD PASCAL— the most widely used 
dialect for small computers. No computer or program- 
ming experience is necessary. BK1189 $14.95 

PROGRAMMING IN PASCAL— by Peter Grogono. The 
computer programming language PASCAL was the 
first language to embody in a coherent way the con- 
cepts of structured programming, which has been 
defined by Edsger Dijkstra and C.A.R. Hoare. As such, 
it is a landmark in the development of programming 
languages. PASCAL was developed by Niklaus Wirth 
in Zurich; it is derived from the language ALGOL 60 but 
is more powerful and easier to use. PASCAL is now 
widely accepted as a useful language that can be effi- 
ciently implemented, and as an excellent teaching 
tool. It does not assume knowledge of any other pro- 
gramming language and therefore suitable for an in- 
troductory course. BK1140 $12.95.* 

—GAMES— 

40 COMPUTER GAMES FROM KILOBAUD MICROCOM- 
PUTING— Forty games in all in nine different categories. 
Games for large and small systems, and even a section 
on calculator games. Many versions of BASIC used and 
a wide variety of systems represented. A must for the 
serious computer gamesman. BK7381 $7.95." 

BASIC COMPUTER GAMES— Okay, so once you get 
your computer and are running in BASIC, then what? 
Then you need some programs in BASIC, that's what. 
This book has 101 games for you from very simple to 
real buggers. You get the games, a description of the 
games, the listing to put in your computer and a sam- 
ple run to show you how they work. Fun. Any one game 
will be worth morethan thepriceof the book forthe fun 
you and your family will have with it. BK1074 $7.50." 

MORE BASIC COMPUTER GAMES— Edited by David 
H. Ahl. More fun in BASIC! 84 new games from the peo- 
ple who brought you BASIC Computer Games. In- 
cludes such favorites as Minotaur (battle the mythical 
beast) and Eliza (unload your troubles on the doctor at 
bargain rates). Complete with game description, list- 
ing and sample run. BK1182 $7.50.* 
WHAT TO DO AFTER YOU HIT RETURN — PCC's first 
book of computer games... 48 different computer 
games you can play in BASIC. . .programs, descrip- 
tions and many illustrations. Lunar Landing, Ham- 
murabi, King, Civel 2, Qubic 5, Taxman, Star Trek, 
Crash, Market, etc. BK1071 $16.50*. 



THEORY Z— How American Business Can Meet the 
Japanese Challenge— by William Ouchi. Why are the 
Japanese catching up and surpassing American in- 
dustrial productivity? What allows Japanese in- 
dustrialists to offer guaranteed lifetime employment 
to their workforce? This book will help you understand 
the Theory Z managerial philosophy and its implica- 
tions for the American corporate future. Examples are 
given of the American industrial giants already 
operating under Z-style management, and the impact 
of this style on the quality of their executives and 
workers is explored. A must for the alert businessman, 
large or small. BK1226 $12.95* 

SO YOU ARE THINKING ABOUT A SMALL BUSINESS 
COMPUTER— by Richard G. Canning and Nancy C. 
Leeper. For a well-organized manual on the process of 
selecting the right computer system for your small 
business, this text can't be excelled. Designed to in- 
troduce the novice in data and word processing to the 
real benefits of computerization, the book is filled with 
money- and time-saving tips, photos of equipment, 
lists of suppliers, prices, explanations of computer ter- 
minology, and helpful references to additional sources 
of information. Everyone contemplating a first com- 
puter installation should have this book. BK1222 
$14.00" 

PAYROLL WITH COST ACCOUNTING-IN BASIC- by 

L. Poole & M. Borchers, includes program listings with 
remarks, descriptions, discussions of the principle 
behind each program, file layouts, and a complete 
user's manual with step-by-step instructions, flow- 
charts, and simple reports and CRT displays. Payroll 
and cost accounting features include separate pay- 
rolls for up to 10 companies, time-tested interac- 
tive data entry, easy correction of data entry errors, 
job costing (labor of distribution), check printing 
with full deduction and pay detail, and 16 differ- 
ent printed reports, including W-2 and 941 (in CBASIC). 
BK1001 $20.00." 

SOME COMMON BASIC PROGRAMS— Published by 
Adam Osborne & Associates, Inc. Perfect for non- 
technical computerists requiring ready-to-use pro- 
grams. Business programs, plus miscellaneous pro- 
grams. Invaluable for the user who is not an experi- 
enced programmer. All will operate in the stand-alone 
mode. BK1053 $14.99 paperback. 

PIMS: PERSONAL INFORMATION MANAGEMENT 
SYSTEM— Learn how to unleash the power of a per- 
sonal computer for your own benefit in this ready-to- 
use data-base management program. BK1009 $11.95." 

— MONEYMAKING— 



HOW TO MAKE MONEY WITH COMPUTERS-ln 10 in 

formation-packed chapters, Jerry Felsen describes 
more than 30 computer-related, money-making, high 
profit, low capital investment opportunities. 
BK1003 $15.00.* 

HOW TO SELL ANYTHING TO ANYBODY— According 
to The Guinness Book of World Records, the author, 
Joe Girard, is "the world's greatest salesman." This 
book reveals how he made a fortune— and how you 
can, too. BK7306 $2.25." 

THE INCREDIBLE SECRET MONEY MACHINE-by 

Don Lancaster. A different kind of "cookbook" from 
Don Lancaster. Want to slash taxes? Get free vaca- 
tions? Win at investments? Make money from some- 
thing that you like to do? You'll find this book essential 
to give you the key insider details of what is really in- 
volved in starting up your own money machine. 
BK1 178 $7.95.* 



"No C.O.D. orders accepted. All orders add $1.50 for the first book, $1.00 each addi- 
tional book, $10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Ques- 
tions regarding your order? Please write to Customer Service at the following address. 



Use the order card in this magazine or itemize your order on a separate piece of paper 
and mail to 80 Microcomputing Book Department • Peterborough NH 03458. Be sure to 
include check or detailed credit card information. 



FOR TOLL FREE ORDERING CALL 1 -800-258-5473 
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MICROCOMPUTING CODING SHEETS Microcom- 
puting's dozen or so programmers wouldn't try to work 
without these handy scratch pads, which help prevent 
the little errors that can cost hours and hours of 
programming time. Available for programming is 
Assembly/Machine Language (PD1001), which has col- 
umns for address, instruction (3 bytes), source code 
(label, op code, operand) and comments; and for 
BASIC (PD1002) which is 72 columns wide. 50 sheets to 
a pad. $2.39.* 

PROGRAMMING 
— Z-80— 

TRS-80 ASSEMBLY LANGUAGE-by Hubert S. Howe 
Jr. This book incorporates into a single volume all the 
pertinent facts and information you need to know to 
program and enjoy the TRS-80. Included are clear 
presentations of all introductory concepts, completely 
tested practical programs and subroutines, details of 
ROM and RAM and disk operating systems, plus com- 
prehensive tables, charts and appendices. Suitable for 
the first time user or more experienced users. BK1217 
$9.95." 

PROGRAMMING THE Z-80— by Rodnay Zaks. Here is as- 
sembly language programming for the Z-80 presented as 
a progressive, step-by-step course. This book is both an 
educational text and a self-contained reference book, 
useful to both the beginning and the experienced pro- 
grammer who wish to learn about the Z-80. Exercises to 
test the reader are included. BK1122 $15.95.* 

INSIDE LEVEL II— For machine language program- 
mers. This is a comprehensive reference guide to the 
Level II ROMs, allowing easy utilization of the 
sophisticated routines they contain. It concisely ex- 
plains set-ups, calling sequences, variable passage 
and I/O routines. Part II presents an entirely new com- 
posite program structure which unloads under the 
SYSTEM command and executes in both BASIC and 
machine code with the speed and efficiency of a com- 
piler. Special consideration is given to disk systems. 
BK1 183 $15.95.* 



Z-80 SOFTWARE GOURMET GUIDE AND COOKBOOK 

— by Nat Wadsworth. Scelbi's newest cookbook! This 
book contains a complete description of the powerful 
Z-80 instruction set and a wide variety of programming 
information. Use the author's ingredients including 
routines, subroutines and short programs, choose a 
time-tested recipe and start cookingl BK1045 $16.99." 




• Z-80 ASSEMBLY LANGUAGE PROGRAMMING- 

BK1177— by Lance A. Leventhal. This book thoroughly 
covers the Z-80 instruction set, abounding in simple 
programming examples which illustrate software de- 
velopment concepts and actual assembly language 
usage. Features include Z-80 I/O devices and interfac- 
ing methods, assembler conventions, and compari- 
sons with 8080A/8085 instruction sets and interrupt 
structure. $16.99.* 



6809 



6809 MICROCOMPUTER PROGRAMMING AND 
INTERFACING— by Andrew C. Staugaard, Jr. Getting 
involved with Tandy's new Color Computer? If so, this 
new book from the Blacksburg Group will allow you to 
exploit the awesome power of the machine's 6809 
microprocessor. Detailed information on processor ar- 
chitecture, addressing modes, register operation, data 
movement, arithmetic logic operations, I/O and inter- 
facing is provided, as well as a review section at the 
end of each chapter. Four appendices are included 
covering the 6809 instruction set, specification sheets 
of the 6809 family of processors, other 6800 series 
equipment and the 6809/6821 Peripheral Interface 
Adapter. This book is a must for the serious Color Com- 
puter owner. BK1215 $13.95.* 



IANOS SYSTEM 
REFERENCE CARDS 

r for Model I and Model 

At last! No more flipping through the pages of the 
Basic manual! No more working through the maze of 
machine language instructions! These cards com- 
pletely summarize the Basic and Assembler manuals! 
FEATURES INCLUDE: 

memory map, eyeball graphics, math instructions, 
basic commands, store instructions, basic functions, 
load instructions, basic statements, move instruc- 
tions, special keys, exchange instructions, print using 
examples, shift instructions, basic special characters, 



compare instructions, basic and assembler messages 
and codes, branch instructions, basic facts, data 
alteration instructions, reserved words, I/O instruc- 
tions, ROM routines, complete character chart with 
graphics and space-compression codes, hex-dec 
chart, control code cross-reference, assembler in- 
structions commands and operators, screen line 
layout, editor commands & subcommands, condition 
code easy access . 

Plus — "magic graphics number— a mystery until you 
learn how to use it! 

Designed as a fold-up, accordion-style card, fits in your 
pocket. Panels organized for optimum speed for 
reference." 

Model I: Basic only FC1001 $2.95, Basic and Assembler 
FC1 002 $4.95 

Model III: Basic only FC1004 $3.95, Basic and 
Assembler FC1003 $5.95 



ALL NEW— FOR 80 OWNERS 

ENCYCLOPEDIA FOR THE TRS-80* 



ENCYCLOPEDIA FOR THE TRS-80** is 

the newest peripheral for your micro- 
computer. This ten-volume reference 
series contains programs and articles 
especially selected to extend the docu- 
mentation that comes with the TRS-80. 
Volumes of the Encyclopedia are being 
issued one-at-a-time, approximately six 
weeks apart. This means that each new 
volume will reflect the latest develop- 
ments in TRS-80 microcomputing. 
Encyclopedia for the TRS-80 is avail- 
able in two editions. The deluxe 
COLLECTOR'S EDITION has a hand- 
some green and black hard cover with a 
dust jacket. A soft cover edition is also 
available. 

To order single hard cover volumes of 
the Encyclopedia please specify: 
Volume 1 EN8101 $19.95* 

Volume 2 EN8102 

Volume 3 (avail. Nov.) EN8103 
Volume 4 (avail. Jan.) EN8104 
Volume 5 (avail. Feb.) EN8105 
To order single softcover volumes of the 
Encyclopedia please specify: 
Volume 1 EN8081 

Volume 2 EN8082 

Volume 3 (avail. Nov.) EN8083 
Volume4 (avail. Jan.) EN8084 
Volumes (avail. Feb.) EN8085 




ittcraopfwa 
for m mw 



$19.95* 
$19.95* 
$19.95* 
$19.95* 



$10.95* 
$10.95* 
$10.95* 
$10.95* 
$10.95* 



SPECIAL INTRODUCTORY OFFER 

Order the entire set (the first ten volumes) 
of the Encyclopedia for the TRS-80 and 
receive the tenth volume FREE! 

10 Volume deluxe hard cover 
COLLECTOR'S EDITION —a $199.50 
value. 

EN8100 $164.00 postpaid 

10 Volume soft cover edition, a $109.50 
value. 

EN8080 $83.00 postpaid 



ENCYCLOPEDIA LOADER is the 

software companion to the 
Encyclopedia for the TRS-80. This 
special series of cassettes will 
allow you to load selected pro- 
grams from the Encyclopedia in- 
stantly. Hours of keyboarding time 
and the aggravating search for 
typos is eliminated by using the 
Encyclopedia Loader. 

Encyclopedia Loader for Volume 1 
of the Encyclopedia of the TRS-80 
is available at a Special Introduc- 
tory Price of $12.95 (a $14.95 
value). To take advantage of this 
offer specify: 

EL800111 $12.95* 

Additional Encyclopedia Loaders 
will be available as each volume 
of the Encyclopedia for the TRS- 
80 is issued. To order specify 
Encyclopedia Loader: 

Volume 2 EN8002 $14.95* 

Volume 3 EN8003 $14.95* 

Volume 4 EN8004 $14.95* 

Volume 5 EN8005 $14.95* 



"No CO.D. orders accepted. All orders add $1.50 for the first book, $1.00 each addi- Use the order card in this magazine or itemize your order on a separate piece of paper 
tional book, $10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Ques- and mail to 80 Microcomputing Book Department • Peterborough NH 03458. Be sure to 
tions regarding your order? Please write to Customer Service at the following address, include check or detailed credit card information. 



FOR TOLL FREE ORDERING CALL 1 -800-258-5473 
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microcomputing bookshelf 



INTRODUCTORY— 




• UNDERSTANDING AND PROGRAMMING MICRO 
COMPUTERS— BK7382— A valuable addition to your 
computing library. This two-part text includes the best 
articles that have appeared in 73 and Kilobaud 
Microcomputing magazines on the hardware and soft- 
ware aspects of microcomputing. Well-known authors 
and well-structured text helps the reader get involved. 
$10.95* 



• SOME OF THE BEST FROM KILOBAUD MICROCOM 
PUTING— BK731 1 —A collection of the best articles that 
have appeared in Kilobaud MICROCOMPUTING. Includ- 
ed is material on the TRS-80 and PET systems, CP/M, the 
808078085/Z-80 chips, the ASR-33 terminal. Data base 
management, word processing, text editors and file 
structures are covered too. Programming techniques 
and hard-core hardware construction projects for 
modems, high speed cassette interfaces and TVTs are 
also included in this large format, 200 plus page edition. 
$10.95.- 



YOUR FIRST COMPUTER— by Rodnay Zaks. Whether 
you are using a computer, thinking about using one or 
considering purchasing one, this book is indispen- 
sable. It explains what a computer system is, what it 
can do, how it works and how to select various com- 
ponents and peripheral units. It is written in everyday 
language and contains invaluable information for the 
novice and the experienced programmer. (The first edi- 
tion of this book was published under the title "An In- 
troduction to Personal and Business Computing".) 
BK1191 $8.95* 

MICROPROCESSOR INTERFACING TECHNIQUES 

—by Austin Lesea & Rodnay Zaks— will teach you how 
to interconnect a complete system and interface it to 
all the usual peripherals. It covers hardware and soft- 
ware skills and techniques, including the use and de- 
sign of model buses such as the IEEE 488 or S-100 
BK1037 $17.95.' 




HOBBY COMPUTERS ARE HEREMf you want to come 
up to speed on. how computers work— hardware and 
software— this is an excellent book It starts with fun- 
damentals and explains the circuits and the basics of 
programming, along with a couple of TVT construction 
projects, ASCII, Baudot, etc. This book has the highest 
recommendations as a teaching aid. $4.95.' BK7322 

THE NEW HOBBY COMPUTERS— This book takes it 
from where Hobby Computers Are Here! leaves off, with 
chapters on Large-Scale Integration, how to choose a 
microprocessor chip, an introduction to programming, 
low-cost I/O for a computer, computer arithmetic, check- 
ing memory boards... and much, much more! Don't 
miss this tremendous value! Only $4.95.* BK7340 

AN INTRODUCTION TO MICROCOMPUTERS, VOL. 

—The Beginner's Book— Written for readers who know 
nothing about computers— for those who have an in- 
terest in how to use computers— and for everyone else 
who must live with computers and should know a little 
about them. The first in a series of 4 volumes, this book 
will explain how computers work and what they can do. 
Computers have become an integral part of life and 
society. During any given day you are affected by com- 
puters, so start learning more about them with Volume 
0. BK1 130 $7.95.* 

VOL. I— 2nd Edition completely revised. Dedicated to 
the basic concepts of microcomputers and hardware 
theory. The purpose of Volume I is to give you a 
thorough understanding of what microcomputers are. 
From basic concepts (which are covered in detail). 
Volume I builds the necessary components of a 
microcomputer system. This book highlights the dif- 
ference between minicomputers and microcomputers. 
BK1030$12.99> ' 



TRS-80 DISK AND OTHER MYSTERIES— by Harvard C. 
Pennington. This is the definitive work on the TRS-80 
disk system. It is full of detailed "How to use," infor- 
mation with examples, samples and in-depth explana- 
tions suitable for beginners and professionals alike. 
The recovery of one lost file is worth the price alone. 
BK1181 $22.50.- 

MICROSOFT BASIC DECODED AND OTHER MYS- 
TERIES— by James Farvour. From the company that 
brought you TRS-80 DISK AND OTHER MYSTERIES. 
Contains more than 6500 lines of comments for the dis- 
assembled Level II ROMs and six additional chapters 
describing every BASIC subroutine, with assembly 
language routines showing how to use them. Flow- 
charts for all major routines give the reader a real in- 
sight into how the interpreter works. BK1186 $29.50." 



SPECIAL INTERESTS 



MOD III ROM COMMENTED— Soft-Sector marketing, 
1981. This book is not an instruction course on 
machine language, but rather an information source 
that you can use time and time again for writing your 
own program or patching old Mod I machine language 
programs. It contains an explanation of ROMs in the 
latest machine from Tandy, with most every location of 
the 14K ROMs listed, with comments. BK1235 $22.50. 

THE CUSTOM TRS-80 AND OTHER MYSTERIES— by 

Dennis Kitsz. More than 300 pages of TRS-80 customiz- 
ing information. With this book you'll be able to ex- 
plore your computer like never before. Want to turn an 
8 track into a mass storage unit? Individual reverse 
characters? Replace the BASIC ROMs? Make Music? 
High speed, reverse video, Level I and Level II? Fix it if 
it breaks down? All this and much, much more. Even if 
you have never used a soldering iron or read a circuit 
diagram, this book will teach you how! This is the 
definitive guide to customizing your 80! BK1218 
$29.95." 

BASIC FASTER AND BETTER AND OTHER MYS- 
TERIES— by Lewis Rosenfelder. You don't have to 
learn assembly language to make your programs run 
fast. With the dozens of programming tricks and 
techniques in this book you can sort at high speed, 
swap screens in the twinkling of an eye, write INKEY 
routines that people think are in assembly language 
and add your own commands to BASIC. Find out how 
to write elegant code that makes your BASIC really 
hum, and explore the power of USR calls. BK1221 
$29.95." 

THE CP/M HANDBOOK (with MP/M)— by Rodnay Zaks. 
A complete guide and reference handbook for CP/M — 
the industry standard in operating systems. Step-by- 
step instruction for everything from turning on the 
system and inserting the diskette to correct user 
discipline and remedial action for problem situations. 
This also includes a complete discussion of all ver- 
sions of CP/M up to and including 2.2, MP/M and 
CDOS. BK1 187 $14.95." 

PRICES SUBJECT TO CHANGE WITHOUT NOTICE 




KILOBAUD KLASSROOM— by George Young and Peter 
Stark. Learning electronics theory without practice isn't 
easy. And it's no fun to build an electronics project that 
you can't use. Kilobaud Klassroom, the popular series 
first published in Kilobaud Microcomputing, combines 
theory with practice. This is a practical course in digital 
electronics. It starts out with very simple electronics 
projects, and by the end of the course you'll construct 
your own working microcomputer! 

Authors Young and Stark are experienced teachers, 
and their approach is simple and direct. Whether you're 
learning at home or in the classroom, this book provides 
you with a solid background in electronics— and you'll 
own a computer that you built yourself! BK7386 $14.95 

TOOLS & TECHNIQUES FOR ELECTRONICS— by A. A. 

Wicks is an easy-to-understand book written for the 
beginning kit-builder as well as the experienced hob- 
byist. It has numerous pictures and descriptions of the 
safe and correct ways to use basic and specialized tools 
for electronic projects, as well as specialized metal- 
working tools and the chemical aids which are used in 
repair shops. $4.95." BK7348 

HOW TO BUILD A MICROCOMPUTER— AND REALLY 
UNDERSTAND IT— by Sam Creason. The electronics 
hobbyist who wants to build his own microcomputer 
system now has a practical "How-To" guidebook. This 
book is a combination technical manual and program- 
ming guide that takes the hobbyist step-by-step through 
the design, construction, testing, and debugging of a 
complete microcomputer system. Must reading for 
anyone desiring a true understanding of small computer 
systems. $9.95.- BK7325 



"No C.O.D. orders accepted. All orders add $1.50 for the first book, $1.00 each addi- 
tional book, $10.00 per book foreign airmail. Please allow 4-6 weeks for delivery. Ques- 
tions regarding your order? Please write to Customer Service at the following address. 



Use the order card in this magazine or itemize your order on a separate piece of paper 
and mail to 80 Microcomputing Book Department • Peterborough NH 03458. Be sure to 
include check or detailed credit card information. 



FOR TOLL FREE ORDERING CALL 1 -800-258-5473 
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LOAD 80 



Set up your own CBBS. 



One-Drive Bulletin Board 



John Hodgson 
134 Littlefield Road 
Monterey, CA 93940 



It has been about a year since 
I bought my Telephone Inter- 
face II from Radio Shack. At the 
time I was not sure if I could jus- 
tify the investment, as there 
were no bulletin board systems 
within the range of a local phone 
call. CompuServe and The 
Source were too far away and 
expensive. Nonetheless, long- 
distance phone rates started to 
get the better of me and my 
monthly phone bill quadrupled. 
As I used the various comput- 
erized bulletin board services, I 
felt I had to get something simi- 
lar running on my system. Excel- 
lent community bulletin boards 
were running on TRS-80's with 



48K and two eight-inch drives. I 
figured it could be done on my 
system— with one 40-track V-80 
disk drive. 

Before I started, I had a prob- 
lem: How could I handle the 
basics of input/output through 
the modem? I thought about de- 
signing the whole thing in ma- 
chine code, but heaved a sigh of 
relief when I remembered the 
Host utility in Radio Shack's 
communications package. It al- 
lows a remote terminal to ac- 
cess the master TRS-80 and 
echoes keyboard input, so users 
can log-on in full-duplex mode. 

Host patches the video and 
keyboard drivers to call the pro- 
gram before printing. If an active 
modem is present, Host echoes 
the typed character over the 
RS-232 serial board and past the 
modem, while displaying it on 
the screen. When the keyboard 



is scanned, Host is called again 
to see if a byte has been input 
from the modem. If so, it jumps 
to the keyboard decoder in ROM 
where Basic handles the byte as 
if it were strobed from the 
keyboard. 

With the tough problem out of 
the way, I did a little surgery on 
Host to make it more efficient. 
(See Program Listing 1.) Instead 
of loading from DOS and execut- 
ing from Basic, I modified it so 
the routine loaded and set 
Basic's memory size pointer by 
itself. Eventually it returns to the 
calling program instead of jump- 
ing to Ready. 

Now I worked on the program 
itself. An early version used ran- 
dom file access for message 
handling, fast but cumbersome 
for long messages. Sequential 
techniques are excellent for the 
storage of messages, but slow 



Program Listing 1 

10 '*** TDSNET - REV. 2 . by John Hodgson *** 

20 CMD"R":POKE&H40Bl,254:POKE&H40B2,18 9:FORX=&HBE00TO&HBF0C:READ 

Y : POKEX, Y : NEXT : P0KE-1669 9 , : DEFUSR=&HBE00 : CLS : CLEAR6000 : DEFINTA- 

Z : DIMA? ( 500 ) ,C( 50 ) :OPEN"R" , 2 , "MSGFILE" : FIELD2 , 1ASSTS , 4ASMN$ , 4ASL 

N$ , 8ASDT$ , 10ASPW$ , 30ASFR$ , 30ASTN$ , 60ASSB$ : ONERRORGOTO670 

30 OPEN " I " , 1 , "BULLFILE" : GET# 2 , 1 : IFVAL ( MN$ ) =0THENA=1 : GOTO450 

40 INPUT"PLEASE ENTER DATE ( MM/DD/YY ) " ;D$ : CMD"DATE "+D$ : PRINT: IN 

PUT"SYSOP PRESS ENTER TO START" ; A$ : CMD" TIME "+" 00 : 00 : 00 " : CMD 

"CLOCK " : CLS : X=USR ( ) : Y$=INKEY$ 

50 PRINTSTRING$(5,13) "TDS MESSAGE SYSTEM - PRESS ENTER TO CONTIN 

UE" 

Program continues 



for individual access. I com- 
bined the best of both worlds. A 
random-access file contains all 
the data necessary for indexing 
into a sequential file holding the 
messages. One more small se- 
quential file is for bulletin 
messages. 

The bulletin file, Bullfile, is a 
simple sequential file read by 
the community bulletin board 
program and displayed at the 
beginning. The message file, 
Textfile, is another simple se- 
quential file; every message is 
delimited by a graphics block 
(CHR$(191)). A delimiter is not 
necessary, but it does make 
distinguishing messages easy 
with List in DOS. 

Random File Access 

The random-access file, 
MSGfile, contains all the impor- 
tant information pertaining to 
any given message set up by the 
Field statement in line 20: 

• ST$: This one-byte string 
represents the status of the 



The Key Box 

1 Disk Drive 
NEWDOS 2.1 or 
NEW DOS/80 
Telephone Interface 
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MARCH! 

SPECIALS ! 

WE CARRY THE COMPLETE LINE OF 
ATARI SOFTWARE, PERIPHERALS 
AND ACCESSORIES. 



OKIDATA MICROLINE 80 



ATARI 810 
DISK DRIVE 




PERSONAL COMPUTERS 



CBM 8032 Computer 1 149.00 

CBM 8050 Disk Drive 1349.00 

CBM 4032 Computer 1029.00 

CBM 4040 Disk Drive 1029.00 

CBM 4022 649.00 

CBMVIC-20 269.00 

Amdek 100G 159.00 

Amdek Color - 1 13" Color Monitor 329.00 

Microtek 16K Romboard for Atari 800 79.00 

Microtek 32K Ramboard for Atari 400 and 800 1 49.00 

Qume Sprint 9/45 (Full Panel) 2295.00 

Atari 400 16K 339.00 

Atari 410 Recorder 60.00 

Atari 825 Printer 599.00 

Atari 850 Interface 1 39.00 

Atari 810 Disk Drive 429.00 

Atari 800 16K 749.00 

Epson MX-70 349.00 

Epson MX-80 449.00 

Epson MX-80 FT 549.00 



Epson MX-100 FT 729.00 

NEC PC-8023 Printer 629.00 

NEC 7710 Spinwriter 2345.00 

NEC 7720 Spinwriter 2695.00 

NEC 7730 Spinwriter 2345.00 

NEC JC 1 201 M(A) — Color 1 2" Monitor . . . 359.00 

NEC 12" JB 1201M Monitor 159.00 

Okidata Microline-80 329.00 

Qkidata Microline-82A 499.00 

Okidata Microline-83A . 729.00 

Diablo 630 1995.00 



M & R Sup-R-Terminal 

Microsoft Soft Card (Z-80) . . 

Hazeltine 1420 

Northstar Horizon II 32K QD 

Anadex DP-9500/9501 

Televideo910 

Televideo912C 

Televideo 920C 

Televideo 950 



279.00 
279.00 
799.00 
2925.00 
1249.00 
559.00 
669.00 
689.00 
929.00 



CALL TOLL FREE! 

EAST COAST WEST COAST 

1 -800-556-7586 1 -800-235-358 1 

COMPUTER SHOPPING CENTER 

3533 Old ConejoRd. #102 
Newbury Park, CA 9 1 320 



COMPUTER SHOPPING CENTER 

12 Meeting Street 

Cumberland, Rl 02864 

1-401-722-1027 

TELEX 952106 



1-805-499-3678 

CA. TOLL FREE 1-800-322-1873 

TELEX 182889 



COMPUTER SHOPPING CENTER 

We Accept C.O.D.'s* Stock Shipments Same Day or Next • No Surcharge for Credit Cards 
• All Equipment Factory Fresh w/MFT Warranty • We Carry the Complete Line of Personal Software 
• Prices do not Reflect Shipping Charges 
Rhode Island and California Residents please add 6% Sales Tax ^52 




NEC GREEN 

12 MONITOR JB 1201M 

$159.00 




EPSON MX-80 

INTERFACE & CABLES IEEE S55. 
RS-23? S70. TRS-80 CABLE S35. 



$449.00 




AMDEK COLOR- 1 MONITOR 
$329.00 




EPSON MX-100 FT PRINTER 
$729.00 

PRICES ARE SUBJECT 

TO CHANGE 
WITHOUT NOTICE 



sSee List ol Advertisers on page 402 



message. An O means the file is 
accessible; a K means it has 
been killed. . 

• MN$: This four-byte string 
points to the number of the 
message. Any message up to 
9999 may be represented if you 
have enough disk space. 

• LN$: LN$ is the length of 
the message in lines. Useful dur- 
ing the Quick message retrieval 
(Q) option, it saves valuable 
phone time by telling the user 
which messages are long. It is 
also used to display or skip the 
correct lines of any message in 
Textfile. 

• DT$: This is the date that 
the message was written. 

• PW$: PW$ is a 10-byte 
string holding the password of a 
protected message. If the mes- 
sage is not protected, it is a 
string of 10 blanks. 

• FR$: This string contains 
the sender's name, up to 30 
bytes. 

• TN$: This string holds the 
receiver's name, up to 30 bytes. 

• SB$: The subject of the 
message is contained here. It 
can be up to 60 characters long. 
If the first three characters of 
the subject are (P) the message 
is password protected. 

Random file access allows 
fast retrieval of any message by 
any field, quickly and easily. It 
also means that at a minimum 
any given file will take up one 
sector plus one byte; one sector 
for message data in MSGfile, 
and one delimiter byte in Text- 
file. Since all DOS files need a 
minimum of one granule of disk 
space, and an average message 
(six lines) takes up three sec- 
tors, you can calculate the 
number of message files your 
disk can hold. 

Runs Under NEWDOS 

This modified version of Host 
runs under NEWDOS version 2.1 
or NEWDOS/80. NEWDOS/80 is 
nice for initialization because it 
does a Filespec command much 
faster than the original version 
of NEWDOS. 

Since I do not have an auto- 
answer modem I must put the 
handle into the cradle. However, 
it is possible to use INP to check 
various status bits on the 
RS-232 to detect if the user has 
hung up or logged on and react 
316 • 80 Microcomputing, March 1982 



Program continued 

60 IFINKEY$OCHR$(13)THEN60 

70 PRINTSTRING$(3,13)STRING$(63, "#") :PRINTTAB( 8 ) "WELCOME TO THE 

TOP DOG SOFTWARE MESSAGE SYSTEM" : PRINT: PRINTTAB( 9 ) "ESTABLISHED F 

OR THE EXCHANGE OF MESSAGES AND " : PRINTTAB ( 9 ) " IDEAS OF INTEREST T 

O THE MICROCOMPUTER USER . " : PRINTSTRING$ < 63 , "# " } 

80 NM$="":CT$="": PRINT: LINEINPUT"ENTER YOUR FULL NAME? ";NM$:LIN 

EINPUT"WHERE ARE YOU CALLING FROM? (CITY, STATE) " ;CT$ : PRINT: PRI 

NTNM$" FROM "CT$: PRINT 

90 A$="":LINEINPUT"IS THIS CORRECT? (Y/N) " ; A$ : A$=LEFT$ ( A$ , 1 ) : IF 

A$O"Y"ANDA$O"N"THEN90ELSEIFA$="N"THENG0T080 

100 NM$=LEFT$(NM$, 30 ) +STRING$ ( 30-LEN ( NM$ ) , " ") : PRINT: PRINT" ***** 

BULLETINS *****"'* LEFT-JUSTIFY NM$ * 
110 IFEOF(l)=0THENLINEINPUT#l,A$:PRINTA$:GOTO110ELSECLOSE#l:PRIN 
T 

120 X=LOF(2) :GET#2,1:A=VAL(MN$) :GET#2 ,X : B=VAL (MN$ ) : PRINT "MESSAGE 
S IN SYSTEM : "A"THROUGH"B: PRINT 

130 C=1:PRINT"CHECKING FOR MAIL. . . " ; : FORX=lTOLOF ( 2 ) : GET#2 ,X: IFTN 
S=NM$ANDST$="0"THENA(C)=X:C=C+1:NEXTELSENEXT 

140 C=C-1:IFOOTHENPRINT: IFC=1THENPRINT"BE SURE AND ANSWER MESSA 
GE #"A(C)ELSEPRINT"B£ SURE AND ANSWER THESE MESSAGES ...":PRINT: 
FORX=lTOC:PRINTA(X) , : NEXT: PRINTELSEPRINT" SORRY, NO MAIL TODAY." 
150 PRINT 

160 CM$="":B=LOF(2) :LINEINPUT"COMMAND? ( Q,H ,E,R,P ,K ,T, ? ) ";CM$:C 
M$=LEFT$ (CM$,1) : IFINSTR( "QHERPKT?" ,CM$ )=0ORCM$=" "THEN160 
170 IFCM$="Q"THEN210ELSEIFCM$="H"THEN390ELSEIFCM$="E"THEN450ELSE 
IFCM$="R"THEN250ELSEIFCM$="P" THEN 320ELSEIFCM$="K" THEN 410 ELSEIFCM 
$="?"THEN380 

180 IFLEN(NM$)=0THENNM$=" " 

190 PRINT: PRINT"THANKS FOR CALLING, "LEFT$ (NM$ , INSTR ( NM$ , " ")-l) 
".": PRINT: PRINT"TOTAL TIME ON SYSTEM : "RIGHTS (TIME$ , 8 ): CLOSE 
200 GOTO200 
210 PRINT:GOSUB570 
220 FORX=STTOEN:GET#2,X:IFST$="K"THEN240ELSEPRINT"MSG: "MN$,LN$" 

LINES" :PRINT"DATE : "DT$ : PRINT"FROM : "FR$ : PRINT"TO : "TN$:PRIN 
T"SUBJECT : "SB$ : Y$=INKEY$ 

230 IFY$="P"ANDINKEY$=""THEN230ELSEIFY$="S"THEN150 
240 Y$="":NEXT:GOTO160 

250 PRINT : OPEN " I " , 3 , "TEXTFILE " : GOSUB570 : FORX=lTOST 
260 INPUT#3,A$: IFA$=CHR$ ( 191 ) THENNEXTELSE260 

270 FORX=STTOEN:GET#2,X: IFST$="K"THENFORY=lTOVAL ( LN$ ) :INPUT#1,A$ 
:NEXT:GOTO300ELSEPRINT"MSG : "MN$,LN$" LINES" : PRINT"DATE : "DT$: 
PRINT"FROM : "FR$ : PRINT"TO : "TN$ : PRINT"SUBJECT : "SB$ : Y$=INKEY$ 
280 IFST$<>"K"ANDLEFT$(SB$,3)="(P)"THENPRINT"THIS MESSAGE IS PAS 
SWORD PROTECTED. ": PRINT: FOR Z=lTOVAL ( LN$ ) : INPUT#1 , A$ :NEXTELSEFORZ 
= 1T0VAL ( LN$ ) : LINEINPUT# 3 , A$ : PRINTA$ : NEXT: PRINT 
290 IFY$="P"ANDINKEY$=" n THEN290ELSEIFY$="S"GOTO150 
300 IFEOF(3)=0THENINPUT#3,A$:NEXT' * ELIMINATE CHR$(191) * 
310 CLOSE#3:GOTO160 

320 ST=0 : PRINT: INPUT"ENTER PROTECTED MSG # " ; ST: GET#2 ,ST: IFST$="K 
"THENPRINT"NO SUCH MESSAGE ON FILE . " :GOTO150ELSEIFPW$=STRING$ ( 10 
, " ")THENPRINT"MSG NUMBER"ST"IS NOT PASSWORD PROTECTED !" :GOTO150 

330 A$="":LINEINPUT"ENTER PASSWORD > " ; A$ : A$=LEFT$ ( A$ , 10 ) +STR 

ING$(10-LEN(A$) , " ") : IFA$OPW$THENPRINT: PRINT" ACCESS DENIED. ":GO 
TO150ELSEPRINT 1 * LEFT-JUSTIFY PW * 

3 40 OPEN " I " , 3 , "TEXTFILE " : FORX=lTOST 

350 INPUT#3 , A$ : IFA$=CHR$ ( 191 ) THENNEXTELSE350 

360 PRINT"MSG: "MN$,LN$" LINES ": PRINT"DATE : "DT$ : PRINT"FROM : " 

FR$:PRINT"TO : "TN$: PRINT"SUBJECT : "SB$ 

370 FORX=lTOVAL ( LN$ ) : LINEINPUT#3 , A$ : PRINTA$ : NEXT: CLOSE#3 : GOTO150 

380 PRINT :PRINT"TOTAL TIME ON SYSTEM : "RIGHT$ (TIME$ , 8 ) :GOTO150 

390 PRINT: PRINT"LIST OF COMMANDS :":PRINT 

400 PRINT"Q - QUICK SUMMARY OF MSGS IN SYSTEM" : PRINT"H - HELP : 

PRINTS THIS LIST":PRINT"E - ENTER MESSAGE" : PRINT"R - RETRIEVE ME 

SSAGE":PRINT"P - RETRIEVE PROTECTED MESSAGE" : PRINT"K - KILL MESS 

AGE":PRINT"T - LOG OFF" : PRINT"? - PRINT TOTAL TIME ON SYSTEM":G 

OTO150 

410 PRINT 

420 X=0: INPUT"INPUT NUMBER TO KILL" ; X: IFX=0THEN150ELSEIFX>BORX<A 

THEN420ELSEGET#2,X: IFST$="K"THEN420 

430 IFLEFT$(SB$,3)=" (P ) "THENA$=" ": LINEINPUT" ENTER PASSWORD? " ; A$ 

: A$=LEFT$ ( A$ , 10 ) +STRING$ ( 10-LEN ( A$ ) , " " ) : IFA$OPW$THENPRINT" ACCE 

SS DENIED. ":GOTO150 

440 A$="K":LSETST$=A$:PUT#2,X:GOTO150 

450 OPEN"E" ,3, "TEXTFILE" : B=B+1 : PRINT"THIS WILL BE MSG NUMBER"B 

460 PRINT : PRINT "REMEMBER TO USE "CHR$ ( 34 ) " (P ) "CHR$ ( 34 ) " AS FIRST 

THREE LETTERS" 
470 PRINT" IN SUBJECT TO PROTECT IT IF DESIRED" 

4 80 PRINT :A$="0":LSETST$=A$:A$="": LINEINPUT "FROM? " ; A$ : LSETFR$=A 
$ : A$=" " : LINEINPUT"TO? " ; A$ : LSETTN$=A$ : A$=" " : LINEINPUT"SUBJECT? " 
; A$ : LSETSB$=A$ : LSETMN$=STR$ ( B ) : LSETDT$=LEFT$ (TIME$ , 8 ) 

490 IFLEFT$(SB$,3)="(P)"THENA$="":LINEINPUT"PASSWORD? (10 CHARS 

MAX ) " ; A$ : LSETPW$=A$ELSEA$=" " : LSETPW$=A$ 

500 PRINT: PRINT"ENTER YOUR LINES, 1 AT A TIME - HIT CR WHEN DONE 

":PRINT:C=0 

510 C=C+1:A$(C)="":PRINT"#"C">"; : LINEINPUTA$ (C ) : IFA$ (C ) <> " "THEN5 

10ELSEPRINT:C=C-1 

520 A$="":LINEINPUT" (L)IST, (E)DIT, (S)AVE, (T)ERMINATE & SAVE O 

R (Q)UIT ?";A$:IFINSTR("LESTQ",A$)=0ORA$=""THEN520 

Program continues 



Program continued 

530 IFA$="E"THEN550ELSEIFA$="S"THEN560ELSEIFA$="T"THENP=l:GOTO56 

0ELSEIFA$="Q"THENB=B-l:CLOSE#3:GOTO150 

540 PRINT :F0RX=1T0C:PRINTX; AS (X) : NEXT: PRINT: GOTO 5 20 

550 X=0: PRINT: INPUT"WHICH LINE DO YOU WISH TO CHANGE" ; X: IFX<10RX 

>CTHENPRINT:GOTO520ELSEPRINT:PRINT"LINE #"X" : "A$(X) :PRINT:LINEI 

NPUT"ENTER NEW LINE — > "; A$ ( X ): PRINT: GOTO520 

560 LSETLN$=STR$(C) : PUT#2 , B : B=B+1 : PRINT# 3 ,CHR$ ( 191 ) : FORX=lTOC : PR 

INT#3,A$(X) :NEXT:CLOSE#3: IFP=1THEN180ELSE150 

570 ST=0: INPUT"ENTER STARTING NUMBER (BEGINNING IS DEFAULT )"; ST : 

IFST=0THENST=AELSEIFST<AORST>BTHEN570 

580 EN=0: INPUT" ENTER ENDING NUMBER (END IS DEFAULT )"; EN : IFEN=0TH 

ENEN=BELSEIFEN<AOREN<0OREN>BTHEN580 

590 Y$=INKEY$:PRINT"HIT P TO PAUSE, S TO STOP (CR TO CONTINUE) 

600 IFINKEY$OCHR$(13)THEN600ELSEPRINT:RETURN 

610 '* DATA FOR 32K HOST PROGRAM - CHECKSUM IS 35243 * 

6 20 DATA24 5, 58, 8, 191, 254, 1,40,52,197,229,62,1,50,8,191,33,0,190, 

3 4,30,64,3 3,164,190,34,22,64,211,232,219,233,230,24 8,246,4,50,7, 

191,211,234,219,233,230,7,33,25 5,190,6,0,79,9,126,211,233,225,19 

3,241,201,0,0,229,219,23 2,203,119,194,159,190 

6 30 DATA24, 21, 42, 32, 64, 58, 9, 191, 18 9, 194, 203, 190, 58, 10, 191, 188, 19 

4,20 3,190,35,34,9,191,219,234,20 3,119,40,250,121,211,235,254,13, 

20 2,148,190,225,241,195,88,4,42,42,42,32,67,7 9,80,89,82,73,71,72 

,84,32,49,57,55,57,32,66,89,32,84,65,78,68,89 

640 DATA32, 67, 79, 82, 80, 46, 32, 42, 4 2, 42, 32, 21 9, 234, 203, 11 9, 202, 14 8 

,190,62,10,211,23 5,225,241,195,88,4,24 5,219,2 3 2,20 3,119,19 4,199, 

190,219,23 4,20 3,127,202,199,190,241,219,235,230,127,254,17,40,58 

,254,5,250,196,190,254,27,192,62,1,201,241 

6 50 DATA195, 227, 3, 21 9, 2 3 4, 20 3, 11 9, 202, 20 3, 190, 62, 18, 21 1,2 3 5, 3 5, 3 

4,9,191,43,203,2 9,20 3,20,219,234,203,119,202,223,190,124,211,23 5 

,219,2 3 4,20 3,119,202,233,190,125,211,235,195,91,190,62,0,50,68,1 

90,50,69,190,201,34,68,85,102,119,170,20 4,23 8 

660 DATA0, 0,0, 0,0,0 

670 IFERRO106THEN0NERR0RG0T00 

680 C=1:CLS:PRINT"ENTER YOUR BULLETINS! (ENTER TO TERMINATE )": PR 

INTSTRING$(42,131) :PRINT 

690 A$(C)="":LINEINPUT" > ";A$(C) : IFA$ (C )= " "THEN700ELSEC=C+1 :G 

OTO690 

700 PRINT:C=C-l:OPEN"0", 3, "BULLFILE" : FORX=1TOC: PRINT* 3 , AS ( X) : NEX 

T:CLOSE#3:RESUME 



accordingly. 

The check-sum for the data is 
35243, and can be computed as 
follows: 



FORX = &HBE00TO&HBF0C:READY: 
Q = Q + Y:NEXT:?Q 



If Q is not 35243 go back and 
check your data. 

Forum-80 users will be famil- 
iar with the format of the pro- 
gram while executing; new 
users can type H for help. This 
program requires at least one 
message on the system, along 
with a bulletin message. If the 
program detects that these have 
not been written, it will ask you 
to enter the files. The Host rou- 
tine allows keyboard input from 
your terminal as well as the re- 
mote terminal. Files are killed 
only in that they are prevented 
from listing; they still take up 
disk space. 

I have set up the welcoming 
messages to represent my own 
cottage software business; 
change them to display what- 
ever you wish.B 



Brand New, Top Quality, Exact Replacement Ribbons & Cartridges. These Ribbons Produce 

Super Jet Black Impressions and Ultra Reliable Print Life. They Are Delivered to Your Door 

Promptly for Much Less Than Most Retail Stores 

•SPECIAL! BUY 10 and GET ONE FREE! 



OFF!! 
OR MORE ! 



YOUR PRINTER 


PACK SIZE 


RETAIL LIST" 


YOUR WHOLESALE PRICE 


SIZE 


COMMENTS 


CAT ORDER # 


ANA0EX 9000 Ssriss 


1 pk 


'4 00 ea 


14.00 


174.00 ea) 


500 


Nylon Jcl Blk 


C-777 


CENTRONICS 700-703.737.779 


3. pk 


18 95/3 pk 


11.95/3 pk 


(3. 98 ea) 




Nylon Jet Blk 


C-700 


CENTRONICS 100. 10IA. 102, 


3 pk 


26.33/3 pk 


17.55/3 pk 


15.85 ea) 




Nylon Jel Blk 


C-100 


103. 300. 301.306. 308. 330. 












5 mil High Speed 




358.398.500.501.503.508. 
















588. 620, 820 
















CENTRONICS 704-705 


1/pk 


16 95 ea 


13.95/Giant Cart 


(13.95 eat 


5 16'x210- 


Giant Cart 


C-7045 


DEC 72 x 40YD. 


3/pk 


17.77/3 pk 


12 95/3 pk 


(4.32 ea) 


1 2"« 120' 


Double Spools 


R-600 


DEC h x 60YD. 


3. pk 


20.12/3 pk 


14 25/3 pk 


14. 75 ea) 


1 2" x 180 


Double Spools 


R-644 


DIABLO HYTYPE II (M/S BLK) HI 


1/pk 


9.31 ea 


6.87 ea 


(6 87 ea) 


5 16'- » 


300.000 plus imp 


C-511 


YIELD FITS 70 PRINTERS 1 










High Yield 






EPSON MX70 80 


: pk 


1 6 00 ea 


1 6.00 ea 


(13 95 ea) 


.500 <60' 


Nylon Jel 8<k 


C-522 


IBM -SILVER DOLLAR Sys. 


5 pk 


5.80 ea 


14 90/5 pk 


(2.98 ea) 


9-16" » 30' 


Nylon Jet Blk 


R-300 


34, Sys 32 MDLA. Series 
















IMDL4974. 5256. 3287. 377U, 
















3771-3774.4974.5100,5103. 
















5110,5228 5256, 5320MOLA 
















IBM - HARMONICA Vi" SERIES 


3/pk 


9 42 ea 


20.85 3 pk 


(6.95 eai 


l 2" x 108' 


Nylon Jel 81k 


C-350 


1. MOO 4973/11. 3200. 3289. 
















MOD 2 
















NEC SPINWRIJER 


4/pk 


23.40/3 can 


23 60/4 pk rb ieload 


15. 90 eal 


1 2" x5! 


Nylon Ex Lng Lite 


R-400 


QUME (FITS 80 PRINTER M0DS| 


3pk 


18.00/3 pk 


13.96/3 pk 


14.65 ea) 


1 4" x3IO' 


Multislnke Film 


C-525 


RADIO SHACK DAISY WHEEL II 


1 pk 


24 95 3pk 


8.25 


(8 25 ea) 




Mylai Multislnke 


C-789 


RADIO SHACK LPIII LPV 


one, pk 


13 95/cart 


B 95/Reload rib. only 


(8.95 ea, 


500 "« 45' 


Nylon Incl Instr 


R-T3 


RADIO SHACK LPH. LPIV 


3/pk 


18.95/3 pk 


11.95/3 pk 


(3. 98 ea) 


563 " x45' 


Nylon Jet Blk 


C-700 


TELETYPE MOD 33, 28. 35, 37 

38. 88 
WANG M/S 5541 W. WC. 558!. 


10/pk 


2.40 ea 


13.90/10 pk 


(1.39 ea! 


T 2" « 36' 


Nylon Jet 81k 


R-450 


1/pk 


6 85 ea 


5 95 ea 


(5. 95 ea) 


5 16"x393' 


Multislnke Film 


C-550 


WD, 6581W. 2281W 


















TERMS: 

MINIMUM PURCHASE - $20 
PAYMENT BY: C.O.D.(UPS),CHECK, 

MASTER CARD, OR VISA CHARGE 

CARD. 
VOLUME DISCOUNTS: 

20 -50 PACKS 10% 

51-100 PACKS 15% 

•UNDER $20, ADD $5 HANDLING. 
"APPROX. RETAIL. PRICE VARIES. 

ANCIE LABORATORIES 

5200-J Philadelphia Way 3O1-345-60OO (Wash DC Local 

Lanham. Maryland 20706 301-792-2060 (Balto MD Local 

800-638-0987 (National) 



ADDRESS. 
CITY 



ANCIE Laboratories 
5200-J Philadelphia Way 
Lanham, Maryland 20706 



,^284 



301-345-6000 (Wash. DC. Local] 
301-792-2060 {Ballo. MD Local) 
800-638-0987 (National) 



□ Check Enclosed 

□ C.O.D. 
G VISA 

□ MASTER CHARGE 

ACCT. # 

EXP. DATE : 

MIN. ORDER $20 

PRICES SUBJECT TO CHANGE 



■See Lisl of Advertisers on page 402 
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UTILITY 



Learn the routines for disk I/O. 



Reading, Writing and Assembly 
Language 



Patrick Morgan 
12919 Warren Avenue 
Los Angeles, CA 90066 



The following program is the 
result of my learning to pro- 
gram disk read and write rou- 
tines in Assembly. 

I wanted to add disk routines 
to a communications program 
that I wrote, so I could send and 
receive files. I couldn't find any 
Assembly programming infor- 
mation that might help me, so 
what follows is a simple pro- 
gram, modified and re-modified 
by trial and error. 

Once you understand my me- 
thods, I'm sure you'll be able to 
add sections of this program to 
creations of your own. 

I wanted to write a clear, easi- 
ly understood program, so eco- 
nomical memory usage was sec- 
ondary. You can make several 
improvements. I used only three 
ROM routines, the keyboard 
scan (0049H), the buffer load 
(05D9H) and the video display 
(0033H), and they are document- 
ed them for both Model I and 
Model III. 

To follow the program explan- 
ation you will have to enter the 
source code and you will need a 
monitor with break points such 
as Debug or RSM, a disk monitor 
such as Apparat's Superzap and 
a file to work with. A Basic pro- 
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gram saved in ASCII format will 
be fine. 

Program Explanation 

Load Program Listing 1 and 
enter Debug. Single-step 
through the first section, until 
you enter the filespec. Line 700 
loads the filespec into the FOB 
(file control block). 

Look at the FOB (7004H) and 
you will see the filespec as en- 
tered. Step through the Open 
command (call 4424H) and look 
at the FOB again. Assuming you 
have no errors, your filespec is 
now replaced by 32 bytes that 
look something like Fig. 1. 

The FOB is set up as follows: 
The first three bytes are used as 
flags to show the status of the 
directory. I really don't know 
what format is used. Bytes four 
and five are the DOSBUF ad- 
dress that you entered in HL 
before Open. (All addresses and 
two byte numbers are in the 
least significant-most signifi- 
cant format.) 

Byte six is an offset used for 
logical records (not used here). 
Byte seven is the drive that con- 
tains the open file. It is set, even 
if you didn't specify a drive num- 
ber. Byte eight is unknown. Byte 



nine is the location of the last 
byte of the disk file in the last 
sector. The disk file itself con- 
tains no end marker, only the di- 
rectory knows where the end is. 

Byte 10 is the logical record 
length. This should be 00. It is 
the value of register B at Open. 
Later we will see what happens 
when B is not 00. 

Bytes 11 and 12 are the next 
record (sector) number and 
should be 0000, since you 
haven't read any sectors yet. 
Bytes 13 and 14 are the last 
record number and tell you how 
many sectors are in the file. 

I use terms record and sector 
interchangeably in this program 
because we set the record length 
to 256 bytes, which is one sector. 

Bytes 15 through 32 tell where 
to find the file on the disk. Byte 
15 is the file's beginning track 
number. If byte 16 is 1 FH or less, 
then the file starts on sector 0, 
otherwise it starts on sector 5 of 
that track. 

Now that you have success- 
fully opened the file, read in a 
sector. Line 340 loads DE with 
the FOB location. Next, line 350 
calls 4436H, which reads a sec- 
tor (256 bytes) from disk to the 
DOSBUF (7025H-7124H). 



80 20 00 25 70 00 01 26 56 00 00 00 0D 00 02 02 
03 00 FF FF 23 00 FF FF 43 00 FF FF 63 00 FF FF 



Fig. 1. 



Use Debug and you will see it 
there. Also look at the AF regis- 
ters. If you have any read errors, 
A register will contain the error 
code and the zero flag will not be 
set. Remember, an "end of file" 
is considered an error. 

Next, you must move the data 
from the buffer to main memory. 
I tried changing the FOB buffer 
pointer as each sector was read, 
but that didn't work. Therefore, 
I called the Move subroutine 
that uses the powerful LDIR 
instruction. 

Register DE' is the move-to lo- 
cation in RAM. HL' is the move- 
from location, which is DOS- 
BUF, and BC is the number of 
bytes to move (0100 hex or 256 
decimal). Both DE' and HL' in- 
crement themselves as each 
byte is moved. I use the alter- 
nate (prime) registers for this 
routine so that you can maintain 
pointers without a lot of Push 
and Pops. 

The program is in a read-move 
loop until it reaches the "end of 
file." After each call to 4436H 
(read sector) there is a JR 
NZ.ERRCK instruction. If there 
are any disk errors, the zero flag 
will be set, and the program will 



The Key Box 

Model I or III 

TRSDOS 

machine language monitor 

disk monitor 



Give Your TRS-80* 

a Tremendous Boost with 

RACET computes Software 

RACET computes Utility Software makes the TRS faster, more efficient, 

and easier to use. Our programming aids improve your productivity. 

Our reputation is for products that are professional in design 

and work as advertised!!! 



FIELD PROVEN 
V/z to 30 MEGABYTES On Line for the TRS-80* Model II 

Now you can use RACET's HSDS with the ARM Winchester Disk Drive on the Model II. This cost effective combination provides 15 Megabytes per drive including 

ECC Error Correction Code and an advanced sequencer to further ensure data integrity. An incremental backup to floppy is provided so that only those sectors that 

were changed from the last backup are saved. A full monthly service contract is available at $30 per month per drive. 

The Hard/Soft Disk System (HSDS) Software has more than One Year's FIELD Experience. The latest HSDS version adds several enhancements including 

maintenance of system files on the hard drive, files as large as the disk, the ability to segment the disk as logical drives, definable directory size, and many utilities 

including bulk copies between floppy and hard drives, multiple purge, Superzap, and Directory Catalog System. Full program compatibility with TRSDOS 2.0a is 

maintained. Mixed floppy and hard drive operation is supported. 

HSDS is available for the Cameo, Cynthia Bull, Corvus, Data Peripherals, and Santa Clara Systems hard disk systems as well as the ARM Winchester Drive. 

ARM 15 Megabyte Drive Subsystem $3895 • HSDS Software $400 • Cameo 5/5 Cartridge Drive Subsystem $5995 • Cynthia Bull 10/10 Drive Subsystem $7995 

NEW PRODUCT • MODEL II FAST BACKUP UTILITY • $75 

5 to 10 times faster backups!!! Full disk backup (including verify) 55 seconds!!! on two drive system — 2:15 on single drive system. In business, time is money, 
and one BACKUP is worth 1000 tears! ! 

NEW PRODUCT * INTEGRATED BUSINESS SYSTEM • 

ISAM File Structure — Multi-Company Capability. Modular structure. Each module includes complete user documentation which guides the user through 
installation and allows "practice" using a sample data base. When ready, the user simply names his data base and begins. 

The Integrated Business System program set includes General Ledger, Accounts Receivable, Accounts Payable, Payroll, Inventory, General Journal, Asset 
Management and more. 

Features include: 



• Multiple data base capability 

• ISAM file structure 

• 500 multi-purpose forms with order 

• Menu driven 

• Complete end-of-period processing 

• Easy to follow installation procedures 

Business Programs $250/module Mod III, $300/module Mod II, $795 for all 
available now. Accounts Payable and Payroll 1st Quarter 1982. 



• Multi-company 

• Rapid response and fast operation 

• No need to have preprinted forms 

• User friendly data entry screens 

• 80- and 132-column printers 

• Automated clerical error detection 

four Mod III, $995 for all four Mod II. General Ledger and Accounts Receivable 



RACET computes UTILITIES and PROGRAMMER AIDS 

Remodel + Proload for Mod I and III $35 Renumber utility with partial renumbers, text moves plus tape merge. A must for tape based systems. Generalized 
Subroutine Facilities (GSF) Mod I $25, Mod III $30, Mod II $50 The STANDARD against which all other sorts are compared! And then compare price!!! Multi-key 
multi-variable and multi-key character string sorts. Includes zero and move arrays and sample programs. DISCAT Diskette Cataloging System Mod I and Mod III 
$50 This comprehensive Diskette Cataloguing/Indexing utility allows the user to keep track of thousands of programs in a categorized library. Machine language 
program works with TRSDOS and NEWDOS versions (please specify). Files include program names and extensions, program length, diskette 
numbers. COMPROC Command Processor Mod I and Mod III $30 Auto your disk to perform any sequence of instructions that you can give from the keyboard! ! 
Ideal for setting up dedicated applications. Infinite BASIC Mod I $50, Mod III $60 Extends Level II BASIC with complete Matrix Functions and 50 more string 
functions. Includes RACET in-memory sorts!! Select only those functions you want to optimize memory. Infinite BUSINESS (Requires Infinite BASIC) Mod I and 
III $30 Complete printer pagination controls, hash codes, binary array search, and packed decimal arithmetic (127-digit accuracy). Disk Sort/Merge (DSM) 
Mod I $75, Mod III $90, Mod II $150 All machine language stand-alone Random file sort package. Establish sort specification in a simple BASIC command file. 
Sorts multiple-diskette files. Only operator action is to switch diskettes when instructed. Super fast sort times — improved disk I/O makes this the fastest Disk 
Sort/ Merge available. KFS-80 Keyed File System Mod I and HI $100, Mod II $175 Machine language BASIC ISAM utility provides keyed and sequential access 
to multiple files. Simple interface to BASIC. Binary tree index system provides rapid access to records. Utility Package Mod ll $150 Recover blown diskettes. 
Includes Superzap, bulk copies, and other utilities for repair of blown diskettes. Complete documentation on diskette structure and guidance for repair. Other 
utilities include Dynamic DEBUG (with single-step, trace, subroutine calling, program looping and more), XCR, DISKID, Directory Catalog System. XPURGE. 
Development Package Mod II $125 Includes RACET Superzap, Apparat Disassembler and Model II interface to Microsoft's Editor Assembler Plus'. Purchase 
price includes complete copy of Editor Assembler + documentation for Mod I and uploading service. Assemble directly into memory, MACRO facility, save all or 
portions of source to disk, extended editor commands. Basic Cross Reference Utility Mod II $50 SEEK and FIND functions for variable, line numbers, strings, 
keywords. 'AH' options available for line number and variables. Load from BASIC — call with control 'R'. Output to screen or printer. Maillist Mod I and III $75, 
Mod II $150 ISAM-based maillist. Four keys — no separate sorting. Supports 9-digit ZIP code and up to 30 attributes. 



CHECK, VISA, M/CC.O.D.. PURCHASE ORDER 
TELEPHONE ORDERS ACCEPTED (714) 997-4950 

CIRCLE READER REOUEST FOR EREE CATALOG 
• IRS 80 IS A TRADEMARK OF TANDY CORPORATION 



|- RACET 



COMPUTES l 



1330 N. GLASSELL, SUITE M, ORANGE, CA 92667 



•See List ol Advertisers on page 402 
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jump to ERRCK. 

The A register contains the er- 
ror code. The OR 80 sets bit 
seven of A. Thereafter, a call to 
4409H displays an error 
message. If bit seven is not set, 
the program displays the error 
message and jumps to DOS 
READY. 

If you stop the program dur- 
ing this loop and look at the 
FOB, you will see the next rec- 
ord number, bytes 11 and 12, in- 
cremented as each sector is 
read. When the next record and 
the last record are equal, the 
program ends. It generates an 
error code 1D (end of file) and 
the program jumps to LAST to 
close the file. 

If you have partially loaded a 
file and wish to stop, be sure to 
issue a CLOSE command or 
you'll mess up your directory. 
Use Debug command G 4428. 

Assuming you have trans- 
ferred all the data from disk to 
RAM, you must close the file. 
Line 560 calls 4428H which ad- 
justs the disk directory and re- 
places your filespec in the FOB. 

The final step in my routine 
marks the "end of file" in RAM. 
Byte nine of the FCB, loaded in- 
to a "end of file" flag earlier, is 
the byte number of the file end in 
the last 256 bytes moved. Mark 
this point with a 00 or 03. 

Writing Files to Disk 

Since writing a file from RAM 
to disk is similar to reading one, 
I'll cover only the differences. 
Load the filespec into FCB as 
before; however, this time call 
4420H instead of 4424H. 

Call 4420H opens either a new 
or existing file, whereas 4424H 
causes an error if the file 
doesn't exist. 

Yes, you can add a simple rou- 
tine here to see if a file exists be- 
fore writing over it. Your external 
software will provide the start- 
ing and ending addresses and 
load them into STRAD and EN- 
DAD. Line 880 subtracts the two 
addresses and puts the dif- 
ference in HL. This is the 
number of bytes to write. 

Before each write loop the 
program decrements the H reg- 
ister. If it is less than zero, then 
there is less than a full sector to 
write, and the program jumps to 
its closing housekeeping (LSEC). 
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Program 


Listing 1. 






00010 


; DISK I/O ROUTINES 






00020 


• 








7000 


00030 




ORG 


7000H 




0002 


00040 


STRAD 


DEFS 


2 f 


LOAD FILE 


HERE 












0002 


00050 


ENDAD 


DEFS 


2 ; 


LOAD END A 


DDR HERE 












0020 


00060 


FCB 


DEFS 


32 ; 


FILE CONTR 


OL BLOCK 












0001 


00070 


EOF 


DEFS 


1 j 


END OF FIL 


E MARKER 












0100 


00080 


DOSBUF 


DEFS 


256 ; 


256 BYTE B 


UFFER 


00090 


. 








7125 


00100 


START 


EQU 


$ 




7125 210080 


00110 




LD 


HL,8000H 




7128 220070 


00120 




LD 


(STRAD) ,HL ; 


SET FILE L 


OAD ADDR 












712B 24 


00130 




INC 


H j 


AND END 


ADDR 












712C 220270 


00140 




LD 


(ENDAD) ,HL } 


IN RAM 




00150 


; CORRECT VALUES SHOULD BE ENTERED FOR YOUR 


FILE 


00160 










712F 21FE71 


00170 




LD 


HL,MSG1 , 


READ OR WR 


ITE MESSAGE 












7132 CDA471 


00180 




CALL 


TEXT 




7135 CD4900 


00190 




CALL 


0049H 


KEYBOARD S 


CAN 












7138 FE57 


00200 




CP 


i w i 




713A 2872 


00210 




JR 


Z, WRITE , 


ANYTHING E 


LSE IS READ 












713C CD9571 


00220 


READ 


CALL 


FSP , 


GET FILESP 


EC 












713F 212570 


00230 




LD 


HL, DOSBUF 




7142 110470 


00240 




LD 


DE,FCB 




7145 0600 


00250 




LD 


B,00 




7147 CD2444 


00260 




CALL 


4424H 


OPEN FILE 


714A 2024 


00270 




JR 


NZ, ERRCK 


ERRORS 


714C D9 


00280 




EXX 




LOAD DE' W 


ITH 












714D ED5B0070 


00290 




LD 


DE, (STRAD) 


MEMORY AD 


DR. 












7151 D9 


00300 




EXX 






7152 3A0C70 


00310 




LD 


A, (FCB+8) 


END OF FIL 


E LOC 












7155 322470 


00320 




LD 


(EOF) ,A 


ON LAST 


SECTOR 


00330 


. 








7158 110470 


00340 


RD1 


LD 


DE,FCB 




715B CD3644 

R 

715E 2010 


00350 




CALL 


4436H 


READ SECTO 


00360 




JR 


NZ, ERRCK 


ERRORS 


7160 CD6571 


00370 




CALL 


MOVE 




7163 18F3 


00380 




JR 


RD1 


GET ANOTHE 


R SECTOR 












7165 D9 


00390 


MOVE 


EXX 




• USE PRIME 


REG.S 












7166 212570 


00400 




LD 


HL, DOSBUF 


• MOVE FROM 


BUFFER 












7169 010001 

Y 

716C EDB0 


00410 




LD 


BC,0100H j 


TO MEMOR 


00420 




LDIR 




DE' WAS SE 


T EARLIER 












716E D9 


00430 




EXX 






716F C9 


00440 
00450 




RET 






7170 FE1C 

E 

7172 280E 


00460 


ERRCK 


CP 


1CH 


END OF FIL 


00470 




JR 


Z,LAST 




7174 FE1D 


00480 




CP 


1DH 


RECORD OUT 


OF RANGE 












7176 280A 


00490 




JR 


Z,LAST 




7178 F680 


00500 




OR 


80H 


SET BIT 7 


717A CD0944 


00510 




CALL 


4409H 


SHOW ERROR 


717D CD2844 


00520 




CALL 


4428H 


CLOSE FILE 


7180 18A3 


00530 




JR 


START 




7182 


00540 


LAST 


EQU 


$ 




7182 110470 


00550 




LD 


DE,FCB 




7185 CD2844 


00560 




CALL 


4428H 


; CLOSE 


7188 D9 


00570 




EXX 




; BACK TO PR 


IME REGS 










Program continues 



1982 



Get a Letter Quality Printer 

and a Typewriter, 

At the Price of a Typewriter. 



-• 




^^^^^^^iH 



mm- 



j* 
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$ 1,599. 



MTI DOES IT AGAIN. Who but MTI can offer 
a letter quality printerand an Olivetti electronic 
typewriter in one unit, at one low price? It's 
hard to believe. 

ITS A LETTER QUALITY PRINTER. At MTI, a 

low price is not enough unless we can also 
deliver a superior printing quality. From this 
interchangeable Daisy Wheel printer. You get 
clear and crisp print characters and the out- 
standing features you need. Like: 

"Speed .17 c.p.s. 

"Print capability in 10 pitch pica. 

12 pitch elite, and 15 pitch mikron. 
"100 character set with upper, lower case 

and underlining. 
"33 different typestyles. 



This printer/typewriter has a printing line 
length of 13.2" and will take paper up to 17" 
wide. Perfect for business quality reports and 
documents. 

ITS AN ELECTRONIC TYPEWRITER. This 
Olivetti typewriter makes correspondence and 
other work simplified. By means of it's logic, it 
automates those functions that were tradition- 
ally done manually by a secretary. Margin 
Setting, numerical alignment, tableformatting 
and other functions are done rapid and simple 
operations. 

EASY CORRECTION. One-line memory en- 
ables words or sentences on the line in 
process to be automatically cancelled, by the 
touch of a key. 



READY TO GO. You can put this unit to work 
the minute it's delivered. Everything you need 
for both functions is included. The unit is 
complete with paralell interface. It's compat- 
ible with TRS-80, Apple, our M.T.I. MOD III 
computers and nearly all others made. All 
units are backed by the M.T.I, waranty. The 
result is outstanding performance, great re- 
liability, and a price you can afford. 

OPTIONS. You can add on a RS-232 Serial 
Interface. Tractorfeed isalsoavailable. Note: 
Cable extra. 

WANT MORE? For more information, 
call any of our authorized sales and 
service centers listed below. If you prefer, 
you can call or write us and we'll send 
you the information and a free catalog. 



MTI AUTHORIZED SALES AND SERVICE CENTERS 



Anchorage, AK (907) 333- 

Rodgers, AR (501) 636- 

Mesa, AZ (602) 833- 

Phoenix, AZ (602) 244- 

Sierra Vista, AZ (602) 458- 

Tucson, AZ (602) 323 

Anaheim, CA (714) 773- 

Covina, CA (213) 332 

Goleta, CA (805) 967 

Huntington Beach. CA (714) 842 

Inglewood, CA (213) 673 

Lancaster, CA (805) 942 



Montclair, CA 

Northridge, CA 

Orange. CA 

Pacheco, CA 

Placerville, CA 

Port Huememe, CA 



(714) 626 
(213) 886 
(714) 771 
(415) 689 
(916) 622 
(805) 985 



8322 
9168 
8949 
9739 
2479 
9391 
0240 
4088 
7628 
1348 
3295 
5747 
4813 
9200 
0880 
2260 
4640 
2329 



Redondo Beach. CA . 

Riverside, CA 

San Diego, CA 

San Jose, CA 

Santa Ana. CA 

Santa Monica, CA . . 

Vallejo, CA 

Walnut, CA 

Westlake Village, CA . 
Colorado Spring. CO 
Grand Junction, CO 

Groton, CT 

Wilmington, DE 

Hollywood, FL 

Lynn Haven. FL 

Mary Esther, FL 

Tampa, FL 

Norcross, GA 



(213) 370-5556 
(714) 781-6361 
(714) 275-4243 
(408) 946-1265 
(714) 850-1228 
(213) 393-5785 
(707) 554-4933 
(714) 594-9760 
(213) 706-0333 
(303) 630-3334 
(303) 434-3616 
(203) 445-5166 
(302) 762-0227 
(305) 981-1011 
(904) 265-6452 
(904) 243-5793 
(813) 247-6023 
. (404) 449-8982 



Buckingham. IA . 

Belleville, IL 

Collinsville, IL . . . 

Oak Park, IL 

Shawnee, KS . . . . 

Ashland, KY 

Shreveport, LA . . 

Anoka, MN 

Cameron, MO . . . 
Great Falls. MT . . 
Missoula, MT .... 

Raleigh, NC 

Grand Forks, ND 
West Milford, NJ . 
Las Vegas, NV . . . 

Jericho, NY 

New Rochelle. NY 
Syracuse, NY ... 



(319) 

(618) 

(618) 

(312) 

(913) 

. . (606) 

(318) 

(612) 

(816) 

(406) 

..(406) 

..(919) 

..(701) 

(201) 

■ (702) 

(516) 

..(914) 

(315) 



478-2826 
277-2354 
345-5068 
386-3323 
631-2029 
325-2210 
865-7189 
427-5783 
632-6528 
737-0901 
549-9715 
755-1175 
772-7848 
728-8080 
870-4138 
333-2266 
235-4444 
487-5000 



Troy, NY (518) 273-8411 

White Plains, NY (914) 761-9283 

Tonkawa, OK (405) 628-2693 

Tulsa, OK (918) 836-9503 

Portland, OR (503) 281-7640 

Dallas, TX (214) 247-6679 

Missour City, TX (713) 499-5241 

San Angelo, TX (915) 658-3781 

Cheyenne, WY (307) 632-91 32 

Buenos Aires, ARG 32-1858 

Paris, FRANCE 306-4606 

Holm, GERMANY 4103-4315 

Florence, ITALY 55-45-4319 

Singapore, JAPAN 220-7182 

Cape Town, S.AFRICA 2145-1047 

Tahiti, F.P 2-54-47 

Taichung, TAIWAN 4228-5523 

Bang Kok, THAILAND 314-1161 



fia 



MICROCOMPUTER TECHNOLOGY INC. 

3304 W. MACARTHUR, SANTA ANA, CA 92704 
(714) 979-9923 • TWX 910-595-1902 MTISNA 



Call or write for free brochure: 
U.S. PRICES, F.O.B. SANTA ANA 
CALIFORNIA AND MAY VARY BY AREA. 



■See List of Advertisers on page 402 
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Program continued 



7189 15 


00580 


DEC 


D 


T SECTOR 








718A 3A2470 


00590 


LD 


A, (EOF) 


718D 5F 


00600 


LD 


E,A 


718E 3E03 


00610 


LD 


A, 03 


E MARKER 








7190 12 


00620 


LD 


(DE) ,A 


ORY 








7191 D9 


00630 


EXX 




RMAL 








7192 C32D40 


00640 
00650 ; 


JP 


402DH 


7195 211772 


00660 FSP 


LD 


HL,MSG2 


EC 








7198 CDA471 


00670 


CALL 


TEXT 


719B 0617 

X 

719D 210470 


00680 


LD 


B,23 


00690 


LD 


HL,FCB 


71A0 CDD905 


00700 


CALL 


05D9H 


INE 








71A3 C9 


00710 


RET 




H <ENTER> 


00720 ; 






71A4 7E 


0730 TEXT 


LD 


A,(HL) 


ESSAGE ON 








71A5 FE03 


00740 


CP 


03 


71A7 C8 


00750 


RET 


Z 


71A8 CD3300 


00760 


CALL 


0033H 


71AB 23 


00770 


INC 


HL 


71 AC 18F6 


00780 
00790 ; 


JR 


TEXT 


71AE 


00800 WRITE 


EQU 


$ 


RY TO DISK 








71AE CD9571 


00810 


CALL 


FSP 


71B1 212570 


00820 


LD 


HL,DOSBUF 


71B4 110470 


00830 


LD 


DE,FCB 


71B7 010000 


00840 


LD 


BC,00 


71BA CD2044 


00850 


CALL 


4420H 


R EXISTING 








71BD 2A0270 


00860 


LD 


HL, (ENDAD) 


71C0 ED5B0070 


00870 


LD 


DE, (STRAD) 


71C4 ED52 


00880 


SBC 


HL f DE 


BYTES TO LOAD 








71C6 7D 


00890 


LD 


A,L 


71C7 322470 


00900 


LD 


(EOF) ,A 


T SECTOR 








71CA D9 


00910 


EXX 




71CB 2A0070 


00920 


LD 


HL, (STRAD) 


POINTER 








71CE D9 


00930 


EXX 




71CF 23 


00940 


INC 


HL 



BEG OF LAS 
GET OFFSET 

END OF FIL 

PUT IN MEM 

BACK TO NO 

EXIT 

GET FILESP 

23 CHAR MA 

INPUT ROUT 
ENDS WIT 

DISPLAYS M 
SCREEN 



WRITE MEMO 



OPEN NEW 



HL=NO. OF 



END IN LAS 



DE 1 IS RAM 



ONE MORE B 

Program continues 



The MOVE2 routine is similar 
to MOVE except it goes in the 
opposite direction. 

While single-stepping through 
this section, look at the FCB. 
Byte 15 will show where the DOS 
chose to write your file on the 
disk, and bytes 11 and 12 will 
show how many sectors have 
been written. 

The write close routine is sim- 
ilar to the read, except now it 
loads the "end of file" location 
into byte nine of the FCB so that 
it can be written into the disk di- 
rectory. Upon CLOSE (call 
4428H), the routine writes the 
FCB information in the directory 
so that the DOS can find it again. 

Program Options 

In the Open command we set 
the B register to 00 which 
causes one logical record to 
equal one physical record. 

This simplifies housekeeping 
because we are dealing with 
whole sectors at a time. 

Listing 1 works similar to Ba- 
sic's sequential access mode; it 
loads the whole file, modifies it, 
then dumps it back to disk. 

It can also function similar to 
Basic's random access mode, 
by setting B equal to a logical 
record length (the Field com- 
mand). Bytes 11, 12, 13 and 14 
will now be in terms of 
records, not sectors. Your soft- 
ware will be responsible for 
packaging the records into sec- 
tors before writing and separat- 



MEMOREX 

FLEXIBLE DISCS 



WE WILL NOT BE UNDER- 
SOLD!! C<ill Free (800)235-4137 

for prices and information Dealer 
inquiries invited and COD's 
accepted. 




PACIFIC 
EXCHANGES 

100 Foothill Blvd 
San Luis Obispo CA 
93401 In Cal call 
(800)592-5935 or 
{805)543-1037 

^207 



EDUCATIONAL 
SOFTWARE 



for IRS-80' Color Cor 

ELEMENTARY 

SCIENCE 

GEOGRAPHY 

ECONOMICS 

FOREIGN IANG. 

GRAMMAR 



iputer. Pt I . Apple II 
MATH 
HISTORY 
ACCOUNTING 
BUSINESS ED. 
FARM RECORDS 
COIN INVENTORY 



Write foi FREE Catalogue: y) 

MICRO LEARNINGWARE -a»g 

BOX 2 I 34. N. MANKATO MN ">600l 



507 625 2205 



y) 



VISA S. MASTER CHARGE ACCEPTED ft 



Apple is a trademark ol Apple Computer Co. 
IRV80 r» a registered trademark of TANOV tour 
ret 11 a traoemjuli ol Commodore Bus. AO<hlne*. 




™TRS80 color 

From the January 1981 issue of the CSRA Computer 
Club newsletter: 

There was some amusement at the Novem- 
ber meeting when the Radio Shack repre- 
sentatives stated that the software in the ( 
ROM cartridges could not be copied. This 
month s 68 Micro Journal reported they had 
disassembled the programs on ROM by 
covering some of the connector pins with 
tape They promise details next month Never 
tell a hobbyist something can't be done! This 
magazine seems to be the only source so far 
of technical informations on the TRS-80 color 
computer" Devoted to SS-50 6800 and 
6809 machines up to now. 68 Micro Journal \ 
plans to include the TRS-80 6809 unit in / 
.future issues ^_^X 

To get the MOST from your 6809 CPU - This is the 
BEST SOURCE! The ONLY Magazine for the 8809 
Computer Months Ahead of All Others' 

68 MICRO JOURNAL 

5900 Cassandra Smith Rd. 
Hixson, TN 37343 

USA 

1 Yi $24 50 2 Yr $42 50 3 y -$64 50 

•Foreign Surlace Add $12 Yr 10 USA Price 

Foreign Air Mail Add $35 Yi 10 USA Price 

•Canada & Mexico Add $5 50 Yr !o USA Price •"' 
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Get your TRS-80™ up and running 
with special system and disk drive values like these . . . 



Complete TRS-80 Model III 

microcomputer system 

with disk drives 

A.M. Electronics Model III with 48K RAM, 
two Tandon 40-track double-density disk 
drives, A.M. Electronics controller board, 
DOS & manuals, complete and ready 
to run! $1,895.00 

Price includes shipping anywhere in Continental U.S. 

A.M. Electronics "Multiplier" 

Tired of unreliable double density opera- 
tion? With Multiplier you can upgrade from 
single-density without doubling your 
problems $99.95 

Memory Chips 

16K 200 nanosecond RAM chips $2.00 each 

New! Teac double-head 
40-track disk drive 

Complete with power supply, 

case and extender cables $340 



Teac or Tandon disk drives, 

complete with power supply, 

case & extender cables 

40-track single side disk drive $250 

80-track single side disk drive $340 




TRS-80 Model III Commented 

The definitive guide book to Model II 



ROM 



$15.00 



Coming Soon: 8-user work station versatil- 
ity and hard disk drive for TRS-80 Model II. 



M 



A.M. Electronics 

business software systems 

put your TRS-80 to work for you 

Manufacturing Inventory Control. Six-pro- 
grams-in-one, for complete control of raw 
materials from ordering to after-production 

disbursement . , $299.95 

Dealer /Service Center Record Package. In- 
cludes flexible, modular units for auto 
dealers, mechanics, TV repair centers, elec- 
tronic technicans & appliance repair 

centers $199.95 

A.M. Host. Allows your TRS-80 Model III to 

be run remotely via telephone $29.95 

Inventory Control System. For complete 
control over a virtually unlimited amount 
of inventoried items. Completely menu- 
driven $199.95 



All software compatible with Model I or Model III. 
Each package includes comprehensive, easy-to- 
follow documentation and support materials. 



A.M. ELECTRONICS, INC. 

New Ann Arbor Address: 3446 Washtenaw Ave. 48104. (313) 973-2312. Open M-F 10-6, Sat. 10-5 

Fowlerville*:111 North Grand. Box 1071. 48836. (517)223-7281. 

Attention Dealers, OEM's & Distributors: Call us for details on our attractive pricing. 



'Authorized Radio Shack Dealer. ™TRS-80 trademark Tandy Corp. Prices subject to change withojt notice. 
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Program continued 












YTE 












71D0 CDF371 

R 

71D3 25 


00950 


WR1 


CALL 


MOVE 2 j 


LOAD BUFFE 


00960 




DEC 


H J 


NEXT 256 B 


YTES 












71D4 FAE171 

R 

71D7 110470 


00970 




JP 


M,LSEC 


LAST SECTO 


00980 




LD 


DE,FCB 




71DA CD3944 


00990 




CALL 


4439H 


WRITE SECT 


OR ON DISK 












71DD 2099 


01000 




JR 


NZ,ERRCK+8 


WRITE ERRO 


RS ? 












71DF 18EF 


01010 




JR 


WR1 




71E1 3A2470 


01020 


LSEC 


LD 


A, (EOF) 


EOF IN LAS 


T SECTOR 












71E4 320C70 


01030 




LD 


(FCB+8) r A 


PUT IN FCB 


71E7 110470 


01040 




LD 


DE,FCB 




71EA CD3944 


01050 




CALL 


4439H 


WRITE LAST 


SECTOR 












71ED CD2844 


01060 




CALL 


4428H 


CLOSE FILE 


71F0 C32D40 


01070 




JP 


402DH 


EXIT 


71F3 D9 


01080 


MOVE 2 


EXX 






71F4 112570 


01090 




LD 


DE,DOSBUF 


MOVE FROM 


MEMORY 












71F7 010001 

R 

71FA EDB0 


01100 




LD 


BC,0100H 


TO BUFFE 


01110 




LDIR 




HL' WAS SE 


T EARLIER 












71FC D9 


01120 




EXX 






71FD C9 


01130 




RET 






71FE 0D 


01140 


MSG1 


DEFB 


0DH 




71FF 45 


01150 




DEFM 


'ENTER <R>EAD OR 


<W>RITE' 


7216 03 


01160 




DEFB 


03 




7217 0D 


01170 


MSG2 


DEFB 


0DH 




7218 46 


01180 




DEFM 


'FILESPEC ' 




7221 03 


01190 




DEFB 


03 




7125 


01200 




END 


START 




00000 TOTAL 


ERRORS 











ing the records after reading. 

Programs such as mailing 
lists show the advantage of logi- 
cal record files. Not only are the 
data in neat packages, but you 
can go directly to a particular 
record on the disk. 

Set BC to a record number 
and call 4442H to "position" the 
FCB for a read or write. You. can 
also sort and organize a file 
greater than 48K by moving data 
back and forth between disk 
files. Think about the necessary 
housekeeping software for a 
while, and you will appreciate 
the $200 mail list programs. 

References 

While the technical informa- 
tion section of the TRSDOS 
manual contains much valuable 
information about disk files, I 
find it difficult to understand. 
Apparat's NEWDOS 80 manual 
may amplify this information for 
you. Also Harvard Pennington's 
TRS-80 Disk and Other Mys- 
teries gives a good description 
of how files are organized and 
how the directory works. ■ 



Work and play in 

ANOTHER 
DIMENSION! 





^ 




EDTT: Full-screen BASIC editor 

for TRS-80" Model l/lll 

developed in England by 

Southern Software 

$40+ St shipping CA add 6 % 

Allen Gekter Software 

(415)387-3131 »"» 

*W <Rf 3ox 11721 Sa- P'anasco. CA 94101 




V 



80 !-n Radio Snack.- Tandy Cc 



* 

* 
A 
A 

A 
A 

* 

A 

A 
* 
A 
A 
A 
* 
A 

A 
A 
A 
A 
* 
A 
A 

A 



VfO •T© •!• •f# •f* 9^9 •f9 VfV •■• •*• •#• •#• •*• #*• #f# #*9 #*9 ••• 9^9 9*9 

NEW 

40 TRACK 

DISK DRIVES 

with 

POWER SUPPLY & CASE 

for 

RADIO SHACK 

and 

OTHER COMPUTERS 



rr 



$179 ^o 



OMNITEK Computers 
^p International, Inc. ^ 14( 



V 



1899 Main Street 

Tewksbury, MA 01876 

(617) 851-4580 



Shipping extra FOB Tewksbury 

Master Card. Visa, or Bank Checks accepted 
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THE BOOKKEEPERS 



FOR INFO CALL (6031-447-2745 



Intermediate Bookkeeper— 48K, 2 Drive & Printer $ 1 09.95 

Ann Rose, our Accounts Receivable Clerk— 

48K, 2 Drive & Printer $150.00 

The Count— A variety of utilities such as weight, area and capacity conversions; 

loan amortization; hex code conversion, etc. 

48K disk $49.95 

All programs are for TRS80TM Model I or HI. 

STURDIVANT & DUNN, INC. -wo 
BOX 277, 124 WASHINGTON ST., CONWAY, N.H. 03818 

fTRSflO is a tradaiBrk of the Tandy Corp.) 



P,o«e«ional software TRS-80® MODEL II 

BASIC CROSS REFERENCE 



• FIND WHIRl NAMtS ARt USED FAST 1 

• CAN YOU DELETE THAT LINE' FIND OUT 1 

• DO YOU HAVl DF AD CODING' 

• WANT A NICE PROCRAM LISTING WITH 
DATE & TIME IN HEADING 

DISK SORT 



• SAVE HOURS! 

• PARALLEL/SERIAL PRINTERS 

• SEVERAL OPTIONS 

• 6/8 LPI VARIABLE 

LINE WIDTH & PACE DEPTH 



NOW AVAILABLE! 



... _ Q +POSTAGE& 
$59.99 HANDLING 

DOCUMENTATION ONLY $10.00 
DEDUCTIBLE ON PURCHASE 



• MENU DRIVEN 

• RANDOM FILES 

• CHAINS TO SYSTEM 



• EASY TO USE 

• FAST! 

• SPECS SAVED 



• YOU DON'T HAVE TO BE A PROGRAMMER TO USE IT! 
• EASY TO INSERT INTO 



IOB STREAM FOR 
NONSTOP RUNNING 1 



$69.99 



+ POSTAGES 
HANDLING 



OR BASIC PROGRAMS ON DISK 

BASIC COMPILER 

• TRSDOS°/BASIC COMPATIBLE! 

• FASTER THAN BASIC BY UP TO 
30 TIMES 

TRS-flO®' & TRSDOS* ARE REGISTERED 
TRADEMARKS OF TANDY CORP 



DOCUMENTATION ONLY $10.00 
DEDUCTIBLE ON PURCHASE 



• WRITTEN BY MICROSOFT 

$350.00 



+ POSTAGES 
HANDLING 



• EASY TO USE 

• AUGMENTED WITH OUR 
DOCUMENTATION 

GOODLYDDON DATA SYSTEMS ^186 master charge of 

5488 RIVERSIDE DR., CHINO, CA. 91710 V|SA .ccpt*!. 



VISA/MC Order Line Only (except Mich.) 800-2534358 ext. 100 

FINDISK-II The ultimate in automatic disk indexing with exclusive features Model-I $20.00 

AUTOMATICALLY create INDEX of programs or data from all your disks, print disk LABELS, print 
alphabetized MASTERLIST, do fast SEARCH, add DESCRIPTIONS. Also automatically: detect DATA or 
SYS disks, PURGE disks and index of old files, and UPDATE from revised disks only. 
SOLAR I The critical calculations for passive design. . . Model-I $30.00 Model-II $45.00 

INPUT: any latitude, orientation, slope, roof overhang, storage type, building loss. OUTPUT: solar angles, 
shading, time, heat gain/loss, percent solar, fuel use. Print report by hour, month, year in presentation format. 
RIA-II Complex Real Estate Investment Analysis Model-I $30.00 Model-II $45.00 

Analysis for investor or homeowner using Elwood method. INPUT: Project costs, loan and tax data, 
expenses, depreciation rate. OUTPUT: Cap rate/value, mortgage payments, before/after tax cash flows, return 
(IRR) , profit/gain from sale over any time series. 
DEPRECIATE-I Manage a list of depreciable items Model-I $15.00 Model-II $20.00 

Tracks long list of depreciable items with varying purchase dates, depreciation rates, or per cent business use. 
Update any time. Print tax form. Used by many CPAs. 

STRUCT-I Graphic design of steel /wood beams and moment transfer Model-I $ 15.00 

INPUT: span/cantilever, uniform/point loads, beam material. OUTPUT: with screen graphics beam moment 
& shear diagrams. Print job report with diagram, stresses, and required beam sizes. 

Min 32K. On disk (Mod-I one drive order tape). Add $1.00 postage (Mich, add 4% tax) VISA/MC 
^193 DOCUMAN SOFTWARE BOX 387-A KALAMAZOO, Ml 49005(616) 344-0805 



COLOR COMPUTER USERS . . . YOUR EXCLUSIVE MONTHLY MAGAZINE 




the RAINBOW 



HAS A POT OF GOLD FULL OF 

• Programs 

• Hints and Tips 

• Helpful Utilities 

• Honest Reviews 

• New User Tutorials 

• Software Discounts 



'Trademark ol Tandy Corp 



Th« RAINBOW is devoted only to the TRS-80* COLOR 
COMPUTER! It is the magazine that will help you get the 
most out of your Color Computer . . . whether you're 
interested in fun and games, business applications or 
education. 

"The RAINBOW is a pot of gold full ol fabulous 
information." —P.M.. Detroit 

"' wouldn't be without the RAINBOW. Its the best!" 

— R.P.. Seattle 

the RAINBOW 

5803 Timber Ridge Dr. • Prospect, KY 40059 
Subscribe to Hie RAINBOW today. 
A 12-month subscription Is only $12. 

Canadian points please add $2.50 

All subscriptions start with current issue (limited back issues available 
lor $2. plus $2 SO postage and handling). 



.-296 



TRS-80™ Models 1 & 3 

SYSTEM DIAGNOSTIC $99.95 

Complete tests for every component of 
your TRS-80: ROM, RAM, Video Display, 
Keyboard, Line Printer, Cassette Recorder, 
Disk Drives, RS-232 Interface. The most 
exhaustive diagnostic program available. 

SMART TERMINAL $69.95 

The intelligent telecommunication pro- 
gram that enables your TRS-80 to be used 
as a time-sharing terminal. Automatic 
transmission and reception of data to and 
from other computer. Full control key set, 
including BREAK. Complete character 
mapping, lower case. Cassette and disk 
files compatible with both Electric Pencil 1 " 
and SCRIPSIT". 

MONITOR #3 $39.95 

Disassembler, memory displays; move, 
search, modify, and verify memory; read 
and write machine language cassettes; 
object code relocator; hexadecimal arith- 
metic; symbolic output of disassembly. 

MONITOR #4 $49.95 

Same as Monitor #3, but adds disk file and 
sector input and output, RS-232-C com- 
munications. 

HOME BUDGET $49.95 

Maintains checkbook, summarizes income, 
expenses, monthly bills. Monthly and year- 
to-date summaries. (Disk version only.) 
Specify Model 1 or 3 ^195 
Send S.A.S.E. for FREE Catalogue. 

HOWE SOFTWARE 

14 Lexington Road, New City, NY 10956 
TRS-80 is a registered trademark of Tandy Corp. 



EFFECTIVE 
IMMEDIATELY: 



Canadian subscriptions, $27.97 
1 year only, U.S. funds 
Foreign surface, $44.97 
1 year only, U.S. funds 

Foreign air mail, please inquire. 



[All previous subscription 

offers void as of 

February 1, 1982.) 



'See List of Advertisers on page 402 
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TUTORIAL 



The Key Box 

Basic Level II 
Model I or III 



Bring round off errors into line. 



Dizzy Decimals 



James R. Shore 
605 Harrison Street 
Belding, Ml 48809 



I have found four decimal val- 
ues that consistently lead to 
subtraction errors on the 
TRS-80. Two produce a frac- 
tionally high answer and two 
produce fractionally low 
answers. 

Let's set up a program to ob- 
serve these problems, and then 
develop a technique to eliminate 
the errors. How about a simple 
accounts receivable routine 
with only three variables: 

• DA as previous balance 

• DB as amount paid 

• DC as balance due 



Simple Program 

Type the following program: 

10 INPUT'INPUT PREVIOUS BALANCE 

";DA 
20 INPUT'INPUT AMOUNT PAID ";DB 
30 DC = DC-DB 

40 PRINT-BALANCE DUE EQUALS "DC 
50 INPUT'TO TRY ANOTHER PRESS 

ENTER ";YZ 
60 GOTO10 

Line 10 is simply the customer's 
previous balance; that is, how 
much money an individual 
owes. Line 20 shows the cus- 
tomer's payments. 

Line 30, which is where the 
problem lies, subtracts the value 
in line 20 from the value in line 10 
to calculate the number printed 
in line 50— the balance due. 

Using this sample program I 
can illustrate the four subtrac- 
tion problems. 

Problem 1 
Input previous balance $30.20 
Input amount paid 30.00 

Balance due .200001 

When the TRS-80 subtracts the 
above numbers, it produces an 
erroneous answer, one digit too 
high in the sixth place. 

Problem 2 

Input previous balance $30.30 
Input amount paid 30.00 

Balance due .299999 

When subtracting these 
numbers, the 80 produces an er- 
roneous answer, one digit too 



low in the sixth place, just the 
opposite of the previous error. 

Problem 3 
Input previous balance $30.70 
Input amount paid 30.00 

Balance due .700001 

This produces the same error as 
in Problem 1. 



Problem 4 
Input previous balance $30.80 
Input amount paid 30.00 

Balance due .799999 

This produces the same error as 
in Problem 2. In my experience 
the above four decimal values, 
.2, .3, .7, and .8 are the only 
values that the TRS-80 fails to 
subtract properly. 

In the subtracted values, 
which the computer rounded too 
high or low, the rounding error 
occurs at the sixth place after the 
decimal. Conveniently, when 
dealing with dollars and cents, 
two decimal places is sufficient. 

But that is not the case in 
many other fields— engineering, 
for example. The rounding error 
six places out will eventually 
result in an incorrect balance. 
This is more noticeable when 
the computer rounds too low. 
Here the one cent error is im- 
mediately recognizable. 

One seemingly obvious way 
to eliminate the problem is the 
"print using" statement. Add a 
line 45 between lines 40 and 50. 
The program now looks like this: 



10 INPUT'INPUT PREVIOUS BALANCE 

";DA 
20 INPUT'INPUT AMOUNT PAID ";DB 
30 DC + DA-DB 

40 PRINT'BALANCE DUE EQUALS "DC 
45 PRINTUSING"###.##";DC 
50 INPUT'TO TRY ANOTHER PRESS 

ENTER ";YZ 
60 GOTO10 

At first glance we seem to 
have solved the problem. The ex- 
pected values in both examples 
are correct. However, a more in- 
depth analysis suggests that 
the problem is merely masked. 

I left line 40 in the program to 
show you that the actual values 
have not changed. The final an- 
swer printed by the computer is 
rounded either up or down. But 
the calculations done by the 
computer still use the incorrect 
value. Therefore, the problem 
remains. 

Rounding Off 

Why not round variable DC? 
Since the above looks so good, 
let's give it a try. Change line 30 
to: 

30DC+DA-DB + .005 

This rounds the DC value to two 
places. 

Once again, the answers in 
two places are correct, but we 
are maintaining digits beyond 
two places that will have the 
same effect as the original error. 
Removing those extra digits 
should solve the problem. 

Again, let's revise line 30 to: 
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From Computer Plus to YOU . - . 
PLUS after PLUS after PLUS 




BUY DIRECT 



Here are just a few of our fine offers . 
call TOLL FREE for full information. 



COMPUTERS 

Model I 

Model 

MODEL 

MODEL 
•MODEL 

MODEL 
•MODEL 



64K $3300 

1 4K LEV I 599 

II 16K 839 

II 32K 945.50 

II32K 881.50 

II48K 1052 

II 48K 924 
Model III 48K 

2 Disc & RS232 c 2059 

Color Computer 4K 310 

Color Computer 16K 416.50 

•Color Computer 16K 352.50 
Color Computer 16K 

w/extended basic 459 
Color Computer 32K 

w/extended basic 525 
Color Computer Drive 470 

Pocket Computer 189 

VIDEOTEX 310 

'Computer Plus New Equipment, 
with NEC RAM installed. 
180 Day Computer Plus Warranty. 

We have the lowest possible 
Fully Warranteed Prices AND 
a full complement of Radio Shack 
Software. 

DEALER INQUIRIES ARE INVITED 

Prices subject to change without notice. 
Not responsible for typographical errors. 
TRS-80 Is a registered trademark ot Tandy Corp. 



PERIPHERALS 

Expansion Interface OK 

Expansion Interface 16K 
•Expansion Interface 16K 

Expansion Interface 32K 
•Expansion Interface 32K 

16K RAM N.E.C. 200 N.S. chips 
MODEMS 

Lynx Direct Connect Ml/Mill 

Auto Ans. /Dial 

Telephone Interface II 

R.S. Modem I D.C. 

R.S. Modem II D.C. 
PRINTERS 

Daisy Wheel II 

Epson MX80 

Epson MX80 FT 

Epson MX1 00 

Line Printer VII 

Line Printer VIII 

Line Printer V 



Microline80 
$249 Microline82A 
355.50 Microline83A 
291.50 Microline84Parrabel 
462 Pocket Computer Printer 
334 DISK DRIVES 
25 R.S. Model III 1ST-Drive 

Tandon40TrackMI 
235 R.S. 1 Drive Exp Mil 
R.S. 2 Drive Exp Mil 
169 R.S. 3 Drive Exp Mil 
130 SOFTWARE 
210 R.S. Software 10% off list 

Newdos 80 Mill 
1695 ST80III 
479 ETC. 

589 Verbatum 5" Double Density 
759 Verbatum 8" Data Life 
315 Ctr-80A recorder 
620 C. C Joysticks 
1610 



345 
479 
745 
1090 
130 

712 

329 

999 

1518 

2040 



149 
149 

32 

49.95 

52 

22 




call TOLL FREE 1-800-343-8124 




com 




245A Great Road 
Littleton, MA 01460 
617-486-3193 



plus 

I Write for your 



free catalog 



^ u 



■See List of Advertisers on page 402 
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RS232 Not. Req. LYNX Mod l/lll $259.95 

- - j jflcju des a u to dial/answer. caDles and terminal software 

V ER BAT I M p. — e ^ A ??* dd/ $3o.oo 



MICRO IMAGES 



CALL 

FOR OUR LOW PRICES 



FR EE SHIPPING WITHIN C QNT. U.S.A. 

OKIDATA 



EPSON 



MD525-01 of 10 



Add $2 50 ■ Plasl LIB case 



COPYRIGHT KIT • A must for authors who want to learn how 
t i'.PL l^PL t i?g.^i ) IP qrams - Written by national attorneys . $11.95 



SUPERSCRIPT by Acorn ■ Reg. 32K, Scripsit & L/C - Disk $44^ 95 
EDITOR ASSEMBLER PLUS by Microsoft 16K Tape $27.95 
QQOpi [JO Newest Version 



- 3.4S/ 3.4D/3.4 I 

MAXI MANAGER Mod 



ea $134.95 



by Adventure Int'l »*«« m- 

I Latest Version 48K Disk $84.95 



UNITERM by Pete Roberts ■ Mod 

MICROSOFT - FORTRAN 80-S89.95 - A.L.D.SS89.95 • BASIC C0MPILERS179.95 



Works with most modems $74.95 



ED AS by Misosvs Sophisticated Editor & Assembler $75.95 

L DOS V ersion 5.1 —Mod I or III $149.95 



LAZYWRITER 



LATEST A Best Bay in WordJ'rp£e£S£r£ 

VERSION - Mod I or III 



Proof reader by Aspen Software Mod I - 49.95 Mod III - 49.95 

Proofedit by Aspen Software Mod I 28.50 Mod III - 28.50 

Grammatik by Aspen Software Mod I - 55.95 Mod III -55.95 

MX 80 Ribb on R eloads • $3.50 ea/$35.00 dz. Min 5 ribbons 



We also carry the lull line of ADVENTURE INTL. ACORN. RIG FIVF BRODERBUND 
AVALON HILL. MICROSOFT. OATASOFT. MISOSYS. AUTOMATED SIMULATIONS and 
most other fine software at discount prices. 



SEND FOR YOUR FREE CATALOG 
No credit cards at these low prices Add $2.00 on all COD orders Certified CK MOCOD 
shipped immediately Please allow 2 weeks for personal checks For extra fast service 
phone m your COD order Prices subject to change without notice New York Stale 
residents please add appropriate sales lax 
We Oiler Great Values & Promp t Delivery - Why Not T ry Us ' 



146-03 25th Road, Flushing, New York 1 1 354 

Mon-Fri 10 AM-9 PM (21 2) 445-71 24 " 157 Sat 10 AM-5 PM 




YORK lO 

BASF-DPS 

WORLD STANDARD TAPE 



PROFESSIONAL 5-SCREW SHELL 
UNIVERSAL INDUSTRY ACCEPTANCE 



u«Sr$ 



DATA TRAC - C-10, C-20 
MUSI TRAC - C-45, C-90 



•156 
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, "YOU'VE TRIED THE REST, NOW BUY TH E BEST' 
Call: 213/710-1430 for IMMEDIATE SHIPMENT on Credit Card Orders: 

order now... Man to: VORK lO Computeruuare 

24573 Kittridge St., #80F, Canoga Park, CA 91 307 ; 



Please send cassettes checked below: 


LENGTH t DOZEN 2 DOZEN 
C-10 "rj __ 8^00 □ 14.40 


TOTAL 


C-20 □ 1000 □ 18.00 




C-45 G 13.00 fj 23.00 




C-90 D 21.75 □ 39.00 




sub ioial 




Calif, residents, add 6% sales tax 




Shipping 1 doz. $2. 2 doz. $3.50 
addt'l. doz.. $i. 




TOTAL 





□ Check or M.0. enclosed fj Charge to my Credit Card: 
D VISA □ MASTERCARD Expires date: 



WRITE FOR QUANTITY DISCOUNTS 
Snipper! bulk-pack by UPS lo street address in l'c 
US A only. We cannot ship lo P 0. Boies 



30 DC = I NT(((DA - DB)* 1 00) + .5)/1 00 

The line looks complicated, 
but going through it step by step 
clarifies it. The line subtracts DB 
from DA, multiplies by 100 to 
move the decimal point the two 
places desired; then it adds .5 
which rounds off the answer. By 
taking the integer value, the pro- 
gram removes the extra digits to 
the right of the decimal. 

Dividing by 100 returns the 
decimal point to the proper loca- 
tion. 

Running this program with a 
variety of values seems to pro- 
duce the correct answers for our 
balance due. In essence, it 
rounds to the next higher digit, 
two places after the decimal. 

Now return to the first problem 
that produced a result rounded 
high in the sixth digit. With the 
above method we are adding to 
the third digit and this can again 
cause trouble with specific en- 
tries. Try a few and check the 
results. The following again pro- 
duces an error: 

Previous balance $1234567.2 
Amount paid 1234567. 

Balance due .25 

We are using seven digits to 
the left of the decimal and only 
one to the right, a total of eight. 
Single-precision values should 
handle this. However, this is ac- 
tually rounding two places to 
the right of the decimal (remem- 
ber those 100 values in line 30). 
Seven places, plus two places, 
equals nine places. Single preci- 
sion only handles eight places. 

By using only six places to the 
left of the decimal, it appears we 
can correct the error. 

When using .2, .3, .7 and .8 
with six places to the left of the 
decimal, the answers are cor- 
rect most of the time. However, 
using 333333.8 results in an 
answer of .81 . Obviously there is 
still an error. 

It is possible that the decimal 
takes up one of the eight single- 
precision places. Therefore, 
there may be a limit of five places 
to the left of the decimal. Trying 
several entries with five digits to 
the left of the decimal, I produced 
no errors. 

It looks as if the error condition 
is now solved with the following 
limits: 



• single-precision values 

• five places to the left of the 
decimal 

• two places to the right of the 
decimal 

To sum up the results, first list 
the program: 

10 INPUT'INPUT PREVIOUS BALANCE 

";DA 
20 INPUT'INPUT AMOUNT PAID ";DB 
30 DC = INT(((DA-DB)*100) + .5)/100 
40 PRINT-BALANCE DUE EQUALS "DC 
50 INPUT'TO TRY ANOTHER PRESS 

ENTER ";YZ 
60 GOTO10 

Extending the Decimal 

For larger figures, you can use 
the TRS-80's double-precision 
function. With double precision, 
the 80 can extend the number of 
places to the right of the decimal 
point. 

Let's add a line 5 to the pro- 
gram: 

5 DEFDBLD 

If we now run the programs leav- 
ing line 30 as is, the result is 
more digits in the answer than 
we need. 

Now we have seven places to 
the right of the decimal and eight 
places more consisting of gar- 
bage digits. The Level II manual 
says that we must use double- 
precision values throughout our 
equations, but we have con- 
stants in our program that are 
not double precision. One more 
revision in line 30 and we will be 
able to input most any number. 

Add the # sign after each con- 
stant in line 30. It now looks like 
this: 

30 DC= INT(((DA-DB)*100#) + .5#V100# 

Our limits are now: 

• double-precision values 

• thirteen places to the left of 
the decimal 

• two places to the right of the 
decimal 

Some of you (like engineers) 
would probably like more than 
two places to the right of the 
decimal. If so, revise line 30 to: 

30 DC = INT(((DA-DB)*1000#) + .5#)/1000# 

You can move the decimal 
point in this fashion to any loca- 
tion up to fifteen places. 

There, now you can subtract 
with accuracy for nearly any appli- 
cation, from simple bookkeeping 
to engineering. Let me know how 
you handle the problem. ■ 
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STEVENS' (Bleep) 

An Authorized (Bleep) Dealer 



We didn't fool you, did we? We can't use certain names in our advertising, but the fact is that as a result of our authorized dealership we are able to offer a full 
line of TRS-80 (tm) products with a full warranty. Of course the fact that we are not a company-owned store allows us to offer a full line of accessories when we 
feel they may better suit your needs, so you'll find we carry printers by Epson and C. ITOH, modems by Lynx, operating systems by Logical Systems and 
Apparat, and disk drives by Tandon (cheaper without the "Bleep" label). If you like, we'll help you pick the combination most suited to your needs. We even 
have custom programming available if you need that kind of help. And if all that is not enough to interest you, check below and you'll find that our prices are 
outstanding. 



HARD DISK DRIVES 

10 megabyte removable cartridge Winchester drive for the TRS-80 Model I, 
II, or III - includes host adapter and all cables. 



Model I or III (includes LDOS driver) 
Model II (requires DOS) 



Model I & III Operating Systems 

LDOS 5.1 

NEWD0S80 



$5395. 
$5295. 



$116. 
$139. 



Model II Operating Systems 

Racet HDOS (TRSDOS) $400. 

Single User Oasis $ 500 

Multi-User Oasis $ 850 - 

CP/M $ 195 - 



MODEL III SYSTEMS 

We take a 16K Model III. add 32K of prime 200 NS memory, a high quality 
disk controller with a switching (not linear) power supply, and two double 
density 40 track tandon disk drives (the same one Tandy uses). Since we 
can assemble this system for less, you pay only $1895. 

With 2 double sided 40 track drives* $2095. 

With 2 single sided 80 track drives* $2195. 

With 2 double sided 80 track drives* $2295. 

•Requires LDOS or other alternate Model III operating system. We will pro- 
vide LDOS 5.1 for $80. with the purchase of any of the systems listed 
above. 



HARDWARE 



Mod III 48K 2 Disk . 

16K Model III 

64K Model II 

64K Color Computer 
16K Extended Color 



$2150. 

865. 

3385. 

339. 

499. 



32K Extended Color $634. 

CTR80 Cassette Recorder 52. 

Lynx A/A Modem 249. 

C. Itoh Prowriter Printer 550. 

Starwriter Daisy 25cps 1495. 



WARRANTY INFORMATION 

All Radio Shack products are covered by the standard 
Tandy 90 day warranty, which will be honored at any 
company-owned store or computer center. Other hard- 
ware is warranted for 120 days by Stevens' Electronics. 



CHEKBOOK 

AT LAST ... A system to handle both your income and expense ledger AND 
your checkbook! Presenting CHEKBOOK (c) by Ronald Schulman. 
CHEKBOOK has these advanced features: 

MENU DRIVE 

FLEXIBLE HARDWARE CONFIGURATION. 

SIMPLE STATEMENT RECONCILIATION 

LEDGER ACCOUNTING 

ITEMIZED DEDUCTION REPORT 

INCOME STATEMENT 

PERMANENT YEARLY ACCOUNTING 

ERROR RECOVERY 

FAST COMPILED CODE 

FULL DOCUMENTATION 

SPECIFY OPERATING SvSTEM 

$99.95 







DEALER B094 

STEVENS' ELECTRONICS 

562 Nutt Road, Phoenixville, PA 19460 

Call Toll Free (800) 345-6279 

In Pennsylvania (215) 933-3441 



• See List ol Advertisers on page 402 



Add shipping to prices listed. 
Add 3% for Visa and Master Card. 
PA. residents add 6% sales tax. 
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EDUCATION 



Teach the physics of light. 



You Light Up My Life 



James W. Wood 
424 N. Missouri 
Box 507 
Atwood, IL 61913 



Interference is "the mutual ef- 
fect of two beams of light 
resulting in a loss of intensity in 



Line description 

30-60 inputs distance between 
sources and wavelengths for 
two patterns. 

80-110 constructs first inter- 
ference pattern. 

120-160 constructs second in- 
terface pattern. 

170-220 shifts from first pattern 
to second pattern five times. 



certain areas (destructive inter- 
ference) and reinforcement of 
intensity in others (constructive 
interference)." Light and dark 
bands are formed when mono- 
chromatic light passes through 
two narrow slits. In a physics 
class these bands are observed 
by the use of diffraction grat- 
ings, ripple tanks, or two lines 
scratched into a black-coated 
glass plate. 

Program Listing 1 allows a 
student to study the relation- 
ship between the wavelength of 
the light, the distance between 
sources, and the resulting dif- 
fraction pattern. It also gives the 
equation for interference pat- 
terns caused by two point 
sources. From sin0 = A/d it can 
be deduced that a smaller angle 
(resulting in more light and dark 
bands) will result from a shorter 
wavelength or a larger distance 
between sources. Fig. 1 shows 



REM JAMES W. WOOD, ATWOOD ILLINOIS 

10 CLS:PCLEAR8: PRINT" INTERFERENCE PATTERNS" 

15 PMODE4,l:PCLS:PMODE4,5:PCLS 

20 PRINT'FORMED BY TWO POINT SOURCES" 

30 PRINT: INPUT"RELATIVE WAVELENGTH FOR FIRST PATTERN";F 

40 INPUT'RELATIVE DISTANCE BETWEEN THE SOURCES" ;R: R=R/2 

50 INPUT'RELATIVE WAVELENGTH FOR SECOND PATTERN" jA 

60 INPUT'RELATIVE DISTANCE BETWEEN THE SOURCES" jB: B=B/2 

70 PMODE4,1:PCLS:SCREEN1,0 

80 F0RW=1T0165STEPF 

90 CIRCLE(128-R,96) ,W 

100 CIRCLE(128+R,96) ,W 

110 NEXTW 

120 PMODE4,5:PCLS:SCREEN1,0 

130 F0RW=1T0165STEPA 

140 CIRCLE(128-B,96) ,W 

150 CIRCLE(128+B,96) ,W 

160 NEXTW 

170 FORY=lT05 

180 PMODE4,1:SCREEN1,0 

190 FORX=1TO1000:NEXTX 

200 PMODE4,5:SCREEN1,0 

210 FORX=1TO1000:NEXTX 

220 NEXTY 

230 PRINT"TYPE 1 TO REPEAT LAST PATTERNS" 

240 PRINT'TYPE 2 TO PUT IN NEW DATA" 

250 PRINT'TYPE 3 TO END" 

260 XS=INKEYS:IFXS=""THEN260 

270 XX=VAL(XS) 

280 ON XX GOTO 170,10,290 

290 END 

Program Listing 1. 



the result of changing the 
distance between sources. 

The program allows you to set 
up two different conditions of 
wavelengths and distances, 
then flash back and forth from 



The Key Box 

Extended Color Basic 
Color Computer 
16K RAM 



one pattern to the other. It is 
easier to comprehend what is 
happening if you change either 
the wavelength or the distance 
(but not both) on one run of the 
program. More information on 
these patterns can be found in a 
high school or college physics 
book.B 



James Wood teaches high 
school math, physics and 
chemistry. 




X REPRESENTS WAVELENGTH 

d REPRESENTS DISTANCE BETWEEN SOURCES 



Fig. 1. Interference patterns caused by two point sources. 
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Computer experts 
(the pros) usually have big 
computer experience. 
That's why when they shop 
system software for Z80 
micros, they look for 
the big system features 
they're used to. And that's 
why they like Multi-User 
OASIS. You will too. 



(THEN COMPARE.) 



DATA INTEGRITY: FILE & 
AUTOMATIC RECORD LOCKING 



The biggest challenge 

for any multi-user system 

is co-ordinating requests 

from several usej 

to change th&sa^kre^rd 

at 



Without this control, 
unauthorized users could 
access your programs and 
data and do what they like. 
A frightening prospect 
isn't it? 

And multi-users 
can multiply the problem. 

But with the Lo( 
Password 



memory is needed. Even 
if you have more than 64K, 
your pay-off is cost savi 
and more efficient use 
of all the meraoAou h 
availablaaiii »k it 
se,_ 

Hre? 
ItiBABkOBJSlf&sit. 



OASIS IS AVAILABLE FOR 

SYSTEMS Alios. Compucorp: CromemccK 
Delta Products: Digital Group; Digita| 
Microsystems: Dynabyte: Godbout: 
Index: Intersystems: Nory " 
SD Systems: TRSj 
Graphic: Vorii 

CONTROtiBPfe 1 ' Bell MJfctrols; Car] 
us; Ko^Dx M jart^* n: M|C,C 
Tele'-:' :,.;.fe>t! 




le: normally 

jserscan view a 
particular record at the 
same time. But, if that 
record is being updated 
by one user, automatic 
record locking will deny all 
other users access to the 
record until the up-date is 
completed. So records 
are always accurate, 
up-to-date and integrity 
is assured. 

Pros demand file & 
automatic record locking. 
OASIS has it. 



SYSTEM SECURITY: 
LOGON, PASSWORD 
& USER ACCOUNTING 



ry 
sernasbeen 
when and 
r how long. 
Pros insist on these 
security features. 
OASIS has them. 



EFFICIENCY: 
RE-ENTRANT BASIC 



A multi-user system 
is often not even practical 
on computers limited 
to 64K memory. 

OASIS Re-entrant 
BASIC makes it practical. 

How? 

Because all users use a 
single run-time BASIC 
module, to execute their 
compiled programs, less 



upports 

anSn inWs little as 
ory. Or, with 

nPTswitching, as much 
s 784K. 

Multi-Tasking lets each 
user run more than one 
job at the same time. 

And there's our BASIC- 
a compiler, interpreter and 
debugger all in one. 
An OASIS exclusive. 

Still more: Editor; Hard 
& Floppy Disk Support; 
Keyed (ISAM), Direct & 
Sequential Files; Mail-Box; 



Scheduler; Spooler; 
all from OASIS. 

Our documentation is 
recognized as some of the 
best, most extensive, in the 
industry. And, of course, 
there's plenty of 
application software. 

Put it all together and it's 
easy to see why the real 
pros like OASIS. Join them. 
Send your order today. 



Controlling who gets on 
your system and what they 
do once they're on it is the 
essence of system security. 




OPERATING SYSTEM 

ludes: 
EXEC Language. 
File Management; 
User Accounting; 
Device Drivers; 
Print Spooler; 
General Text 
Editor: etc.) 
SINGLE-USER 
MULTI-USER 



BASIC COMPILER/ 

INTERPRETER/DEBUGGER 



RE-ENTRANT BASIC 

COMPILER/INTERPRETER/ 

DEBUGGER 



DEVELOPMENT PACKAGE 

(Macro Assembler; 
Linkage Editor; 
Debugger) 



TEXT EDITOR & 
SCRIPT PROCESSOR 



DIAGNOSTIC* 
CONVERSION UTILITIES 

(Memory Test; 
Assembly Language, 
Converters; File 
Recovery; Disk Test; 
File Copy from 
other OS;. 



COMMUNICATIONS 
PACKAGE 



! Send & Receive) 



PACKAGE PRICE 

(All of Above) 

SINGLE-USER 

MULTI-USER 



FILE SORT 



COBOL-ANSI '74 



60.00 
60.00 



Order OASIS from: 

Phase One Systems, Inc. 

7700 Edgewater Drive, Suite 830 

Oakland, CA 94621 

Telephone (415} 562-8085 
TWX 910-366-7139 

NAME 

STREET (NO BOX =) 

CITY 

STATE ZIP_ 



AMOUNTS 

(Attach system descnpt.on; 

add S3 for shipping; 

California residents add sales tax) 

□ Check enclosed □ VISA 

□ UPS C.O.D. □ Mastercharge 

Card Number 

Expiration Date 

Signature 



MAKES MICROS RUN LIKE MINIS 



UTILITY 



Cure those exit-to-DOS blues. 



TRSDOS 2.0 Fix 



Tom Mornini 
8601 Farley Way 
Fair Oaks, CA 95628 

What a surprise. I walked in- 
to the local Radio Shack 
Computer Center and found that 



there was a new TRSDOS 2.0 
available. With enhancements 
such as a Host program allowing 
remote control of the computer 
(over a modem) and wild card 
file names the program seemed 
worth the $24.95. The new ter- 



minal program had a true break 
key, and also an exit function to 
get you out of the program with- 
out rebooting the system. My ex- 
citement gave way to disap- 
pointment when the program ex- 
ited to TRSDOS Ready, and 



TRS-80 Model II DEBUG Program 



3060 
3070 
3080 
3090 
30A0 
30B0 
30C0 
30D0 
PC 
2800 
? P 



3E 39 CF 54 7A 34 4D 35 
C4 30 53 B0 30 42 34 31 
30 47 B7 32 58 OF 34 52 
46 ID 32 56 06 32 51 54 
77 CB 7E 21 IB 3A 20 03 
21 8C 3B 06 1C 0E 50 11 
CF C3 3F 30 21 67 37 06 
21 46 3A 20 03 21 5A 3A 
SP SZHPNC AF BC DE 



30 4F F6 33 41 6F 32 45 
4C ID 31 50 9A 30 57 DE 
B0 33 43 28 33 44 7B 33 
30 FF 21 67 37 3E 80 AE 
21 30 3A CD 92 35 18 8F 
CA 3D CD 49 37 EB 3E 26 
00 CB E8 7E A8 77 CB 6E 
CD 92 35 C3 3F 30 3A OF 
HL IX IY AF' BC 



>9.Tz4M50O.3Ao2E 
.0S.0B41L.1P.0W. 
0G.2X.4R.3C(3D{3 
F.2V.2QT0.!g7>.. 
w.. !.: . 10:. .5.. 
l.;...P..=.I7.>& 

..?0!g7 w.n 

IF: .1Z:..5.?0:. 
DE ' HL ' 



21FE 000000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 

Fig. 1. 



TRS-80 Model II DEBUG Program 

3060 C3 F8 3F 54 7A 34 4D 35 

3070 C4 30 53 B0 30 42 34 31 

3080 30 47 B7 32 58 OF 34 52 

3090 46 ID 32 56 06 32 51 54 

30A0 77 CB 7E 21 IB 3A 20 03 

30B0 21 8C 3B 06 1C 0E 50 11 

30C0 CF C3 3F 30 21 67 37 06 

30D0 21 46 3A 20 03 21 5A 3A 
PC SP SZHPNC AF BC DE 

2800 21FE 000000 0000 0000 0000 
? P 



30 4F 


F6 33 


41 


6F 32 


4S 


4C ID 


31 50 


9A 


30 57 


DE 


B0 33 


43 28 


33 


44 7B 


33 


30 FF 


21 67 


37 


3E 80 


AE 


21 30 


3A CD 


92 


35 18 


8F 


CA 3D 


CD 49 


37 


EB 3E 


26 


00 CB 


E8 7E 


A8 


77 CB 


6R 


CD 92 


35 C3 


3F 


30 3A 


OF 


HL 


IX 


IY 


AF' 


BC 


0000 


0000 c 


OOf 


0000 


0000 



..?Tz4M50O.3Ao2E 
.0S.0B41L.1P.0W. 
0G.2X.4R.3C(3D{3 
F.2V.2QT0.!g7>.. 
w.. !.: . 10:. .5.. 
i.;...P..=.I7.>& 

..?0!g7 w.n 

!F: .IZ:..5.?0:. 
DE ' HL ' 



Fig. 2. 



there was nothing in the manual 
explaining how to change it! I 
then decided that I would have 
to make the change myself. 

SVC 39H 

A disassembled listing of the 
program showed that the pro- 
gram was mainly Supervisor 
Calls (SVC's), and looking at 40 
pages of disassembled code 
was not my idea of fun. Luck 
was with me. On the first page 
there was a call to SVC 39H at 
memory location 3060H. I looked 
it up, and found the SVC named 
CLRXIT. It involves no parame- 
ters, no possible error condi- 
tions, no questions; it clears 
user memory and returns to 

Tom Mornini is a sophomore 
at Bella Vista High School and is 
the author of Dark Forest by 
Sirius Software Inc. 



The Key Box 



Model II 
32K RAM 
TRSDOS 2.0 



332 • 80 Microcomputing, March 1982 



Expensive 
Expan " 



EXPENSIVE - The LNW 

System Expansion II and built-in •j-V^-*:, 
comes with a full 32K of 200ns RAM&-" ' 
RS232c 20 MA current loop serial interface. 
That's for starters. Next, consider our heavy gauge 
steel case, power indicator lamp, gold-plated 
connectors, FR-2 glass epoxy circuit board with 
solder mask and silk screen legends. Then there is 
the parallel printer port, screen printer port, real 
time clock, and extra heavy duty onboard power 
supply with over current protection, over voltage 
protection and thermal shutdown. If that's not 
enough then there is the floppy disk controller, 
guaranteed operation at a 4MHz CPU speed and 
our 6 month warranty. Every one of these features 
is STANDARD. This is true system expansion. 
You get every 'expensive' feature without 
spending more. 

CHEAP - Our price is $399.95. Any way you 
compare, features or price, LNW's System 
Expansion II is the clear winner. The LNW 
System has been field tested for over two years 
with thousands of users. It works with any DOS, is 
100% TRS-80 Model I compatible and it works 
'right out of the box'. If there is any doubt in your 
mind as to whether you should buy ours or the 
'other guys', just ask an LNW owner! 

WE ARE #1 - Number one in price, features, 
reliability, performance and delivery. LNW is 
committed to 'expensive' features and quality at 
reasonable prices. LNW is committed to support, 
thorough documentation, and reliability. 

LNW Research Corp. 

2620 WALNUT Tustin, CA. 92680 
(714) 641-8850 (714) 544-5744 




made us the number one 
manufacturer :^' of system expansion units 
and accessories for the Model I computer. 

EXPANSION OPTION - 8-inch drive capability 
is as easy as plugging in the LNDoubler 5/8 
option*. Now you can have any combination of 
single- or double-density, single- or double-sided, 
8"* and/or 5" disks on-line! 8-inch disk storage 
increased to 591,360 bytes - 77-track single-sided, 
double-density or 1,182,720 bytes - 77-track 
double-density, double-sided. 

The LNDoubler's unique 5/8 switch allows you 
to boot from 5- or 8-inch system disks and it's 
accessible from outside the interface. The $219.95 
LNDoubler 5/8 comes with a double-density disk 
operating system (DOS+ 3.3.9), complete with 
BASIC and utility programs... ready to run your 
software. 

Each of your present 40-track, single-sided 5-inch 
drives will store up to 184,320 bytes (formatted 
storage) - that's an 80 r < increase in storage 
capacity for only half the cost of just one disk 
drive. With three 8-inch double-density, 
double-sided drives your Model I will have 3.75 
Megabytes of online storage - that's more storage 
than a Model II or Model III! 



^32 



*8" drive operation requires special 
double-density requires I'l.iMH? CPl 
modification or LNW-80 4MHz computer. 




TRSDOS READY! That had to be 
it! Here is how the SVC was 
called: 

3060 LD A,39H 
3062 RST 08H 

This assembles to: 

3E 39— Load register 'A' with 39H 

CF— Restart #8, to call SVC 

(See Fig. 1) 

That left just enough room to 
put a jump statement in so it 
could go to another routine in 
memory to make it do some- 
thing else. I studied it and decid- 
ed on: 3060 JP 3FF8H This as- 
sembles to: C3 F8 3F— Jump to 
3FF8H (See Fig. 2). 

I picked 3FF8H because that 
was the very bottom of the pro- 
gram minus the number of bytes 
required by the routine to make 
it do any exit needed. The rou- 
tine is simple, and uses an- 
other SVC. 

3FF8 LD HL.3FD5H 

3FFB LD B,23H 

3FFD LD A.25H 

3FFF RST 08H 

This assembles to: 

21 D5 3F-Load register pair 'HL' with 3FD5H 
06 23-Load register 'B' with 23H 
3E 25-Load register 'A' with 25H 
CF-Restart #8, to call SVC 
(See Figs. 3 and 4) 

I now had all I needed to go in 
and change the program, except 
for the command to execute. In 
the last routine, I loaded the HL 
pair with 3FD5H. When the SVC 
is called, it starts to read the 
command string at that location 
and ends at HL + B, because the 
B register is loaded with the 
length of the command string. 
All there was left to do was put 
in a command no longer than 35 
bytes long, starting at memory 
location 3FD5H. I picked 35 
bytes because it is enough room 
to call up Basic, execute a pro- 
gram, set the number of files, 
and even set memory size in the 
form: BASIC 12345678/123:1 
-F:12 -M:12345. Remember to 
pad the end with blanks, or 
TRSDOS might not like some of 
the characters that get into the 
command string. 

Debug On 

Armed with this information, 
we can make all the changes 
with the Debug monitor. First it 
is necessary to clear memory — 
so enter Clear! It is summoned 
from the depths of a TRSDOS 
system disk by entering DEBUG 
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ON. Now type LOAD TERMINAL 
to load the Terminal program 
without executing it. And for the 
final step, type DEBUG. You are 
now in Debug. 

Press M to get into the RAM 
mode; Debug will respond A = . 
Now enter 3060; the screen 
should look like Fig. 1. 

To get into the modify mode, 
type the F1 key. The cursor 
should jump up to the line that 
starts with 3060 and be posi- 
tioned over the 3 in 3E. Now you 
can change the program. Type 
in C3 F8 3F (without spaces) so 
the screen looks like Fig. 2. 
When that is done, press the F2 
key to exit the modify mode. 

Debug will be waiting for your 
command; press M to enter the 
RAM mode again. Type in 3FD0; 
the screen should look like Fig. 3. 

Again use the F1 key to get in- 
to the modify mode. The cursor 
will be on the line that starts 
with 3FD0 and will be positioned 
over the first in 00. Press the 
down arrow key twice so the cur- 
sor is on the line that starts with 
3FF0 and then press the tab key. 
The cursor will be on the second 
half of the display. Type in 
21 D5 3F 06 23 3E 25 CF (again 
without spaces, so that the 
screen looks like the corre- 
sponding part of Fig. 4. 

Now enter the command you 



want to have the program ex- 
ecute at location 3FD5H. Move 
the cursor back up to the top left 
with the arrow keys, press the 
right arrow key 10 times, and 



press the 7' (slant) key. The cur- END = 3FFF. 



top of the exclamation point. 
Now what? Press the F2 key to 
exit the modify mode. Type an 
'O' for DEBUG OFF, and enter: 
DUMP progname START = 3000 



Your modified terminal 
program is alive and 
well in memory. . . " 



sor will jump over onto the right 
side of the screen on the ASCII 
display. Type the command you 
want, but make sure that it is not 
longer than 35 characters. Pad 
the remainder with spaces mak- 
ing sure not to go past the half- 
way mark on the third line which 
is an exclamation point on the 
ASCII display. After you type in 
the last character, or padded 
space, the cursor should blink 
on top of this exclamation point. 
Since the V character is a toggle 
between the HEX and ASCII dis- 
plays, when you want to type a 7' 
in a command, such as in a pro- 
gram name, you should type it, 
type in '2F', and press it again. 
Your modified Terminal pro- 
gram is alive and well in memo- 
ry, and the cursor is blinking on 



The disks will run for a while, 
and you will be faced with that 
TRSDOS READY. Enter the pro- 
gram name saved, and you will 
be greeted by the Terminal pro- 
gram menu. Type 'Q' and your 
command will be executed. 

Errors, Errors, Errors 

If you made any errors in the 
command string, you will get an 
error message when you press 
'Q'. Reenter the Debug monitor, 
reload the program, and load the 
progname. Type DEBUG, and 
use the M command to go to the 
memory locations previously 
discussed. Check everything 
carefully, and use 'F1 ' to get into 
the modify mode to fix any bugs. 
Then dump the program and try 
again. ■ 



TRS-80 
3FD0 
3FE0 
3FF0 
4000 
4010 
4020 
4030 
4040 
PC 
2800 
? P 


Model II DEBUG Program 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
SP SZHPNC AF BC DE HL IX IY AF' 

21FE 000000 0000 0000 0000 0000 0000 0000 0000 

Fig. 3. 


00 
00 
00 
00 
00 
00 
00 
00 

BC 
0000 


































DE' 
0000 


HL' 
0000 



TRS-80 Model II DEBUG Program 

3FD0 00 00 00 00 00 43 4F 4D 4D 41 4E 44 20 53 54 52 COMMAND STR 

3FE0 49 4E 47 20 20 54 48 45 4E 20 50 41 44 44 45 44 ING THEN PADDED 

3FF0 54 4F 20 20 48 45 52 45 21 D5 3F 06 23 3E 25 CF TO HERE1. ?.#>%. 

4000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 

4010 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 

4020 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 

4030 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 

4040 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 

PC SP SZHPNC AF BC DE HL IX IY AF ' BC' DE' HL ' 

2800 21FE 000000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
? P 

Fig. 4. 
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ONEY 
MANAGER 

By Andrew P. Bartorillo 




A complete management tool for the home budget, this useful program helps keep track of your in- 
come and expenditures and provides an easy method of budget allocation. 

MONEY MANAGER answers the question, "Where does it all go?" by categorizing the outgo of your 
money in accounts that you design according to your needs. It provides a means of keeping complete 
and accurate records, including an itemization of your tax-deductible expenditures— you can imagine 
the time savings at tax time alone! 

You can store information on up to 100 checkbook entries per month (250 with 48K), specify any 
automatic withdrawals (such as automatic mortgage payments), keep a separate list of tax- 
deductibles, and record expenses by category. Checks payable to charge card companies and other 
lump payments may even be broken up to be placed into the proper individual categories. If you have 
a lineprinter, MONEY MANAGER will provide formatted printouts by category and time period. 

MONEY MANAGER requires a TRS-80* model I or III with a minimum of 32K and one disk drive. Order 
this time and money saver now for only $39.95. 



ACORN PROGRAMS ARE AVAILABLE AT FINE COMPUTER STORES EVERYWHERE 



LOST COLONY 




EVEREST 
EXPLORER 



ASTROBALL 





By David Feitelberg 

It's the world's first deep space col- 
ony and you are the economic 
manager. A remarkable simulation, 
LOST COLONY arms you with 
maps and charts as tools for 
resource management. You assign 
human and robotic labor, explore 
new land, and set production 
quotas. At the same time you must 
determine equitable pay scales and 
taxes. 

Communicate through your model I 
or III using full sentences or short 
commands. A challenging game, it 
might give you insight into real life 
management as well. Available on 
16K tape or 32K disk for only $19.95 
each. 



By William Godwin & 
Don Knowlton 

EVEREST EXPLORER lets you 
challenge the world's highest 
mourtain without ever leaving 
home. You make all the decisions 
in this logistical simulation. 

You select the manpower, food, 
fuel, shelter and oxygen you need. 
Then manipulate your resources to 
outwit the elements and terrain, 
establishing ever higher encamp- 
ments. Will you reach Everest's 
29,028 foot summit— and return to 
tell about it? Just $19.95 for model I 
or III. Order on 16K tape, or the 32K 
disk version which includes a "save 
game" feature and other 
enhancements. 



By John Allen 

More features, thrills, and sound 
than even our famous PINBALL. 
With ASTROBALL in your TRS-80* 
model I or III the arrow keys 
become flipper buttons, the screen 
becomes the play board, and you 
become the "Pinball Wizard!" 

A flying saucer and moving space- 
ships add to the fun. Knocking out 
five meteors earns you an extra 
ball, while black holes swallow the 
ball in play. ASTROBALL's five skill 
levels will have all your family and 
friends lining up for the pinball ac- 
tion. Available on 16K tape or disk 
for just $19.95 each. 




(202) 544-4259 



Acorn 

Software Products, Inc. 



634 North Carolina Avenue, S.E., Washington, DC. 20003 



•Trademark of Tandy Corp. 

ALL ACORN ENTERTAINMENT 

SOFTWARE SUPPLIED FOR 

TRS-80* MODELS I & /// 

MAIL ORDERS: Include $2.00 shipping & handling 
(DC. residents add 6% sales tax). 
CHARGE CARD CUSTOMERS: Call (202) 544-4259 
for fastest service. 



■ See List of Advertisers on page 402 
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UTILITY 






Control the rate of your Basic interpreter. 



VariSpeed 



Bruce Evans 
17918 EKelby 
Covina, CA 91722 



Several programs for slowing 
down screen listings on the 
Level II TRS-80 reduce it to one 
slow speed or use the down ar- 
row key to scroll the screen one 
line at a time, like the Level I. 
I wanted a routine to slow the 
running, as well as the listing 
speed; also, I wanted several 
speed options. It seemed that if I 
could slow the Basic interpreter I 
could also slow down the listing. 

How It Works 

My program uses a delay rou- 
tine (see the Program Listing) 
patched into the keyboard scan; 
the keyboard is scanned con- 
stantly for a Shift @ to halt the 
running or listing. 



The Key Box 



Basic Level II 
Model I 



Ten variable speeds range 
from a delay of about four lines 
per second (normal speed) to 
about one line per two seconds. 
When you run your Basic pro- 
gram, the same amount of delay 
results between the interpreta- 
tion of each instruction. Shift 
Enter gives a Speed? message 
in the upper left corner of the 
screen. A single keystroke of 
0-9 slows down or speeds up 
the program or listing. 

Many times the Speed? mes- 
sage overwrites and ruins your 



display; when you hit the key of 
your choice, the display is 
restored. 

The program instructions are 
written to the screen as the tape 
loads into memory, and the pro- 
gram Auto Starts. The assem- 
bler version can be relocated to 
any spot in memory. 

Listing 1 was created with 
Radio Shack's Editor/Assem- 
bler; any assembler would do 
just as well. You may delete 
lines 120-370 as they only write 
instructions to the screen as the 



tape loads. Also delete line 430; 
this instruction waits for a key 
to be depressed before clearing 
the screen. 

To put exactly 64 characters 
on one line after a DEFM in- 
struction, make sure the second 
remark apostrophe appears ex- 
actly one space past the first 
apostrophe on the next line. 

This may not be an elegant 
program, but it is the first useful 
machine language program I 
have written. I must say I'm hap- 
py with the results.! 







Program Listing 


41E2 


00130 


ORG 


41E2H 


41E2 E9 


00140 


DEFB 


233 


3C00 


00150 


ORG 


3C00H 


3C00 20 


00160 


DEFM 


• 


1ST V 1.0 






i 


3C40 20 


00170 


DEFM 


i 


E EVANS 






i 


3C80 20 


00180 


DEFM 




3CC0 54 


00190 


DEFM 


•THIS 



SLOW L 
BRUC 



'THIS PROGRAM WILL ALLOW YOU 

TO SLOW YOUR LIST OR SLOW YOUR ' 
3D 00 50 00200 DEFM 'PROGRAM . YOU ARE ALLOWED 1 

SPEEDS , FROM TO 9 , WITH BEING' 

3D40 54 00210 DEFM 'THE NORMAL SPEED . EACH NUM 

BER FROM 1 THRU 9 SLOW THE COMPUTER ' 
3D80 44 00220 DEFM 'DOWN IN INCREMENTS OF ABOUT 

1/2 SECONDS PER LINE DURING A LIST ' 
3DC0 4F 0023 DEFM 
INSTRUCTIONS DURING A RUN OF YOUR 
3E00 50 00240 DEFM 



'OR THE SAME AMOUNT BETWEEN 
'PROGRAM . 



3E40 20 



00250 



DEFM 



3E80 20 00260 DEFM 

, JUST HIT SHIFT ENTER , YOU WILL 
3EC0 53 00270 DEFM 



3F00 4E 00280 DEFM 

PONDING TO THE SPEED YOU WISH . 

3F40 20 00290 DEFM 

PEED IS , AND EACH HIGHER NUMBER IS 

3F80 41 00300 DEFM 'A SLOWER SPEED. ' 

7EF5 00310 ORG 32501 



' TO INVOKE THE SLOW UTILITY 
i 

'SEE SPEED ? 

i 

'NOW ENTER THE NUMBER CORRES 
' JUST REMEMBER THE NORMAL S 



Program continues 
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Program continued 

7EF5 21097F 
7EF8 221640 
7EFB 21E241 
7EFE 36C9 
7F00 CD4900 
7F03 CDC901 
7F06 C3191A 
7F09 CD647F 
7F0C CDE303 
7F0F B7 
7F10 C8 
7F11 4F 
7F12 3A8038 
7F15 B7 
7F16 79 
7F17 C8 
7F18 FE0D 
7F1A 21003C 
7F1D 117E7F 
7F20 010800 
7F23 EDB0 
7F25 C0 
7F26 2A2040 
7F29 227C7F 
7F2C 212040 
7F2F 3600 
7F31 23 
7F32 363C 
7F34 21727F 
7F37 CDA728 
7F3A CD4900 
7F3D 217E7F 
7F40 11003C 
7F43 010800 
7F46 EDB0 
7F48 21867F 
7F4B 010A00 
7F4E EDB1 
7F50 C0 
7F51 010900 
7F54 09 
7F55 7E 
7F56 327A7F 
7F59 2A7C7F 
7F5C 222040 
7F5F AF 
7F60 CD647F 
7F63 C9 
7F64 F5 
7F65 C5 
7F66 3A7A7F 
7F69 47 
7F6A 0E01 
7F6C CD6000 
7F6F CI 
7F70 Fl 
7F71 C9 



00320 

00330 

00340 

00342 

00360 

00370 

00380 

00390 ROUT 

00400 

00410 

00420 

00430 

00440 

00450 

00460 

00470 

00480 

00482 

00483 

00484 

00485 

00490 

00500 

00510 

00520 

00530 

00540 

00550 

00560 

00570 

00580 

00581 

00582 

00583 

00584 

00590 

00600 

00610 

00620 

00630 

00640 

00650 

00660 

00670 

00680 

00685 

00690 

00700 

0710 DELAY 

00720 

00730 

00740 

00750 

00760 

00770 

00780 

00790 



LD 

LD 

LD 

LD 

CALL 

CALL 

JP 

CALL 

CALL 

OR 

RET 

LD 

LD 

OR 

LD 

RET 

CP 

LD 

LD 

LD 

LDIR 

RET 

LD 

LD 

LD 

LD 

INC 

LD 

LD 

CALL 

CALL 

LD 

LD 

LD 

LDIR 

LD 

LD 

CPIR 

RET 

LD 

ADD 

LD 

LD 

LD 

LD 

XOR 

CALL 

RET 

PUSH 

PUSH 

LD 
LD 

LD 

CALL 
POP 
POP 
RET 



HL,ROUT 

(4016H) ,HL 

HL,41E2H 

(HL) ,201 

49H 

1C9H 

1A19H 

DELAY 

3E3H 

A 

Z 

C,A 

A,(3880H) 

A 

A,C 

Z 

13 

HL,3C00H 

DE,BUFF 

BC,8 

NZ 

HL, (4020H) 
(CURSOR) ,HL 
HL,4020H 
(HL) ,00H 
HL 

(HL) ,3CH 
HL,MSG 
28A7H 
49H 

HL,BUFF 
DE,3C00H 
BC,8 

HL,TAB 
BC,10 

NZ 

BC,9 
HL,BC 
A,(HL) 

(COUNT) ,A 
HL, (CURSOR) 

(4020H) ,HL 

A 

DELAY 

AF 

BC 

A, (COUNT) 

B,A 

C,01H 

60H 

BC 

AF 



7F72 


53 


00800 MSG 


DEFM 


'SPEED ?' 


7F79 


00 


00810 


DEFB 


00 


7F7A 




00820 COUNT 


EQU 


$ 


7F7A 


00 


00830 


DEFB 


00 


7F7B 




00840 






7F7B 


00 


00850 






7F7C 




00860 CURSOR 


EQU 


$ 


7F7C 


0000 


00870 


DEFW 


0000 


7F7E 




00872 BUFF 


EQU 


$ 


0008 




00874 


DEFS 


8 


7F86 


30 


08 80 TAB 


DEFB 


30H 


7F87 


31 


00890 


DEFB 


31H 


7F88 


32 


00900 


DEFB 


32H 


7F89 


33 


00910 


DEFB 


33H 


7F8A 


34 


00920 


DEFB 


34H 


7F8B 


35 


00930 


DEFB 


35H 


7F8C 


36 


00940 


DEFB 


36H 


7F8D 


37 


00950 


DEFB 


37H 


7F8E 


38 


00960 


DEFB 


38H 


7F8F 


39 


00970 


DEFB 


39H 


7F90 


0100 


00980 


DEFW 


0001 


7F92 


20 


00990 


DEFB 


20H 


7F93 


30 


01000 


DEFB 


30H 


7F94 


40 


01010 


DEFB 


40H 


7F95 


50 


01020 


DEFB 


50H 


7F96 


60 


01030 


DEFB 


60H 


7F97 


70 


01040 


DEFB 


70H 


7F98 


80 


01050 


DEFB 


80H 


7F99 


90 


01060 


DEFB 


90H 


7F9A 


A0 


01070 


DEFB 


0A0H 


7EF5 




01080 


END 


32501 


0000 


5 TOTAL 


ERRORS 







FREEDOM TECHNOLOGY INTERNATIONAL, INC. 

The International Computer Enhancement Distributor and 

Developer, is pleased to announce that it has obtained the 

worldwide distribution rights for the Freedom Option Hardware 

Enhancement and the powerful Operating Systems (T80S) which 

were developed by Field Engineering Consultants, Ltd. 
These exciting microcomputer enhancement packages permit the 
use of CP/M Program Applications on TRS-80 Model I and Model III, 

PMC 80 and 81 and LNW 80 Systems. 

Also available for the Model I and Model III are the Freedom Plus 

Options which expand 48K Systems to 64K RAM. 

For further information on how to order, please 
write: 

FREEDOM TECHNOLOGY INTERNATIONAL, 

INC. 

119 North 10th Street 

Philadelphia, PA 19103 

215-569-2381 

Watch for our display ad in the April issue of 

80 Microcomputing. 



Dealer inquiries invited. 

CP/M Is o trademark of Digital Research 

TRS-60 Model I and Model III are trademarks of Radio Shack/Tandy Corp. 

PMC 60 and 81 are trademarks of Personal Micro Computers, Inc. 

LNW 60 is a trademark of LNW Research Corp. ^240 



ACTION GAMES 

The fastest growing producer of computer games for 
your 6809 has the products you have waited for!! 



ARCADE GAMES FOR 
THE COLOR COMPUTER 



cfi&tt* 



Co «.o, 



Be »sen K 



Fast paced action • Super Hi-Res Graphics 

Dynamite sound effelcts • Runs in 16K of memory 

These games will astonish you with their Detail and Quality. 

They set a standard for others to follow. 



— ADVENTURES — 

Calixto Island • alic Slack Sanctum 

Highly acclaimed by reviewers • Challenging situations 

Fast, efficient machine language • Runs in 16K of memory 

Save game in progress 



Adventures on 5'. TSC FLEX disc 
Both adventures on single disc . . 
Adventures lor color computer . . 
Color Berserk lor color computer 
Cave Hunter lor color computer 



(specify 6800 or 6809I 



ea $24 95 
. .S39.95 
ea $19 95 
ea $24 9$ 
ea S24 95 



[';>-.: ; 



,| U S California 



VISA' 



— MORE COMING SOON — 
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• See List ol Advertisers on page 402 



MARK DATA PRODUCTS 

23802 Barquilla, Mission Viejo, CA 92691 • (714) 768-1551 

TRS 80 IS A TRADEMARK OF TANDY CORP. 
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^APPLICATIONS 



by Dennis Kitsz 



The first microcomputer users consid- 
ered the advent of cassette storage a 
luxury, since programs hundreds of bytes 
long previously had to be entered by hand 
from switches and lights on a front panel. 
Then along came machines like the 
TRS-80, with cassette and a four-disk op- 
tion as well. Finally, there is the Color 
Computer, with cassette and disk— and 
entire programs that plug into the side of 
the machine. This month the subject is 
those Color Computer ROM packs: what 
they are, and how to make your own. 

First of all, ROM packs are easy and 
cheap. If they weren't, Radio Shack 
wouldn't sell them for 30 bucks each. If 
you pop one open you'll find a small 
printed circuit board with one or two in- 
tegrated circuits on it. Maybe a pair of tiny 
capacitors. That's all. In fact, they are 
made up of exactly the same electronic 
components as Color Basic and Extended 
Color Basic, that is, read-only-memories 
(ROMs). 

Last month's Applications covered 
quitea bit of computer jargon, sothistime 
I'll make the dangerous assumption that 
you all read it, and jump right in with a 
description. The edge card of the Color 
Computer provides a complete bank of 
signals produced or used by the proces- 
sor, plus a few specially created ones. 
Two of these special signals are essential 
for operating ROM packs: CTS* (cartridge 
select) and CART* (cartridge interrupt). 

What is CTS* and what makes it impor- 
tant? If you leaf through computer maga- 
zines, you'll find a lot of talk about 
memory address decoding, which is the 
process of electronically assigning a 
group of memory locations to some spe- 
cific device or a given block of random- 
access memory (RAM) or ROM. The Color 
Computer's memory map is broken into 
four such major blocks: 32K RAM in- 
cluding memory for Basic operation, 
video memory, and user memory from 
0000 to 7FFF hex (0 to 32767 decimal); the 
two Basic ROMs from 8000 to BFFF hex 
(32768 to 49151); space for the external 
cartridge ROMs from C000 to FEFF (491 52 
to 65279); and internal locations for 
keyboard, cassette, serial input/output, 
and so on, from FF00 to FFFF (65280 to 
65535). 



Decoding the cartridge block might be 
complicated. It demands the selection 
(activation) of the external cartridge for all 
memory addresses starting at C000— a 



nice even number— but ending at FEFF, 
slightly less than the memory position 
at which a 16K block would normally end 
(at FFFF). This kind of irregular mapping, 



A5 
A6 
A7 

AS 
A9 
AIO 
Al I 
AI2 
CTS 

CART 

GND 



(2K)MCM68BI6 
(4K)MCM68B32 
(6K) 
(8K1MCM68B64 



(6K) MCM68BI6 



Fig. 1. Radio Shack arrangement for2K, 4K, 6K, or8K ROM cartridges. MCM68B series 
ROMs are fast factory-programmed memories manufactured by Motorola. 
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used for disk, printer, cassettes, and so 
forth on the Model I, was an electronic 
nightmare. But on the Color Computer, 
CTS* does that work. It is a signal output 
created by the computer which is active 
when the CPU wants any address from 
C000 up to FEFF (but not beyond). 

The second cartridge signal is CART*; 
it is an input to the computer. When 
CART* is shorted to ground— which hap- 
pens whenever a Radio Shack cartridge is 
inserted— the CPU is interrupted from its 
normal operation, and forced to jump to 
the address of the external cartridge and 
begin executing the program found there. 
It's a neat trick. Plug in a cartridge, power 
up the computer, and instantly you have 
something other than Basic— a game, 
another language, a monitor, an 
assembler, or just a simple utility program 
of some kind. 

But there's a bonus. Recall, I mentioned 
that memory mapped addresses can be 
for ROM, peripheral devices, or RAM. 
Which means adding static RAM is as 
easy as adding a "ROM" pack. And 
almost as easy is adding an extra parallel 
input/output port or two. 

One from Column A, Two from Column B 

Several variations can be selected for 
adding memory in this cartridge area. Fig- 
ure 1 shows how Radio Shack chose to do 
it. Using factory-programmed read-only- 
memories, they have connected these 
devices directly to the address and data 
lines coming from the central processing 
unit (CPU) in the computer. The sockets in 
the cartridge can accommodate two in- 
tegrated circuits, which can be arranged 
in combinations of one MCM68B16 (2K) 
alone, one MCM68B32 (4K) alone, one 
MCM68B32 paired with one MCM68B16 in 
the second socket (6K), or one MCM68B64 
(8K) alone. One or two capacitors keeps 
the electronic noise level down. 

This method has the advantage of ex- 
treme simplicity— the use of only two 
electronic components lowers both cost 
and power demand. But the arrangement 
also has a disadvantage. Because no ad- 
ditional electronic logic was put in place, 
the full 16K addressing available from the 
CTS* signal is not used. 8K is the max- 
imum memory space used. (Don't get me 
wrong; that's lots of space. After all, the 
entire Color Basic fits in 8K of ROM). 

From the point of view of a Color Com- 
puter user attempting to create an exten- 
sive ROM cartridge add-on, however, 
Radio Shack's simple method is virtually 
impossible. That's because most home 
computer owners can't order the mini- 
mum 1,000 factory-programmed ROMs at 
a time. Instead, individual users must ob- 
tain memories that they can program at 



it 




I BOUGHT IT 

My biggest loss 
of programming 
time using 
Snappware's 
EXTENDED BASIC 
is spent 
inserting 
my diskette. 

SCOTT ADAMS - PRES. OF ADVENTURE INTL. 



Reduce your programming time significantly with Snappware's EXTENDED 
BASIC. The program is written entirely in machine language for super fast 
execution and is fully integrated into the TRSDOS* BASIC interpreter, re- 
quiring no user memory. Here are just some of the ways EXTENDED 
BASIC can make your programming task easier: 

• Quick way to recover BASIC program following a New, System 
or Accidental re-boot. 

• Single character abbreviations for the most frequently used 
commands. 

• Six single key stroke commands to list the first, last, previous, 
next or current program line. Even edit current line. 

• A powerful cross-reference facility with output to display 
and/or printer. 

• Ability to trace a variable through the code. 

• Determine easily if a variable is in use. 

• Permits programmer to display and/or print the value of any or all 
program variables. 

• Identifies the variable type for all variables. 

• Lists each element of any array separately. 

• Program line renumbering facilities allowing for specification of 
an upper limit of the block of lines to be renumbered, relocation 
of renumbered blocks of code and duplication of blocks of code. 

• Cross reference facility for key words and character strings including 
global replacement of key works. 

• Compresses your BASIC program to an absolute minimum by remov- 
ing extraneous information. 

• Merge lines. 

• Deletes statements that could not be executed. 

If you consider your programming time to be worth money, call us and let 
us show you how to get more of it. 



'TRSDOS™ Tandy Corporation 



MODEL III . ... . .$125.00 

Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513)891-4496 
3719Mantell 
Cinti., Ohio 45236 ' 
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home, or which can be programmed in 
single quantities by mail order services. 
These are erasable, programmable, read- 
only-memories (EPROMs). 

Figure 2 presents the simplest equiva- 
lent of the Radio Shack design. Four inex- 
pensive 2716 EPROMs are hung onto the 
address and data lines, and selected in 2K 
increments by the 74LS138 demultiplexer. 
Whoa, you say, what's this demultiplexer 
and how did it get in the circuit? 

As I mentioned, Radio Shack's ROM 
packs use different size ROMs for differ- 
ent program memory requirements. Al- 
though EPROM equivalents for these 
ROMs are available, they can be quite ex- 
pensive— $20 or better for the 4K 2732 and 
$50 for the 8K 2764. At only $5 a pop, the 
2K 2716 is well worth the trouble of adding 
an extra 50-cent integrated circuit like a 
74LS138. 

Next question: What does the demulti- 
plexer do? Addresses through 10 can se- 



lect 2,048 (2K) different memory locations. 
Including address 11 increases the selec- 
tion to 4K locations, adding address 12 in- 
creases it to 8K, and using address 13 in- 
creases the possibilities to 16K. In this de- 
sign, the lower-numbered addresses 
through 10 are used by the 2716 EPROM 
for actual memory location selection. 



The demultiplexer (Z1 in Fig. 2, type 
74LS138) accepts three binary inputs and 
produces only one active signal for each 
unique combination. Therefore, since ad-, 
dresses A11, A12 and A13arefed to its in- 
puts, then eight individual block select 
signals are derived at its outputs. . .each 
one representing a single 2K block of 



. most home computer owners can't order 
the minimum 1000 factory- 
programmed ROMs at a time." 



That means addresses 11, 12 and 13 can 
be thought of as "block selection" tools 
rather than mere memory address- 
es — A11 selects two blocks containing A0 
to A10; A12 selects two blocks of A1 1; and 
A13 selects two blocks of A12; for a total 
of 8 blocks. 
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Fig. 2. ROM cartridge arrangement using four 2716 EPROMs. Although eight EPROMs 
can theoretically be connected, the load on the CPU would be too high. 



memory— the size of a 2716 EPROM. 

Watching Out for Overdrive 

Notice, however, that four of the de- 
multiplexed outputs from Z1 in Fig. 2 are 
marked "possible but not recommended." 
This is so because digital integrated cir- 
cuits can only drive (feed reliable signals 
to) a limited number of other integrated 
circuits in the same family. This limitation 
is called a device's "fan-out" (one com- 
pany prefers to call it "family rules of 
incest"). 

The CPU in the Color Computer is al- 
ready pushing a couple of Basic ROMs 
and some other circuits, and because of 
its limited fan-out, it's unwise to ask it to 
drive more than two or three ICs. Four 
2716 EPROMs are just about as much as 
can be added without the computer opera- 
tion becoming unreliable. So if you use 
the design in Fig. 2, don't attempt to con- 
nect more than four 2716's. 

However, there is a way to make all 16K 
of this cartridge address space available 
safely; it is shown in Fig. 3. In this design, 
the CPU is asked to drive only one set of 
extra integrated circuits. These are known 
as buffers, and their job here is to extend 
the fan-out of the CPU. They transmit the 
same signals to many more circuits than 
the CPU can do alone. 

Two of the buffers (74LS244s, Z1 and 
Z2) are the one-way streets. That is, the ad- 
dress signals are always sent from the 
CPU to receiving devices. However, the 
data bus is different in that it is both read 
from and written to by the CPU— it is 
bidirectional. Z3 is a 74LS245 bidirectional 
bus transceiver (phew!), meaning it is able 
to receive signals from the left and send 
them out the right, or vice versa, depend- 
ing on whether the send/receive (S/R) sig- 
nal on pin 1 is high or low. This is how it is 
used here: By hooking up the computer's 
read/write (R/W) signal to the bus 
transceiver's send/receive (S/R) input, and 
by connecting the bus transceiver's chip- 
enable (CE) input to the computer's car- 
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tridge select (CTS*) signal, the 74LS245 
will transmit data from the ROMs to the 
computer only when the computer issues 
a "read from cartridge," and will transmit 
data from the computer to the ROMs only 
when the computer issues a "write to car- 
tridge." 

The 74LS138 demultiplexer is used in 
exactly the same way as in Fig. 2, except 
that this time all eight 2716's can be hook- 
ed into its memory selection circuitry 
without problems. The power consumed 
is low (well under 200 mA) since only one 
2716 is enabled at full power at a time. 

Hidden Feature 

There is an additional advantage to this 
circuitry not immediately obvious 
because I've been talking about "ROM" 
packs. The electronics industry has 
developed a 2K RAM which is pin-for-pin 
compatible with the 2716 EPROM. These 
RAMs (known variously as 21 R1, 6116, or 
2118) can be interchanged with the ROMs 
in this circuit merely by putting them into 
the same sockets. The circuitry in either 
Fig. 2 or Fig. 3 can be used without altera- 
tion, since pin 21 is used as a program- 
ming pin for the ROMs, and as a memory 
read/write pin for the RAMs. In fact, using 
November's 32K dynamic RAM piggyback 
together with a ROM pack filled with 
RAMs, you can have a Color Computer 
with Extended Basic and 48K memory. 



". . . But if all that RAM 

isn't your style, you 

still have two 

other approaches. . . " 



But if all that RAM isn't your style, you 
still have two other approaches to ease 
the wiring complexity in putting together 
Color Computer ROM packs. By the time 
you read this, the price of 4K 2732 in- 
tegrated circuits may have dropped con- 
siderably, making them practical to use in 
home-built ROM packs. Figure 4 shows 
the changes necessary to use 2732 
EPROMs. Pin 21 is now address line 11, 
and a 74LS139 demultiplexer is used in 
conjunction with addresses 12 and 13 to 
produce four 4K block memory select 
signals. Since pin-compatible RAMs do 
not exist, the RD/WR* line from the com- 
puter (pin 18) is routed to Z3 and to the 
ROMs pin 18 (chip enable). 

Finally, simplest of all is Fig. 5, again 
using four 2732 EPROMs. Since the CPU 
can push four devices without too much 
overexertion, the buffers and bus 




I BOUGHT IT 
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of programming 
time using 
Snappware's 
EXTENDED BUILT IN 
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my diskette." 
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Snappware's EXTENDED BUILT IN FUNCTIONS is a collection of much 
needed additions to the TRSDOS* BASIC interpreter which greatly ex- 
tends its convenience and utility. The following features become part of 
your BASIC language and provide the enhancements without requiring 
any additional memory The most important component of EXTENDED 
BUILT IN FUNCTIONS is an in-memory sort routine, guaranteed to be the 
fastest general purpose in-memory sort on the market. Along with this 
you also receive other EXTENDED BUILT IN FUNCTIONS. Here is a 
sampling: 

SRT— Sorts one or more arrays into a specified sequence 
FMT— Arranges data into a string variable as with PRINT USING 
PDAT/UDAT$— Permits user to do arithmetic on dates. 
PK$/UPK$— Compresses strings to save disk space. 
ETIM$— Shows the difference between two times. 
CLEAR— Specifies the number of file blocks to be allocated when 
you specify high memory and string space. 
DELETE— Allows you to dynamically remove portions of a BASIC 
program. 

In addition to these, there are functions unique to Model II and to Model 
III. The exclusives to Model II are long error messages and PEEK/POKE. 
The exclusives to Model III are: 

SWAP— Supports exchange of variables with a single statement. 
HEX$— Converts numbers to hexadecimal strings. 
RESTORE— Allows you to set READ pointer to location of choice. 

If you consider your programming time to be worth money, call us and let 

us show you how to get more of it. 

MODEL II $100.00 

MODEL III $ 75.00 



*TRSD0S™ Tandy Corporation 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513)891-4496 
3719 Mantell 
Cinti., Ohio 45236 
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Fig. 3. Full ROM cartridge design to use up to eight 2716 EPROMs. Address lines are buffered and a 
bidirectional bus transceiver is used for data. 
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transceivers are eliminated, leaving only 
the 74LS139 demultiplexer and the ROMs 
themselves. 

Construction Notes 

Building the ROM packs is straightfor- 
ward; be sure to use 350 nS 2716's (type 
2716-1 or 27A16) for greatest reliability. 
Point-to-point wiring or wire-wrapping can 



BRAND 




Start with an inexpensive 8-track car- 
tridge. . 




Photo 1.. . .jam a small screwdriver into 
the four or five holes on the bottom to 
push back the locking posts. . . 



I BOUGHT IT 

My biggest loss 
of programming 
time using 
Snappware's 
AUTOMAP and 
AUTOFILE is 
spent inserting 
my diskette.' 

SCOTT ADAMS - PRES. OF ADVENTURE INTL. 



When working with direct files or creating a formatted screen, Autofile 
and Automap are indispensible aids. 

Autofile is designed to automate for the BASIC programmer the task of 
moving data elements to and from a direct file. Previously, this was a 
time consuming chore because the FIELDed variables may not be directly 
referenced by user logic. The FIELD statement was eliminated, thereby 
relieving you of the guessing game as to where the FIELDed variable is. 
In addition, the LSET and the CVx functions are performed automatically. 
The software, when installed, becomes part of your BASIC interpreter 
providing the enhancements without additional memory. 
Automap is designed to automate for the BASIC programmer the task of 
presenting information on the video display and accepting information 
from the keyboard operator. The software consists of two main compo- 
nents: the OFF-LINE COMPONENT used to describe to the system the 
screen formats and the ON-LINE COMPONENT from within your BASIC 
program to initialize a screen, send data to the video display and receive 
data from the keyboard operator. This facility when installed, becomes 
part of your BASIC interpreter. 

Both products complement one another and, if used in conjunction, can 
save a significant amount of programming time. 
If you consider your programming time to be worth money, call us and let 
us show you how to get more of it. 



AutomapMODEL II 
MODEL III 

Autofile MODEL II 
MODEL III 



$100.00 

$ 75.00 

$ 75.00 

$ 60.00 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513) 891-4496 
3719 Mantell i 
Cinti., Ohio 45236 ' 
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Photo 2. . . . carefully separate the top and 
bottom halves of the shell. . . 



A 12 

AI3 
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Z2 

74LS244 



GND Gl G2 
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Z3 

74LS245 



be used successfully, and overpriced 
edge connector cables can be obtained 
from Exatron (181 Commercial Street, 
Sunnyvale, CA 94086) or Alpha Products 
(85-71 79th Street, Woodhaven, NY 11421). 
The noise level is low enough that simple 
0.1-mF bypass capacitors connected from 
+ 5 volts to ground near each EPROM will 
be satisfactory. All interconnections are 
quite parallel, and are visually easy to 
make. No matter what method you 
employ, use sockets for the EPROMs. 



and EPROM programming are available 
from MSB electronics (Drawer 766, Barre, 
VT 05641). The layouts, by the way, are 
based on the public-domain PC artwork 
published in "Application of Intel's 5V 
EPROM Family of Microprocessor Sys- 
tems," Application Note AP-72, available 
from Intel Corporation, 3065 Bowers 
Avenue, Santa Clara, CA 95051. So if you 
want to go ahead with your own design, 
get a copy of this publication note to ease 
the way. 



" 'Gold Plug 80' is a terrific cure for most 
Model I edge connector problems." 



I suggest that you follow Radio Shack's 
ingenious lead, and shorten or tape partly 
over the 5-volt power pin (pin 9) so that, in 
case you insert the ROM pack with the 
power on, all the proper connections are 
made before power hits the EPROMs. 
Kudos to the Shack for that idea. 

Double-sided printed circuit layouts for 
the 4-ROM 2716 version will be published 
next month for those who can wait. For 
those who can't, cartridge packs, kits, 
cases, integrated circuits, blank EPROMs, 



If the interest is high enough, I'll also 
publish plans for a Color Computer 
EPROM programmer, and a dynamic RAM 
addition for the cartridge area. Drop a 
post card— no letters on this one, please. 

Cartridges 

When you complete the project, you'll 
probably want a housing for it— and what 
better kind than a real cartridge? 
Although Radio Shack's ROM packs 
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Fig. 4. Changes necessary to employ the ROM cartridge design presented in Fig. 3 with Photo 3. ... carelessly dump out the 
2732 EPROMs. Four 2732s are used in this scheme. innards. 
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If 



come in stubby little cartridges, an actual 
8-track cartridge with the tape removed 
and plastic parts clipped out makes a fine 
housing, preventing shorts, and (with a lit- 
tle imagination) providing a professional 
ROM-pack look. Press-on lettering for 
your program's name (and the author's 
name— yours) plus a good eye for design 
can certainly be impressive. Fool every- 
body! (Speaking of which, can you guess 
what next month is. . .?) 

Photos 1-5 show the first steps in con- 
verting a cheap 8-track cartridge to your 
own ROM pack. Actual mounting of the 
printed circuit board, plus cares and cau- 
tions, will be covered, together with the 
double-sided PC board itself, next time. 

Updates 

I ran into an interesting dilemma while 
using the Color Computer— a very regular 
random number sequence appeared, re- 
peating every nth number, where n was 
the operand in RND(N). NEW, CLEAR and 
editing the program had no effect. Power- 
down did, naturally, but it has occasional- 
ly recurred. I couldn't find any solution in 
the technical information, nor from Fort 
Worth (yes, I too am just one of thousands 
to them). Can readers suggest a simple 
way to reseed the random number 
function? 

It's-about-time department: "Gold Plug 
80" is a terrific cure for most edge connec- 
tor problems in the Model I. This com- 
pletely new gold edge connector solders 
directly to the old one. Two problems, 
though. First, the little grey door won't go 
back on (big deal). The second is a trifle 
more serious: The Gold Plug 80 is a 
Kel/Am brand connector which will not 
mate successfully with AP Products con- 




u 



Photo 4. . . . snip off all the plastic protru- 
sions except the four locking posts (see 
Photo 1)... 









I BOUGHT IT 

My biggest loss 
of programming 
time using 
Snappware's 
COLLEGE EDUCATED 
GARBAGE COLLECTOR 
is spent inserting 
my diskette." 

SCOTT ADAMS - PP.ES. OF ADVENTURE INTL. 



The Snappware College Educated Garbage Collector (SNAPP-VI) is an 
intelligent processing function which greatly improves performance of 
typical BASIC applications. And here's why. 
Microsoft uses a 'variable length string' in the BASIC interpreter. Each 
time the string is assigned a new value, it is relocated in a string pool. 
Periodically the string pool must be reorganized and condensed into a 
single contiguous area. Performing this string space reclamation is time 
consuming and inefficient because this approach evaluates and collects 
each string individually. The time required is roughly proportional to the 
square of the number of active strings in the resident program. During 
reclamation the system seems to 'lock-up' and does not respond to 
the operator until the process is completed. 

This time consuming approach requires a better solution. Snappware has 
developed a solution which takes advantage of the auxiliary memory 
available. SNAPP-VI requires only four bytes per active string as a work 
area. When free storage space is available, our system temporarily bor- 
rows, uses and returns the space to the free storage pool when com- 
pleted. If storage is not available, our system will temporarily transfer out 
to disk enough of the BASIC program to make room for our work area and 
return the 'paged out' information to its correct location when completed. 
Benchmarked times show, in some situations, SNAPP-VI performs one 
hundred times as fast as the Microsoft approach. 
If you consider your programming time to be worth money, call us and let 
us show you how to get more of it. 



MODEL II ... 
MODEL III 



'TRSDOS™ Tandy Corporation 



•See List ol Advertisers on page 402 



. . . .$100.00 
. . . .$ 75J)0 



Time saving power 
at your fingertips. 

CALL TOLL FREE: 

1-800-543-4628 

OHIO RESIDENTS CALL 
COLLECT: (513) 891-4496 
3719 Mantell 
Cinti., Ohio 45236 
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nectors. However, it will work with the 
T&B Ansley brand sold by Radio Shack. 
So replace any edge connectors that 
won't fit with Radio Shack connectors, 



though disk manufacturers wag their 
fingers, saying only disks specifically 
manufactured for double-sided use 
should be used that way. 



"/ wonder if 80 Microcomputing authors 

and readers ever believed they 

were contributing to a 

weakening of U.S. international power?" 



but definitely get the Gold Plug 80 ($19 a 
pair, also available singly for any connec- 
tors, including RS-232, printer, disk, and 
so on) from EAP Co., P.O. Box 14, Keller, 
TX 76248, (81 7) 498-4242. If you can solder, 
you can install it in a half-hour. 

Another interesting item is sold by ABS 
Suppliers, P.O. Box 8297, 3352 Chelsea 
Circle, Ann Arbor, Ml 48104, (313) 971- 
1404. If you've ever fought with scissors 
and rulers trying to turn your single-sided 
disks into double-sided ones, ABS has a 
plastic template which aligns the holes 
properly so you can mark them for punch- 
ing. It's $5 for a few square inches of plas- 
tic and a sheet of documentation, but it 
costs about the same as a disk — meaning 
it pays for itself the first time you use it 
successfully. As a registered cheap- 
skate, I'll recommend this item even 




Photo 5. . . . and you've got an empty shell 
for your ROM pack all ready for a profes- 
sional-looking label! 



Quick note to manufacturers and read 
ers: If I use it or install it and like it, I'll rec- 
ommend it here. If I passively don't like it, 
I'll ignore it. If I actively don't like it, I'll say 
so. Criteria explained. 

Recent news: In an address to the Am- 
erican Association for the Advancement 
of Science, a leading military advisor to 



v C c 



the CIA and the administration an- 
nounced that the CIA hopes, in the inter- 
est of national security, to examine and 
prevent publication of technical articles.it 
feels will be of assistance to nations con- 
sidered enemies of the United States. He 
stated that advances in computer science 
in the Soviet Union are of particular 
danger, and can be traced directly to the 
free flow of information in U.S. technical 
publications. Furthermore, no reasons 
would be given for removing articles from 
publication, because such explanations 
would be security risks in themselves. I 
wonder if 80 Microcomputing authors and 
readers ever believed they were contribut- 
ing to a weakening of U.S. international 
power? ■ 

Next month: conclusion of Color Com- 
puter ROM packs, plus a special on bab- 
ble memory. 
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Fig. 5. Alternate method of using four 2732 EPROMs. It is similar to Fig. 2 in that buffer- 
ing can be eliminated since only four additional devices will be connected to the CPU. 
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Call or Write 
Your Nearest 
Snappware 
Distributor 



MICRO-80 

284 Goodwood Road 
Clarence Park 
Adelaide South Australia 
Ph-(08) 2117224 

DIGI-TEK SYSTEMS 
65 Thornridge Circle 
Kitchener Ontario N2M-4V9 
Ph-(519) 742-8205 

Strawflower Electronics 
50 North Cabrillo 
Half Moon Bay 
California 94019 
Ph-(415) 726-9128 

COMPUTER MAGIC 
115 Wiltshire Avenue 
Louisville, Kentucky 40207 
Ph-(502) 893-9334 

E-CDATA 
Tornevangsvej 88 
P.O.B. 116 
DK-3460 

Birkerod, Denmark 
Ph + 45/2/81 81 91 

System Soft 
49, Dunvegan Drive 
Rise Park 

Nottingham, England 
NG5 5Dx 
Ph-(0602) 275559 

Programs Unlimited 
20 Jericho Tpke. 
Jericho, Long Island, 
New York 11753 
PM516) 333-2266 

AEROCOMP 
Redbird Airport 
Hanger 8 

Dallas. Texas 75232 
Ph.-(214) 339-5104 



nappware 
Goes On Trial! 

You Be 
The Judge! 

Snappware knows your programming time is valuable. That's why we are 
offering a trial package that will cut your programming time up to 75%! 

This unprecedented offer allows you to judge for yourself the value of our 
software using your hardware at your convenience. Our five best selling 
products: EXTENDED BASIC, EXTENDED BUILT IN FUNCTIONS, COLLEGE 
EDUCATED GARBAGE COLLECTOR, AUTOMAP and AUTOFILE, are all 
available to you on a trial basis for only $50.00 for the Model II and 
$35.00 for the Model III. We're convinced that after you see how well our 
software helps you perform programming tasks, you will purchase them 
like thousands of others have. 

Our trial package consists of a master diskette which may be used to 
create one working copy. Your purchase price for the trial package will be 
credited toward the purchase of any software Snappware sells. 

If for any reason you are not satisfied, just return the trial diskette and 
working copy and we will refund your money, no questions asked. With 
an unconditional guarantee like this, you can't lose. 

Call our toll free number 800-543-4628 to put us on trial. We're sure your 
verdict will be: Snappware saves you time and money. 



MODEL II Trial Package $50.00 

MODEL III Trial Package $35.00 

ime saving power 
at your fingertips. 

CALL TOLL FREE: 

-800-543-4628 



OHIO RESIDENTS CALL 
COLLECT: (513) 891-4496 



i., Ohio 45236 



•^See List of Advertisers on page 402 
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MEMOREX 

FLEXIBLE DISCS 



WE WILL NOT BE UNDER- 
SOLD!! Call Free (800)235-4137 

for prices and information. Dealer 
inquiries invited and C.O.D.'s 
accepted 

visa 




PACIFIC 
EXCHANGES 

100 Foothill Blvd 
San Luis Obispo. CA 
93401 In Cal call 
(800)592-5935 or 
J805J543- 1037 

-•207 



SEND AND RECEIVE 

MORSE CODE 

•SEND UP TO 40 WPM 
•COPY OVER 100 WPM 

Your Model I or III becomes a pro- 
grammable keyboard keyer that can 
sond morse from the keyboard or 
from stored messages. Keying Is done 
either by the relay or by the audio 
output. Received morse is decoded, 
displayed, stored and printed. The 
cassette earphone plug connects to 
the receiver speaker to copy off the 
air. No hardware except patch cords 
Is required for many setups. 

satisfaction guaranteed 
Cassette with instruction booklet 
only $19.95 postpaid. Model I or III, 
LEVEL II, with at least 16k required. 

ROGO Computer Products 
4752 DeBeers Drive 
El Paso, Texas 79924 --343 



MANUFACTURING CONTROL SYSTEMS 



MICS module - Ma 



ing Inventory C< 



room control. "Reserved" parts feature. 

BOMP module- Hi 1 1 of Materials Processor 
! : or "complex product" control of inventory. 

SHOC module- Manufacturing Shop Order Control 
Order scheduling and backlog/shipment reporting. 

LABP module- Labor Collection/Performance Reptg 
Daily, weekly, and monthly labor reporting by 
employee, job and overhead accounts, and depart- 
ment and operation. Actual job costing reports. 

JCST module- Manufacturing job cost reporting 
Job status and completion reporting with perfor- 
mance to standards. Variance reporting. Overhead 
determination monthly and year-to-date. 

All modules for Models I and III, 32K minimum 
systems. Master menu driven - full operator 
prompted. Expandable to fit your growth needs. 

Model I modules from $295, Model III from $345 

Send for catalog of ELTEC business modules 

ELTECH Associates 

Specialists in manufacturing business systems 
2466 Moreno Drive, Los Angeles, Ca 0003Q 

(213) 663-0347 "344 



BUSINESS & 
PLEASURE SOFTWARE 

FOR TRS-80™toOD. I & III 

INCOME TAX ESTIMATES 8K 
No tables to look up. Pro- 
gram does it all. $19.95 

MAIL LIST (disk) 32K 22.95 

INCOME/DEDUCTIONS & 

MILEAGE FILE 8K 10.95 

STOCK CHARTING 8K 15.95 

FINANCIAL STATEMENT 16K 14.95 

7f$ "THE WIZARD'S CITY" /f^> 
A Fantasy Adventure Game 12.95 
Add $4 for disk except Mail List 
Add 51.50 shipping 

BAP$ Software .201 

6011 San Felipe 

Houston, TX 77057, 713/683-1426 

T&S-iii is a 'eg. trademark of Tandy Corp. 



MODEL I UTILITY PROGRAMS 

-Command Sequencer- editor, all 

'80 commands plus More. 
-Word Processor Patch- 17 new 
functions for RS program. 
-Tape Utility- 
-Password Utility- 
-Purge Utility- 
-System Save Utility- 
-Juke Box Program- 
-Control Key Programs- 
All programs $23 plus $2 P +H 
per order. Send for details to: 
Clockwork Software 

P.O.B. 704 

Colorado Springs, CO 

80901 



--340 



BARGAINBYTEBARGAINBYTEBARGAINBYTEBARGAIN 

rx m 

< < 

5 BARGAIN PRICE PROGRAMS 5 

m FOR TRS-80*! | 

| On tape for Model I and Model > 

X III 16K Lll. a 

m Instructions included 3 

£ • For the whole family - Solitaire g 

z Card Games: Four (excellent) 5 

g for only $15. I 

< • How Internal Combustion En- 3 
S gines Work! 2-cycle $7, 4-cycle jjj 
£ $7, Both $13. £ 
| • Get the feel of COBOL! Samp- g 
g ler for beginners (32K Disk re- * 
2 quired) $9. With book $18. 3 

uj m 

>j Satisfaction Guaranteed > 

? Not Available Anywhere Else! £ 

2 Send check or money order to: w 

£ BARGAINBYTE,™ Box 23195, 3 

£ Harahan, LA 70183 > 

CD 3> 

Z • Tandy Corp. Trademark O 

o z 

dVa31AaNIVOUVB31A9NIVO«Va31A8NIVOava31Aa 



4 MHz 



FOR THE 



MOD 3 



PC BOARD & DOC. 



ONLY $19.95 



THIS EASY TO INSTALL KIT WILL 
DOUBLE THE SPEED OF YOUR MOD 
ELIIICOMPUTER. 

COMPLETE KIT $59.95 

ASSEMBLED & TESTED $99.95 

CALL OR WRITE 
J.E.S. GRAPHICS 
P.O. BOX 2752 
TULSA. OK. 74101 

PHONE 19181 742 7104 "202 



40 INCOME TAX 

PROGRAMS 

For TRS-80 Mod. I/Ill 

On Formatted Disks 

• Run on 16K or Larger DOS systems 

• Documentation Included. 

• Must be converted for Mod. Ill 

• Various program Methods for study 

• Check inputs; if OK. print, else easy to 
correct before printing 

• Our Third Year of Tax Service 

• Try ONE disk. If OK, 40 other Tax 
Programs are available. 

FIRST DISK contains Form 1040, and 
Schedules A, B, C, D. SE and TC. 

CAT. NO. TR #1 Price $24.75 PPD 

"342 r=^ 



L^J GOOTH SOFTWARE H 

931 S. Bemiston St. Louis. Mo. 63105 



TAXES 

TRS-80 MODELS 2 &3 



A COMPLETE COORDINATED TAX 
SYSTEM THAT INCLUDES MOST USED 
FORMS AND SCHEDULES. ALL 
SCEDULES PRINTED, NO MASKS, NO 
DATA FIELD ENTERED MORE THAN 
ONCE. ALL DATA AUTOMATICALLY 
PASSED BETWEEN SCHEDULES AND 
1040. FULLY SUPPORTED ALL YEAR. 
PARTIAL OR FULL SYSTEM. SYSTEM 
CAN BE RUN FOR SINGLE OR MULTIPLE 
RETURNS. EXTREMELY FLEXIBLE. 

FULL SYSTEM - $595.00 
OTHER TRS-80 SOFTWARE AVAILABLE 

ANALYTICAL PROCESSES CORP. 

635 MAIN ST. - NASSAU BLDG. 
^^^_ P.O. BOX 1 31 3 

^^"^MONTROSE, COLO. 81 402 

H^HS 303-249-1400 
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TAX PRO 

Videotronics 

4086 Honolulu Dr. - Sarasota, FL 



33583 



Covers 



813-371-7255 

Forms 
1-2 
1 

1-2 

1 -2-3-4 
1 -2-3-4 
1-2 
1-2-3 

Complete Automatic transfer ol figures. From one form 
to another. Make corrections & watch the changes rip- 
ple down the lines to readjust all affected figures. 



1040 

A 

B 

C 

D 

4797 

SE 



Pgs. 

Pg- 

Pt. 
Pt. 

Pt. 
Pt. 
Pt. 



Calculates Taxes Automatically 



1 st year price 
any yearly edition 
Mod 1-111 



149.95 

60.00 

48 K w. cassette 



Indicate which 
comes completely documented. 
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^ SUPER'Yr^r 
ISA's DATABASE 

The only DBMS with all these features: 

• PROVEN in one year of test marketing 

• TOUGH, reliable file structure 

• MENU driven for simplicity and easy use 

• ARITHMETIC with stored calculations 

• FAST set-up and report formating 

• CLEAR user-oriented documentation 

• PRINTS totals & subtotals- mail labels 

• REFORMATS and merges data files 

• MULTI-DISK files: Up to 1 28K records 

• SORTS full disks on up to 40 fields 

• PRODUCTION input of repetitive data 

• COUPLES to word processors statistics 

• POSTS transactions to master file 

• SEARCH by strings, ranges, comparisons 

• DATA COMPRESSION: Over twice as 
many labels as the other system 

For TRS-80* Models I, II, S III - 250.00 

Ask your Dealer or Write:- 

Institute for Scientific Analysis, Inc. 

P. O. Box 7186, Dept. Ml 

Wilmington, DE 19803 (215) 358-3735 



'T.M. Tandy Corp. 



BUILD THIS DIGITAL PLOTTER 
AT HOME FOR UNDER $2000° 




FOR f l9.95 YOU GET PRO QUALITY BLUE- 
PRINTS, SCHEMATIC, PARTS LIST, ASSY. 
INSTRUCTIONS AND NECESSARY SOFT- 
WARE FOR MODEL I OR HI . 
ACCOMMODATES PAPER UP TO 18 X 24. 
ADD *9.95 FOR 10 PROGRAMS INCLUDES 
PLOTTING GRAPHS, RADII NUMBERS A 

3-D CUBE AND MORE. . w 

servo check or Money order to- ^ JJi 

P. M.W. 7741 ALABAMA AVE.U8 

CANOCA PARK, CA. 91304 



CANADIANS 



1981 PERSONAL INCOME TAX PROGRAM FOR THE 

NON PROFESSIONAL 

Do tax returns for friends and family 

Northtax 81 automatically calculates: 
Employment expense deduction maximum medical 
expense deduction, all personal exemptions, age 
exemption for those qualifying detailed tax calculation, 
dividend tax credit. Federal and Provincial tax payable. 



ndicating > 



and much more 

Directs the user on a line by line I 
amounts are filled in on the ret 
ments are required 

Written by a Chartered Accountant the program was 
tested on personal tax returns prepared in a public 
accounting office 

Available on cassette for TRS 80 Model I Level II 16K 

and Model III Disk add $5 00 

Standard Program $19 95 

Self employment Program $29 95 

Alta Sask Man residents add $b 00 

Postage and handling $2 95 

Add Provincial Sales Tax where applicable 

Indicate province of residence on December 31 1981 

To order send cheque or money order to 

SPECIALIZED SOFTWARE INC. ^347 

P.O. Box 4015 

Station "C" 

London, Ontario N5W 5G9 " TM of Tandy Corporator 



MODEL II 
PROGRAMS 



buocit monitor 

Monitoring ol multiple Dudgets User defined oOiecl 
codelbudget categories E'pendr fures. encumberencos. 
and balances on actual and percentage completion 



4n integrated package ol 30 lessons that tutors the us 
m the BASIC language ideal to- Model ll owners *ho 
msn to team BASIC ma sell paced manner J 30 00 

ROIORAK 

lum your Model ll into a roridei hie Betrieie cards on 



Send check or money order I 

Southfork Software 

68 Fairlake Drive 

Hattiesburg. MS 39401 

Specify TRSDOS I 2 or 2 Version *,r 
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STORYBOOKS OF THE FUTURE 



5prce ♦ 
wb5te rhce 



For TRS-80* Models I and III 
A Computerized Children's Storybook 

Story • Animation - Sound 
In-Context Learning Activities 

Counting - Look Nod S Shake 

Number and Letter Identification 

PLUS in the 32K Program 

Progress Report - Alphabetical & Numerical Order 

Direction Concepts 

NEW RELEASE ! ! ! 
BETTER VIEW A ZOO 

New Story • New Activities • Disk Only 

SPECIFY MODEL I OR MODEL III TAPE OR DISK 

32K Disk MODELS l/lll . . $24.95 

16K Tape MODELS l/lll . . . $19.95 

(CA Res Add 6% Tax) 

Send Check/Money Order to: 

Storybooks of the Future 

527 - 41st Avenue 

San Francisco. CA 94121 

(415)386-5184 

'TR-80 is a trademark of Tandy Corp. ^349 



SOFTWARE FOR TRS-80 
MODEL I, II & III 

* INVOICING — A/R — INVENTORY (LSC-2001) 
Update Inventory and Post Data to A/R 

File During Invoicing, Print 

Statement of Account & Commission 

MOD I & III — $399.00 MOD II — $499.00 

•INVOICING — INVENTORY (LSC-2003) 

Updates Inventory While Invoicing 
MOD II & III — $199.00 MOD II $289.00 

*A/R — STATEMENT OF ACCOUNT (LSC-2004) 

Print Statement of Account and Commission 

MOD I & III — $199.00 MOD II $289.00 

'MAILING LIST (LSC-2002) 

Print Selectively With Priority Coding. 

MOD I & III — $99.00 MOD II $189.00 

Dealer Inquiries Invited 

To Order or For More Information 

Write or Call: 

LIZCON TRADING 

2949 SOUTH 300 WEST 

SALT LAKE CITY, UT 841 15 

TEL. (801)484-8179 



VISA * MASTER CHARGE 
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1981 INDEX 

to 80 Microcomputing 

1. List All Articles 

2. Search by Title 

3. Search by Topic 

4. Search by Month 
All To Screen or Printer 

on Disk 

ONLY $19.95 

(Add $1.50 for S&H) 

(Minn, residents add 5% sales tax) 
Make Check or Money Order Payable To : 

^346 

DEKELA Computing Service 



530 E.41st. St. 



Hibbing, MN 55746 



\ferbatim 

flexible disks 

Call Free (800) 235-4137 for 

prices and information. Dealer 
inquiries invited. C.O.D. and 
charge cards accepted. 

VISA' 




PACIFIC 
EXCHANGES 

100 Foothill Blvd. 
San Luis Obispo, CA 
93401. In Cal. call 
(800) 592-5935 or 
(805) 543-1037. 

^207 
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MONEY DOS 



an operating system for financial survival 

by J.M. Keynes 



Your two year CD (Certificate of De- 
posit) just came due. Now what will 
you do with the money? If you are like 
most investors you will likely reinvest in 
another CD. And you will probably be 
throwing money away. It is tragic that you 
work so hard for your money and then ne- 
glect it so when the time comes to invest 
it. Actually, it's not all your fault. Like a 
computer we are creatures of habit which 
rely on our data bank instructions. I have 
compelling evidence for purging the men- 
tal program which says, "Roll over that CD 
or Treasury Bond." 

People tend to judge investments on 
the gross return. Twenty percent sounds 
great, but is no longer available. Even if 
one could get 20 percent, it may be an un- 
wise choice. This point is crucial to invest- 
ment decisions: The gross return of an in- 
vestment is immaterial. You cannot spend 
gross unless you are in a zero tax bracket. 
Most of you are in a 20-50 percent bracket, 
so you must deal with the real world in 
which you pay income tax. Examine the 
following carefully and you will see that 
for many investors a 4-1/8 percent current 
return is superior to a 13.5 percent current 
return because I shall deal with the only 
criteria one should apply to investment 
evaluation (assuming the risk is the 
same). . .what you can spend, net returns 
after taxes. 

There is an investment quality bond 
which matures in 15 months which is 
quoted at 80 currently. (You pay $800 for 
each bond that returns $1000 at maturity.) 
The coupon rate is a niggardly 4-1/8 per- 
cent. It pays only $41.25 per year in inter- 
est. If one examines only the gross return 
at maturity (18 months), it is of little inter- 
est. At maturity you will have received on- 
ly $61.87 in interest and $200 in a long 
term capital gain (you paid $800 and will 
receive $1000 at maturity). Total gross re- 
turn for the bond equals $61.87 plus $200 
or $261.87 while your $800 investment in 
the CD would return a gross of $162. Were 
it not for the special treatment of long 
term capital gains (holding period one 
year or more), the CD would be a better 
deal. Let's take advantage of what has 
been called 'a loophole for the rich' and 
put more after tax dollars in your pock- 



et — which you will then spend on com- 
puter toys. 

If one compares this bond with the cur- 
rent 15 month rate of 13.5 percent the 
results are dramatic, showing an advan- 
tage in favor of those in the 20 percent 
bracket. The bond's advantage increases 
geometrically with your tax bracket. 

Run the Program in Listing 1 and get a 
true picture of this investment alternative; 
$10,000 invested in the above bonds by 
one in the 50 percent bracket will return, at 
maturity, $1374.22 more after taxes than a 
15 month 13.5 percent CD. That is enough 
to buy a disk system. All for free — no more 
risk, just more money. 

Few investors are aware of this strate- 
gy. Your banker will never suggest it. That 
would be counterproductive for him. One 
must buy these bonds through a stock- 
broker. The commission on a 10 bond lot 
should not exceed $50. The broker who 
handles your order will get about 30 per- 



cent of it— big deal— not for him but for 
you. This is not exactly "big ticket" mer- 
chandise for the broker, but they will han- 
dle the transaction if you ask. There are a 
number of similar bonds available that 
mature in one to five years. Look in the 
Wall Street Journal or your local paper on 
the bond page: They will be quoted as 
follows: 

ISSUER'S NAME COUPON MATURITY YEAR 

AT&T 3.5 1983 

Look for the short term maturities and 
plug the numbers into the Listing. 

Some of my clients have asked, "Why 
are these bonds available at such advan- 
tageous prices?" They always will be 
available because they benefit those in 
higher tax brackets most. Billions of dol- 
lars from "no tax" entities like pension 
funds, retirement plans and so on are not 
bidding against you as with CDs, commer- 
cial paper, and other short term high yield 
investments. Should you invest in these 



5 REM WRITTEN BY J. MAYNARD KEYNES FOR 80 MICROCOMPUTING 

10 CLEAR: CLEAR1000: CLS 

20 A$="$$####.##" 

3000 PRINT: PRINT-AFTER TAX COMPARISION OF DISCOUNT BONDS WITH CERTIFICATE 

3010 PRINT"OF DEPOSIT OR T-BOND FOR THE SAME PERIOD. 

3020 PRINT: INPUT"TOTAL DOLLARS INVESTED" ;DI : IF DK100 ,DI=10000 

3030 INPUT "BOND PRICE IN DOLLARS (EG. 79=790) ";BP 

3040 INPUT"MONTHS LEFT TO MATURITY";MA: ML=MA/12 

3050 CG=1000-BP 

3060 XX=DI/BP 

3070 INPUT"COUPON RATE";CC: CP=CC*10*ML 

3080 INPUT'TAXPAYERS BRACKET" ;TP : TB=(100-TP)/100 

3090 INPUT'RISK FREE CD INTEREST RATE";IJ: II=(IJ/100) *ML: PRINTII 

3100 CLS: PRINT"RESULTS OF A";CC;"% BOND PURCHASED AT";: 

PRINTUSINGA$;BP;: PRINT" DUE IN";MA;"MO. 

3110 PRINT"FOR A TAXPAYER IN THE ";TP;"% BRACKET VS A CD AT ;IJ; % 

3120 PRINT: PRINT" ", "GROSS RETURN" , "AFTER TAX RETURN" 

3130 AT=CP*TB: PRINT" INTEREST" ; : PRINTG270 ,USINGA$;CP 

3140 TP=TP/100 

3150 PRINT@289,USINGA$;AT 

3160 NN=CG*.4: NM=NN*TP: NG=CG-NM 

3170 A$="$$###S.##" 

3180 PRINT"CAP. GAIN";: PRINTG334 ,USINGA$;CG 

3190 PRINT@353,USINGA$;NG 

3200 TN=NG+AT 

3210 PRINT"TOTAL NET";: PRINT0417 ,USINGA$;TN 

3220 R1=BP*II: R2=R1*TB 

3230 PRINT 

3240 PRINT"CD AT ";IJ;"% RETURNS ";: PRINTUSINGA$;R1; : 

PRINT" GROSS OR ";: PRINTUSINGA$;R2; : PRINT" NET! 

3250 DA=TN-R2: PR=(DA/R2) *100 

3260 PRINT: PRINT n EACH BOND WILL PROVIDE AN ADVANTAGE OF ";: 

PRINTUSINGA$;DA;: PRINT" OVER THE CD.": 

PRINT"OR ";PR;"% GREATER RETURN 
3270 IFDI>1THENDX=DA*XX: 

PRINT" $";DI;" INVESTED IN BONDS YIELDS";: 
PRINTUSINGA$;DX;: PRINT" MORE AFTER TAXES.": PRINT 
3280 INPUT"TO EXAMINE ANOTHER BOND PRESS 'ENTER' ";L4: GOTO3000 

Program Listing 
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bonds, you are not locked in. They are 
traded daily on the New York Stock Ex- 
change and are liquid. The bond I refer 
to must be considered safe as it is issued 
by AT&T. 

There is another way you can use these 
short term discounted bonds. If you have 
long term carry forward losses or can cre- 
ate them by swapping your existing bonds 
which have a loss for other bonds of like 
terms and quality, you may artificially 
create a one to two year tax free invest- 
ment yielding 13 percent tax free. If you 
buy a four percent coupon bond due in 
one year for $900, you will, at maturity, 
have a $100 long term tax free capital gain 
as you use carry forward losses to offset 
it. That amounts to an 11.11 percent tax 
free return on your $900 investment plus 
the $40 the bond pays in interest or $20 net 
if you are in the 50 percent bracket equals 
a total tax free return of $120 on a $900 in- 
vestment or a 13.3 percent tax free return 
with no risk. Why not use those losses to 
your advantage? This strategy sure beats 
a one year taxable certificate of deposit 
on which you net 6.5 percent. ■ 




TEACH YOUR 
CHILDREN 



ALPHA— Our best seller. Enhanced with larger letters 
and three excercises. Alphabet recognition for pre- 
schoolers. 



ALPHA II— More alphabet excercises. Find the dupl 
cate letters; letters before and after; put in alpha- 
betical order. 



SIGMA — Addition problems for grades 1-3. 



SIGMA-EX— Addition problems for the younger or 
slower learner. 



SIGMA-82— Addition, subtraction, multiplication and 
division. Nine speed levels. Time left and total time 
constantly displayed. 

SPE-L— Spelling practice for grades 2-4. 



Learning to Count Money— A THREE PROGRAM 
SYSTEM THAT TEACHES THE IMPORTANT SKILL OF 
COUNTING MONEY. SUPERIOR GRAPHICS. (SOLD 
BY THE SET ONLY.) 



Available on cassette only for TRS-80 Models I and III 
$6.95 each, two for $12.00, four for $21.00 Learning to 
Count Money— $19.95 



Add $1.00 to total order lor first class shipment. 

.-188 

H^^Bi ^b!^^ I\A Mercer Systems Inc. 

VISA~ fiSfcffS H] 87 Scooter lane 
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When your computer won't 

speak your language, 
you need a basic handbook. 

As a matter of fact, everyone who works in BASIC needs The 
BASIC Handbook. It is the definitive reference 
_i<. work on the subject of BASIC. 

The BASIC Handbook is an easy-to- 
use encyclopedia of nearly 500 words 
covering the "dialects" used by virtu- 
ally every BASIC-speaking computer 
in the world. But more than that, it's a 
simple, step-by -step guide to translat- 
ing programs from one computer 
to another. So now you can actu- 
ally use software printed in 
magazines and elsewhere, no 
matter what computer you own. 
Written ^^^ by Dr. David A. Lien, author 
of the Tandy TRS-80 Level I User's Manual and 
the Learner's Manuals for the Epson 
MX printers, this completely revised 
Second Edition contains almost twice 
as many entries as the best selling 
First Edition, making it 
by far the most up-to- 
date BASIC reference 
book you can buy. 

Extensively indexed and cross-referenced, The BASIC Hand- 
book gives you 480 pages packed with the information you need to 
be a better programmer. And if, after 30 days you don't agree it's 
indispensable, send it back. We'll return your money. 

t "^^ The BASIC Handbook is available in several 

languages and accepted throughout the 
world. No one who programs in BASIC 
should be without it. 

Available at better computer and 
bookstores, ,- N — _ x __ . -»._,_._ 

or can (800) 854-6505 

In California (714) 588-0996 

To order by mail, send check or 

money order for $19.95 (California 

residents add 6%), plus $1.65 

shipping and handling. 

Overseas orders send 

$19.95 plus $2.38 surface 

shipping and handling. 



The 

BASIC 
Handbook 




i& ^ 



LibTi s rmig 

1050-E Pioneer Way, El Cajon, California 92020 

-•365 



^See List ol Advertisers on page 402 
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%0 Medical Opinion 



by Philip R. Mills, M.D. 



"Well over half our 
patients favor computer histories. . . " 



Those of you who are old timers 
(two or more computer years old) 
know how slow sophisticated medical 
software has been in coming for the 
TRS-80 computer family. Fortunately the 
trend appears to be changing. There are 
now many available programs for the 
medical clinic including patient billing, 
patient scheduling, automated patient 
histories, drug interactions, life-expec- 
tancy predictions and personalized diet 
and menu suggestions. 

This month begins a new feature in 
80 Microcomputing— a review of software 
and hardware of particular interest to the 
medical community. 

This column is written particularly for 
two groups of Radio Shack computer 
users: 

• Physicians, dentists or administra- 
tors of small medical clinics; 

• Medical software programmers. 

Any suggestions and comments will be 
welcomed. 

Since the basis of medical diagnosis is 
the medical history, we will review two 
automated patient history packages this 
month. For non-physician readers a brief 



description of a minimal patient history 
may be helpful. A history usually contains 
three separate sections (see Fig. 1): 
History of Present Illness (HPI), Past 
Medical History (PMHx), and Review of 
Systems (RoS). 

The History of Present Illness is the 
most individualized and complex portion 
of the history. It does not lend itself well to 
"standard" questions and yes/no 
responses. At the present time, I do not 
believe it is realistic to expect a 64K micro- 
computer with eight-inch drives to 
possess the capacity to take a meaning- 
ful HPI. 

The Past Medical History is less com- 
plex, and routine questions can be asked 
with yes/no responses, but even here 
some typing by the patient (or office assis- 
tant) may be necessary for a complete 
listing of such things as prior surgical pro- 
cedures and allergies. 

The Review of Systems is ideal for a 
microcomputer program. It uses a 
repetitious set of "standard" questions 
for every new patient. Microcomputers 
may prove helpful here in many clinics. 
We use the computer to assist us in some 
hospital admission workups. Of course 
the ill and the illiterate are unable to use 



HPI: 23 y.o. right handed white male with his first episode of right elbow pain. It began two weeks ago 
after a non-traumatic but vigorous tennis match. The pain is aggravated by resisted wrist exten- 
sion and supination. It is pain free at rest. The patient denies joint pain, swelling, or redness. He 
denies any other joint involvement. 

PMHx: No prior hospitalizations or surgeries. 
No known medical allergies. 

RoS: No pertinent neurologic, cardiovascular, or genito-urinary complaints. 

Fig. 1. Sample Medical History. 



A FEW INSTRUCTIONS AND THEN WE'LL BEGIN. 

USE THE KEYBOARD TO TYPE IN YOUR ANSWERS JUST AS YOU WOULD A TYPEWRITER KEYBOARD. 

DO NOT USE THE 'SHIFT KEY', EVERYTHING IS AUTOMATICALLY ENTERED IN UPPERCASE. 

IF YOU MAKE A MISTAKE, USE THE 'BACK ARROW KEY (JUST ABOVE THE 'ENTER' TO BACKSPACE.) 

IF YOU ACCIDENTALLY HIT THE 'BREAK' KEY, JUST TYPE 'CONT' AND PRESS 'ENTER'. 

PRESS THE WHITE 'ENTER' BUTTON AFTER EACH ANSWER ONCE YOU ARE SURE IT IS CORRECT. 

Fig. 2. Instructions for the user. 



the program without assistance. We 
estimate that about 30 percent of our elec- 
tive hospital admissions are appropriate 
candidates for the computer. Patient ac- 
ceptance is mixed. Most are very im- 
pressed, while a few refuse to cooperate. 
Well over half our patients favor computer 
histories, however. 

Computer-Assisted Patient History 

One simple and inexpensive program is 
available from Medsoft, Box 7049, Tahoe 
City, CA 95730, (916) 583-3097. The price is 
$49. Written in Basic by a physician, Dr. 
Mark Spohr, it runs without modification 
on any Model I, II, or III computer under 
TRSDOS. It also runs perfectly on my 
Model I NEWDOS/80 and I expect it will 
run under any other TRSDOS like DOS. It 
requires a 48K memory, one disk drive, 
and an 80-column line printer. Although I 
tested a preliminary version for this 
review, no bugs were uncovered. It is not 
protected and is listable. 

The program begins with instructions 
to the patient. For most of our users the in- 
structions were too long. (A partial listing 
of the instructions is shown in Fig. 2). In 
our clinic we rewrote the instructions, de- 
leting the reference to the Break key (no 
one remembers it anyway), then broke the 
directions into smaller segments. 

The first portion of the history concerns 
patient identification and requires some 
typing. The patient's name, clinic number, 
birthdate, age, and so on are all entered. 
We found it best to rearrange the program 
and have our office assistant enter this in- 
formation at the start. Then if desired the 
instructions are given so that patient can 
use the program without further assis- 
tance. 

The remainder of the program requires 
little assistance. Most responses are 
yes/no and are not difficult for the average 
patient to understand. Instructions are 
continuously available on the top of the 
screen for reference (see Fig. 3). 

A defect in the program is the absence 
of provisions for a response other than 
yes/no. Occasionally a patient is unsure 
of an answer and a help response should 
be an available option. No provisions are 
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TRS-80* Model 



Hardware & 
Software 
at discount 
prices. 




RADIO SHACK 



List Price 



26-1066 Mod III. 48 K, 2-DiSk 2,495.00 

26-1062 Mod ill. 16 K 999.00 

26-1906 Invasion Force (T) 14.95 

26-1590 Super Scripset (D) 199.00 

26-1591 Scripset Dictionary (D) 149.00 

26-1569 Mod III Visicalc (01 199.00 

26-1592 Profile III Plus 199.00 



ADVENTURE INTERNATIONAL 

Star Trek 3.5 (T) 14.95 

Space Intruders (T) 14.95 

Maxi Manager (D) 99.95 

Star Fiahter (T) 24.95 



OUR PRICE 
2,100.00 
849.00 
11.95 
155.00 
119.20 
155.00 
155.00 



11.95 
11.95 
79.95 
19.95 



12.75 
12.75 
12.75 
12.75 



BIG FIVE SOFTWARE 

Robot Attack (T) 15.95 

Cosmic Fighter (T) 15.95 

Attack Force (T) 15.95 

Super Nova (T) 15.95 

(T) = Cassette Tape (D) = Disk 



We represent 20+ mfgrs with 300+ programs. Write for our FREE catalog for 
Mod II, Mod III and Color Computer. 

COMPUTER HOUSE 

P.O. Box 538 Mammoth Lakes, CA 93546 

(714) 934-6538 

Orders less than $100.00 add $1.50 tor postage and handling. Over $100 00 shipped tree 
MC & VISA accepted 

*TRS-80 is a trademark of Tandy Corp 
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Supercharge Your Micro's Performance With 




The Professional Operating System with CP/M™ Compatability 

•Sptcticulir Performance. Programs run 3 to 10 times faster compared with TRSOOS or CP/M 

Benchmark results up lo 20 times taster obtained with some applications by independent tirm 1 
• Oouble-S ided Drive Support Provides ' 25 Megabytes ot storage per 8 double sided/density disk 

irie'rrix any combination ot single or double sided drives on line 
•Expended Directories Store larger number ot tiles and more information per disk 
•Autometlc Denitty/Slde Recognition. Oetects changes in disk lormat automatically Change disks at 

anv time without compromisino data or BDOS/Read-Only" errors 
•Fast Disk Backups Cooy a complete 8 SS'OD diskette (610K) in less than 80 seconds Copy a 

double sided .'density diskette (1 25 Megabytes) in less than 1 minute 4b seconds' 
•Hard Olik Drive Support. Supports large hard disks in excess ol 1 .000 Megabyles without partitioning 
•Advanced Utilities Complete sei ot disk utilities system date ana lime functions communications 

channel interlace etc provided as standarfl teafures 
•Enhenced Automatic Print Spooling. Run multiple printers simultaneously, supporl tor multiple 

Queues ano printers is sfanrjard feature on spooling versions 
•CP/M Compatibility Virlually any CP/M (version 2 x) program will run under TURBOOOS without 

modification Also fully media compatible with standard CP/M-tormat diskettes 
•Advanced Mainframe-like features Includes readafterwnte validation of all disk update operations. 

type-ahead butters incremental disk backup utility, password/log-on security, system date and time 

functions accepts string ot multiple commands and numerous other capabilities not available under 

CP/M or IRSOOS Muiti user networkmq versions also available 

TRS-80 Model II 

and Xerox 820 versions 

Special Introductory Price 



Kmq versions also available 

«195 



Oealer and OEM inquiries invited 



Data-Rx,lnc. 



Easily adaptable to any Z80based computer 



(408) 375-2775*686 Lighthouse Avenue* Monterey, 93940 



TURBOOOS is the registered trademark ol Sollware ?000 

CP/M MP/M. and CP'NET are registered trademarks ol Digital Research 



Circuit Analysis. Linear and transient circuit analysis pro- 
grams. 10 to 15 nodes. Built-in models for transistors, op-amps, 

wavpouirt"*". PlnK fltnnlifiiHp and nh-jsf Avail-ship fnr TRS-KO flick 



BASIC 48K, CP/M and H-89 computi 

LCA (Linear Circuit Analysis) 812995 $79.95 Until 3/31/82 

TCA (Transient Circuit Analysis) $129-95 $79.95 Until 3/31/82 

TLCA (Both of the above programs) 8169-95 $99.95 Until 3/31/82 

Data Base Management for the TRS-80. 

DBM-l is designed to be sophisticated yet easy to use. Extensive 
screen prompts with cross reference to the documentation to 
make this program one of the best documented on the market. 
256 byte fields, 256 byte field names, machine language assisted 



mii i. in - mi in- n-jun i ^ti ni ami wiin utiu aiuiiuiciii ami ujiuiiiii 

totals. Available for TRS-80 with 48K and one or more disk drives. 
DBM-l S99.95 $79.95 Introductory Price Until 3/31/82 

DBM-l $19900 Purchased with LDOS 5.1 (Specify I or III) 



tlakHdUiTaii 



package and macnine language overlay loader. Create complex 
screen graphics with a few simple commands in BASIC or 
machine language. The overlay loader allows multiple machine 
language programs to be called from the disk while in BASIC. 
GRAF $5995 $39.95 Introductory Price Until 3/31/82 

Manuals available/or any of the above packages for $15. 00. 

TO Order call (505) 255-6451 weekdays between noon and 
6:00 p.m. Mountain time. Ask for a catalog. MasterCard and Visa 
accepted. Dealer inquiries invited. 



fUTEL 
'LECTRONIC co. 



MICROCOMPUTER SYSTEMS AND SUPPLIES 
146 WISCONSIN. NE • ALBUQUERQUE, NM 87108 




COMPUTERWARE 

&r products for 




* GAMES * 

• Arcade Graphics • 

Strategy Adventure • Invaders • 

Pac Attack • Storm • Magikube 

• Cave Hunter • Berserk • Maze Race* 
Calixto Island • Black Sanctum ^ 
HOME & WORK "^f Checkbook 'Finance. 
Word Processing • Color Data Organizer 

• 3D Drawing Board • Mailing List "^ 
PROGRAMMER AIDS ^ PASCAL • Editor' 

Diagnostics • Monitor • Assembler 

"^■16K+ Memory Expansion to 32K"^T 

• Supplies • Printers • Modems • 

w9 Books "^ Accessories "^T 




CASSETTE AND DISKETTE 



COMPUTERWARE 



6809 Specialists 



Depl. C • Box 668 
Encinitas. CA 92024 
(714) 436-3512 



Compulerware is a trademark ol Compute 



y'See List ol Advertisers on page 402 
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available for error correction. One psych- 
iatric question needs reworking: "Do you 
find your life— Generally unsatisfactory?" 
is followed shortly by "Do you find your 
life satisfactory?" Branching could have 
eliminated this second question when 
a "no" answer was given to the first 
question 



computer (see Fig. 5). An extensive and 
well thought out patient identification, 
social history, family history, allergy 
history, surgical history, and review of 
systems follows. Several questions were 
worded so well that I have incorporated 
them into my own personal review of 
systems. Four responses are available for 



"The Review of Systems 
is ideal for 
a microcomputer program. 



The main menu provides three options: 
Take Patient History, Store Patient 
History on Disk, Print Patient History. 

The print routine is very simple. A sam- 
ple is shown in Fig. 4. It would benefit from 
enhancements to provide page number- 
ing and pause between pages. A complete 
printout including negatives should also 
be available. 

Since all history-type programs need 
modifications to fit the end user the 
listings are well annotated and modifica- 
tion is easily accomplished. I suggest that 
all rearrangements and changes be made 
and saved; then the program compressed. 

The six-page documentation is ade- 
quate. It could have been improved by 
including suggestions for introducing 
this program to the patient by the office 
assistant. 



Automated Patient History 

A second program was written by 
Werner Slack, M.D., in 1979. It is marketed 
by Cybernetics, Inc., 8041 Newman Ave., 
#208, Huntington Beach, CA 92647, (714) 
848-1922. It requires CP/M with CBasic, a 
Model II, and an 80-column line printer. 
This program costs $175. It is much more 
sophisticated than the Basic program 
discussed above. 

This program has an interesting 
history. The questions were originally 
written in the early 70s for a mainframe 
computer. It was first made available for 
micros in 1979. Since its introduction it 
has not only been used in English, but one 
English-speaking physician in France 
rewrote the questions in French, leaving 
the printout in English! Currently a revi- 
sion is in progress to provide more exten- 
sive error trapping and other enhance- 
ments. 

It begins nicely with a short tutorial, in- 
structing the patient on how to use the 



every question and are continuously 
shown on the screen: Yes, No, Don't 
Know, and Don't Understand. 

The questions were broken up by humor 
or a health education point. Even so, this 
is a long history and takes the typical pa- 
tient 35 to 40 minutes to complete. We 
found only one mistake, which was a 
minor spelling error. 

Documentation is adequate and in- 
cludes instructions for question modifica- 
tion. This program accepts up to 1,000 
questions and can be used for diet and 
other histories. The documentation which 
I received was for an older version of the 
progam which is no longer available. It 
would have been interesting if the 
documentation had included actual clinic 
experiences with this program. I wrote to 
Cybernetics asking to contact physicians 
using the program, but at the time of this 
writing have received no reply. 



Some branching questions are used by 
this program for convenience and speed. 
For example the following question is 
asked: "Have any of your blood relatives 
had cancer, rheumatic fever, kidney 
disease, bleeding problems, or anemia?" 
If the answer is "no," no further questions 
are asked of these diseases. However if a 
"yes" response is given the program asks 
about each disease separately. This made 
the patients feel that the computer was re- 
peating its questions. One question con- 
cerning whether the patient is male or 
female is asked twice. This seems unnec- 
essary. Occasionally further branching 
would have decreased redundancy— for 
example, if the patient denies ever having 
had penicillin it seems useless to ask him 
if he is allergic to this antibiotic. Occa- 
sionally asking questions in a slightly dif- 
ferent order would also reduce the ap- 
pearance of redundancy for the patients. 
Of course, repeating the questions may 
decrease errors. 

An interesting conclusion to the ques- 
tions was an evaluation of how the patient 



PLEASE TYPE Y FOR YES OR N FOR NO THEN 


PRESS ENTER. 






DO YOU HAVE 


ANY OF 


THE FOLLOWING 


COMPLAINTS? 






CHEST, HEART, 


LUNG 




CHEST PAIN 






YORN? 






Fig. 3 


Sample 


Screen. 



CURRENT SYMPTOMS 

FAMILY HISTORY 

CANCER HEART TROUBLE 

HIGH BLOOD PRESSURE ASTHMA 

ALLERGIES MIGRAINE HEADACHES 
STOMACH OR DUODENAL ULCER 

PAST MEDICAL HISTORY 

MEASLES MUMPS 

CHICKEN POX WHOOPING COUGH 

INFLUENZA -AYFEVER 
HIVES OR ECZEMA 

ALLERGIES 

SPRING GRASSES FALL POLLENS 

SURGERY 

TONSILLECTOMY 

MEDICATIONS 

** REVIEW OF SYSTEMS** 

GENERAL 

SKIN 

HEAD, EYES, EARS, NOSE, THROAT 

NECK 

CHEST, HEART, LUNGS 

GASTROINTESTINAL 

Fig. 4. Partial Printout. 
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QUALITY AND VALUE 



1982 will find more OEM's, businesses, dealers and personal computer 
users turning to MICROTEK than ever before. 



TakWritcr-l 




80 Column Dot 
Matrix Printer 
(Formerly BYTEWRITER-1) 

The Tekwriter-1 printer is, dollar for 
dollar, the finest value in the 
industry. And we've proved it by 
comparing the Tekwriter-1 to 
the Epson MX-80. Our print speed 
is 14 lines per minute faster, our life 
expectancy is longer, the character 
sets are the same, and the 
interface, warranty and printhead 
replacement cost are all identical.* 
But the biggest difference is the 
price. The Tekwriter-1 is about 
$300 less. 

Our extensive testing has proved 
that the Tekwriter-1 interfaces 
problem-free to most parallel 
Centronics and serial (RS-232) 
computers. 

The Tekwriter-1 is tough to beat for 
performance and quality. 

'Data Source: Epson MX-80 Operation Manual 



Parallel 
Serial 



$349 
$389 



TekWritcr-2 




NEW! 80/132 Column 
Dot Matrix Printer 

The Tekwriter-2 is perfectly suited 
to personal, business or OEM 
applications. Tekwriter-2 is 
designed to accept single sheet, 
roll or pin feed paper. It has 
a 9-wire dot matrix impact 
print head which produces crisp 
characters and has underlining 
capability. The printer is 
manufactured to run extremely 
quietly even while operating at 
peak output levels. 

Tekwriter-2 is especially well suited 
to handle word processing 
applications because of its data 
buffer expansion capabilities to 25K. 
This ability makes it an efficient 
graphics generator. 

Parallel interface (Centronics 
type). Interfaces all models of 
TRS-80, Apple, and Atari 400/800, 
and most computers with 
Centronics printer interface. 



$695 



Peripherals 




Parallel/Serial Data 
Buffer Converter 

Interfaces with most computers and 
printers on the market today. 
Switch selectable parallel or serial 
input/parallel or serial output. 
Ideal for word processing and data 
communications. Data buffer 2K 
standard — expandable to 62K. 
Serial I/O BAUD rates switch 
independently selectable. 

16K Apple Memory Board 

Apple Parallel Interface 
Card 

16K-32K Atari Memory 
Boards 

Atari Parallel or Serial 
Printer Cables 

8K-T6K VIC-20 Memory 
Boards 

64K to 256K IBM Memory 
Board 



Quantity and OEM discounts avail 



Continuing our quest for excellence. 



■ '.. ..-;-.. 



TRS-80 is a trademark of Radio Shack. Inc. 
Apple II is a trademark of Apple Computer, Inc. 
Atari 400 800 are trademarks of Atari, Inc. 
Microsoft is a trademark of Microsoft Consumer 

Products, Inc. 
Z-80 is a trademark of Zilog, Inc. 
Visicalc is a trademark of Personal Software, Inc. 



^See List ol Advertisers on page 402 




MICROTEK^ 
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MICROTEK 

9514 Chesapeake Drive 
San Diego, CA 92123 
(714) 278-0633 
Outside CAcall 
Toll Free (800) 854-1081 
TWX. 910-335-1269 
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Electronic Engineers 

Electronic Hobbyists 

Electronic Students 

Ham Operators 



TRS80 •• 

MODEL I 
LEVEL II 
2 DISK 



A General DC-AC (steady state) 
Analysis of Any Circuit 

Will Analyze and Compute: 

• Node. Branch. Element. Voltages 

• Node. Branch. Element, Currents 

• Branch Power Dissipation 

• Magnitude and phase values and complete 
frequency response with graphic display 

• Modify any element in circuit lor desired 
results 



A conSolete operational 


Alter our 


manvial supplied 


BIG SUCCESS 


comparaWe/o I.B.M.'s 


with these programs. 


E.C.A.P.^Program 


we can now sell it 


" AC Analyst Program 


for only 


Al49.9\ 


$79.95 


"DC /Analysis Piogram 


FOR BOTH PROGRAMS 


/ $89.95 V 


Limited oiler — order now 



VISA OR MASTERCHARGE ACCEPTED 

Do Nul Semi c .isli in Hie Mail 

lo oidei Write 
G & L Software Enterp. " 1 85 
2304 N. 1st. Street 
Upland, CA 91786 

TRS-80™ is a trademark of the Tandy Corp. E.C.A.P. is a 
trademark ot International Business Machines, Inc. 




PACKER: Machine language program thai edits all or part 
of your Basic program to run faster, save memory, or 
ease editing. The 5 options include UNPACK -unpacks 
multiple statement lines into single statements 
maintaining logic, inserts spaces and renumbers lines. 
SHORT— deletes unnecessary words, spaces, and REM 
statements. PACK— packs lines into maximum multiple 
statement lines, including all branches. MOVE— moves 
line or blocks of lines to any new location on program. On 
2 cassettes for 16K. 32K. & 48K 
For TRS-80 Mod I or III Level II or Disk Basic . . . S29 95 
SYSTEM TAPE DUPLICATOR: Copy your SYSTEM format 
tapes. Includes verify routines. The Model III version 
allows use of both 500 and 1500 baud cassettes speeds. 

For TRS-80 Model I or III Level II S15.95 

CASSETTE LABEL MAKER A mini word processor to print 
cassette labels on a line printer. Includes 50 peel - and - 
stick labels on tractor feed paper 

For TR-80 Model I of III Level II & Printer S17.95 

PRINT TO LPRINT TO PRINT: Edits your Basic program in 
seconds to change all Prints to LPrints (except Pnnt@ or 
Print") or LPrints to Prints. Save edited version. 

For TR-80 Model I or III Level II S12.95 

FAST SORT ROUTINES: for use with Radio Shacks 
Accounts Receivable Inventory Control I. and Disk 
Mailing List Systems for Model I Level II Sorts in 
SECONDS 1 You'll be amazed at the time they can save 
Supplied on data diskette with complete instructions. 

FAST SORT for Accounts Receivable S19.95 

FAST SORT lor Inventory Control I S19.95 

FAST SORT for Disk Mailing List (specify data diskette of 

cassette for 1 drive system] S14.95 

ALL THREE ROUTINES S44.95 

Prices subject to change without notice. Call or wrile for a 
complete catalog. Dealer inquiries invited VISA and 
Mastercharge accepted Foreign order in US currency 
only Kansas residents add 3% sales tax 
On-line catalog in Wichita FORUM-80 316-682-2113 
Or call our 24 hour phone (316) 683-4811 or write: 
COTTAGE SOFTWARE , 1ft7 
614 N HARDING 
WICHITA. KANSAS 67208 
TRS 80™is a trademark of Tandy Corporation 



%0 Medical Opinion 



liked or disliked the program. Responses 
were generally positive in our clinic, 
although many older patients felt the 
questioning took too long. From these 
responses we shortened our program and 
it was more acceptable. 

The printout could be improved in 
several areas. For example, you are first 
asked if you have had a chest x-ray in the 
past year. If your reply is "no" you are then 
asked if you have ever had a chest x-ray. 
This is then printed out without any 
change in order as illustrated below: 

RESPIRATORY. 

NO TB SKIN TEST 

TB SKIN TEST NEGATIVE 

TB VACCINE INJECTIONS RECEIVED 

NO CHEST X-RAY WITHIN THE PAST YEAR 

NEVER HAD ONE 

Clearly this is inconsistent. An enhanced 
printout would note all inconsistencies 
and report them in an improved order. 

The greatest flaw in the program is its 
lack of provision to return to a question 
and make corrections once a response is 
entered. Another flaw is the inability for an 
operator to save the program to disk for 
later printing. It also is impossible to skip 
the instructions and go right to the ques- 
tions. If a mistake is made by the operator 
and the program terminated, there are no 
provisions to resume the questions at the 
point of termination. It is necessary to 



begin again. No special screen featuresof 
the Model II such as reverse video are pro- 
vided. 

The printout would benefit from 
enhancements to provide headings, page 
number and the option to pause between 
pages. The printout is all in uppercase. 
The printout did not provide an option to 
include all negative responses. 

We have found these programs to be of 
great value when we are running behind 
schedule, the waiting room is full, and 
everyone is becoming impatient. At that 
time we can get a patient busy at the com- 
puter and decrease everyone's anxiety 
level. 

Next month we will evaluate CP/M hard- 
ware and eight-inch disk drives for the 
Model l/lll as well as a patient billing 
system for these computers. ■ 



HELLO THERE!!! 

BEFORE CONTINUING. I WILL 

SHOW YOU HOW TO OPERATE THIS COMPUTER. 

FIRST, FIND THE KEY MARKED "ENTER" 

ON THE KEYBOARD AND PRESS IT. 

If correctly done the second screen display appears: 

-VERY GOOD- 
YOU CAN ANSWER "YES" TO A QUESTION 
BY PRESSING KEY NUMBER "1" AND 
THEN THE "ENTER" KEY. 
. . .TRY IT. 

Fig. 5. First Screen Display 



TITLE. . .GENERAL MEDICAL HISTORY 

FOR 
Doe, John E. 
THIS HISTORY INCLUDES ITEMS COVERED IN A COMPLETE GENERAL MEDICAL HISTORY. 
THERE IS SLIGHT QUALIFICATION OF ABNORMALITIES AND ONLY POSITIVES ARE INCLUD- 
ED IN THIS REPORT. 

CHIEF COMPLAINT. 

ON February 1, 1982, THE PATIENT TOOK A SELF-ADMINISTERED COMPUTER HISTORY. PA- 
TIENT IS A 47 YEAR OLD MALE WHO STATES HIS REASON FOR THE VISIT AS: "Annual 
Physical". 

PERSONAL AND SOCIAL HISTORY. 

A. MARRIAGE. 

NO DIVORCE OR SEPARATION. 

HAS BEEN SEPARATED 

HAS BEEN DIVORCED. 

2 CHILDREN. 

PRESENTLY MARRIED & LIVING WITH SPOUSE. 

SPOUSE IN GOOD HEALTH. 

SPOUSE DOESN'T HAVE PAYING JOB. 

B. OCCUPATION-Computer programmer. 



REVIEW OF SYSTEMS. 

A. ALLERGY (POSITIVES ELICITED BY HISTORY). 

PENICILLIN RECEIVED-NO ADVERSE REACTIONS. 

NO ADVERSE REACTIONS AFTER ASPIRIN. 

NOT CHARACTERIZED. 

NO ADVERSE REACTION TO TETANUS SHOTS. 

NO ADVERSE REACTIONS TO OTHER DRUGS. 
I. GASTROINTESTINAL. 

GALLBLADDER DISEASE, PHYSICIAN DIAGNOSED. 

FREQUENT BELCHING. 

HEMORRHOIDS. 



Fig. 6. Partial Printout. 
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-80 SPACE RAIDERS 
Starship Simulator 
and Combat Game 

This is the most realistic combat space simulation 
available for any computer system anywhere! 
Operator is placed in a rapidly moving ship looking 
out through a window into the depths ot space. 
Thousands of stars appear in the distance and part 
toward the screen edges as the ship flashes past. 
Forward and aft views available at any time. Ac- 
curate celestial navigation using both XYZ and 
spherical Coordinates! Comment from Aug '81 80 
Microcomputing: "May be the ultimate Star Trek 
type game and, possibly, the most complex micro- 
computer game ever attempted"! Fast action 
graphics never stop! 

Now available for Model III! 

$24.95 (MasterCard, VISA, check, etc.) 
includes shipping. COD OK 

Specify Model I or III, Level 2 16K 
Bosen Electronics 
445 E. 800 N. 
Spanish Fork, UT 84660 
(801)-798-9553 ^294 



Let the 

LETTER-WRITER 

e 

^WORK % for YOU 




YOU can produce forms, labels, form letters 
and Add/Subtract columns. 

Change, delete, add, insert, move, copy 
characters, lines and blocks of text. 

Set even margins, page lengths, center 

lines, get i to 99 copies, Numbered Lines 

for legal papers. 

Try the LW for 3 months. If not sat- 
isfied return it. We will Refund all but 
S3. SO to cover rent/ postage. 



T APE $23]99 DISK Model iorin$37.99 



Prices include tax/postage. Needs 16K. 
. Mod I & III 

5905 Stone Hill Dr.i FREE 
RgcUin, CA 95677 I Catalog 

1324 HRS 1(800)824-7979 

call toll-free 1(800)952-5656 in Cal. y 



■ See List ot Advertisers on page 402 




EDU-WARE EAST 

P.O. Box 336 

Maynard, MA. 01754 

617-568-8641 




^295 



MATH-PAK-1: MATH-PAK-2: MATH-PAK-3 

Interactive drill programs where you enter the answers 
digit by digit, Just like paper and pencil. With user 
selected difficulty levels, carryovers, reducing, simpli- 
fication, pointing off, scoring, games, and more. Used 
by schools everywhere. Order MATH-PAK-1 for Inte- 
gers, MATH-PAK-2 for fractions, MATH-PAK-3 for 
decimals. (L2-16K) $14.95 ea. 

HO-RK-S 
Low cost, single entry accounting system for the home 
or office. With 66 user assigned account codes, auto 
audit trail, search with totals, 32 or 48K, 1 to 4 drives, 
credit and debit summaries with 3 options, up to 9200 
entries. $24.95/cassette $29.95/dlsc 

INVENTORY + 

Why settle tor Just an Inventory listing? Get aging 
reports with 2 options, reorder, total listings with pur- 
chase dates and amounts, total costs, Items sold, oro- 
fit/loss and more. Use as a stand alone system with 
daily updates, delete, change, and file packing 
routines. (32K - 1 disc minimum) $24.95/cassette 

$29.95/disc. 

CASH REGISTER 80 

Use your TRS-80 as a point of sale terminal with 
automatic inventory lookup, pricing, update, and more. 
Print sales slips with user adjusted formats, end of 
day reports with all cash, charge, and check sales by 
salesperson. CP.80 requires INVENTORY-*-, 48K, and 
1 disc minimum (2 drives recommended). 

S24.95/cassette $29.95/disc. 



Mass residents and 5% tax. VISA, M.C., AND PHONE 
ORDERS ACCEPTED. Dealer Inquiries invited. Over- 
seas orders add $2.00 for air shipment. TRS-80 Is a 
trademark of Tandy Corp. 



Electronic 

Circuit 

Analysis 



Detailed analog circuit analysis 

Fast, machine language 

Infinite circuits on multiple passes 

Worst case analysis 

Dynamic modification 

Full file handling 

Built in chaining and spooling 

facilities 

Frequency response, magnitude and 

phase 

Complete manual with examples 

Full support 

A truly professional program with 

features previously available only on 

large systems 

TRS-80 model I or model III, disk or 

cassette. $75.00 



Tatum Labs 
P.O. Box 722 
Hawleyville, CT 06440 



TRS-80 is a trad 
of fandy Corp. 
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TANDY CORP. RADIO SHACK 

TRS-80 MOD III 

2 SS 40 TK Drives 

*1795 00 

MODEM 
1200 BAUD 

Auto Answer 

Auto Dial 

RS-232 Direct Couple 

Auto Mode 

$34900 

ft 
Dial our Bulletin Board 

1-713-995-8531 



KELSON DELPHI 

7311 Bellerive. Suite 1025 

Houston. Texas 77036-3199 

(713)995-4734 

Wt a<;o ,v M.i.wiCihI Visa. Ame^can Express, and i -.ish 

^334 
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DEALER INQUIRIES WELCOME 






"THE SOURCE" For 

^ersonai Computer Software 

Books. Games 

Accessories 



ire 1 



ObPT. C2. 1025 INDUSTRIAL DR.. BENSfcNVILLfc. IL 60106-1297 
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Copernko Mathematica 



by Bruce Douglass 



". . . algebra is the quantitative 

language of how things are, 

or how they will be, given 

a static set of conditions." 



One of the most astonishing things I 
have seen is people afraid of a little 
calculus— a little cute, baby calculus, as 
if it had claws and fangs! A calculus is ac- 
tually a very friendly creature. The fact is, 
almost everyone uses calculus in daily life. 

Algebra 

Algebra, which has been around for at 
least 2000 years, evolved to help humans 
deal with the world. 

Suppose you are a sheepherder for 100 
sheep. Each little darling eats grass from 
10 square meters per day; you need some 
idea of how much space all your sheep 
need. You must solve the problem for an 
unknown using the symbolic manipulative 
techniques of mathematics that go by the 
name of algebra. 

Specifically, algebra is the quantitative 
language of how things are, or how they 
will be, given a static (i.e. unchanging) set 
of conditions. 

Calculus is analogous. It was invented 
around 1750 independently by two mathe- 
maticians, Newton and Leibniz. A crucial 
extension of the language we call algebra, 
calculus deals with how things change. 

Take it to the Limit 

A function's limit is the value that func- 
tion approaches as its independent vari- 
able approaches another value. For exam- 
ple, take f(x) = 1/x. What is the limit of f(x) 
as x approaches infinity? That is, what 
value does f(x) approach when x gets larg- 
er and larger without limit? If you take a 
few trial values, you can easily see that 
f(x) approaches zero as x approaches in- 




Fig. 1.y = f(x). 




finity. How about the limit of f(x) as x gets 
close to 0? This is a more interesting ques- 
tion, since we all know the computer does 
not like to divide by 0. Take a few trial 
values, such as 1/2, 1/10, 1/100 and 1/400. 
What is f(x) doing all this time? That's 
right, f(x) approaches infinity as x gets 
close to zero. 

So, the limit of a function is the value it 
approaches as the independent variable 
(in our example, x) approaches some 
value. How does this help us understand 
differential calculus? 

Derive a Derivative 

Figure 1 is a graph of some function. 



The derivative (also known as the dif- 
ferential) is the slope of the line tangent to 
the function at some point. How can we 
get a tangent line? If we draw a line be- 
tween two points on the curve we have a 
secant line. Say we want to know the de- 
rivative at f(c) (the value of f(x) when x 
equals c). 

The obvious approach is to take a se- 
cant line with the value x equals c some- 
where between the two x values. If they 
are close enough, this secant line is a 
good approximation to the derivative of 
f(x) at x. If they are not close enough we 
can take two different values for x closer 





Fig. 2. Tangent line. 



Fig. 3.y = x\2. 
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INTERACTIVE CONTROL LANGUAGE 

Imagine someone smart standing by, as you work with a computer, ready 
to assist you with advice as well as to take over part of your work! This is 
what ICL does— perfect "middleman" which stands between user, DOS 
and application programs. 



ICL AT A GLANCE 



ICL monitor —DOS— like command level for execution of DOS com- 
mand, /CMD files and /ICL procedures. Fast efficient 
and convenient in use. 

Basic functions— automation of work with computer, software enhance- 
ment/customization, interfacing of different programs. 

Basic features —intelligent operation, virtual keyboard and display I/O, 
control interception. 

Language —commands, variables conditionals, literals. 

Package — 32K and 48K versions, lots of examples, 8 ready to use 

procedures, 57 page manual. Same version works with 
both models and all operating systems. 

DOS required -TRSDOS' -NEWDOS/21' -NEWDOS/80' 

Min hardware — 32K 1 drive TRS-80 Model I or Model III* . 

Price —$34.95. 



The INTERACTIVE CONTROL LANGUAGE is an entirely new software. 
It gives you unprecedented power to customize and improve your soft- 
ware and make it work the way you want it to work! ICL is so universal, 
flexible and multifunctional it becomes a necessity for every micro- 
computer user no matter what is the application— business, science, 
education or just hobby! 

Immediate delivery 
__, 58 Order now — only $34.95. manual alone — $10.00 

Add $1.50 s/h (check or money order) 



XYZT COMPUTER DIMENSIONS INC. 
2 PENN PLAZA, Suite 1500 
NEWYORK.N.Y. 10121 



Write for more information 
®— registered trademarks. 




DISK DRIVE WOES? 
PRINTER INTERACTION? 
MEMORY LOSS? 
ERRATIC OPERATION? 

Don't w, — 

Blame The 
Software! 

Power Line Spikes, Surges & Q . "^^ IS02 

Hash could be the culprit! Pat #4 ^ 9/us 

Floppies, printers, memory & processor often interact! Our 
patented ISOLATORS eliminate equipment interaction AND curb 
damaging Power Line Spikes, Surges and Hash. Guaranteed! 

• ISOLATOR (ISO-1) 3 filter isolated 3-prong sockets; integral 
Surge/Spike Suppression; 1875 W Maximum load, 1 KW load 
any socket $69.95 

• ISOLATOR (ISO-2) 2 filter isolated 3-prong socket banks; (6 
sockets total); integral Spike/Surge Suppression; 1875 W Max 
load, 1 KW either bank $69.95 

• SUPER ISOLATOR (ISO-3) similar to ISO-1 except double 
isolation & Suppression $104.95 

• SUPER ISOLATOR (ISO-1 1) similar to ISO-2 except double 
isolation & Suppression $104.95 

• MAGNUM ISOLATOR (ISO-17) 4 Quad Isolated sockets; For 
ULTRA-SENSITIVE Systems $181.95 

• CIRCUIT BREAKER, any model (Add-CB) Add $9.00 

• CKT BRKR/SWITCH/PILOT (-CBS) Add $17.00 

AT YOUR MasterCard, Visa, American Express 

DEALERS ORDER TOLL FREE 1-800-225-4876 

(except AK, HI, PR & Canada) 



/SZ Electronic Specialists, Inc. 

171 South Main Street. Natick. Mass. 01760 

Technical & Non-800: 1-617-655-1532 






Mayday IS NOW SMART 

Mayday has established itself as the best protection against 
power interruptions to most mini /micro-computers. 

Mayday now has all the features you asked for! 




• Constant voltage regulated output 

• I/O port which tells computer when AC is off 

• High.low and charge LED indicators 

• Low battery audible alarms and UPS shutdown 

• High start up capability for hard disk 

• Zero crossing DC feature that handles any 
type of computer power supply 

• New three stage sense circuit that protects 
from all types of power failure-including rapid 
inductive kickback 



§|8ll§|l§i| 



WSBHKHBSk 



tion you can afford! 



SUN RESEARCH, INC. 
BOX 210 OLD BAY ROAD 
NEW DURHAM ,NH 03855 



•See List ol Advertisers on page 402 
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to x equals c, and still have x equals c be- 
tween them. In fact, we can take the limit 
of the difference of these two points' Y 
values (i.e. f(a) and f(b» divided by the dif- 
ference (b-a). As the two points come 
closer and closer together, the value of 
the function evaluated at those points will 
come closer and closer to f(c). We can 
come infinitesimally close; when that is 
so, the slope of the line is the derivative. 
If you look at Fig. 2, you will see the 
tangent line to our function at x equals 
3.5. Directly above the tangent is a line 
almost parallel to it, intersecting the curve 
at two points. This line is the secant. As 
we take the two points of intersection 
closer and closer to the single point of in- 
tersection of the tangent line, the secant 
line becomes a better approximation of 
the tangent. If the first point is f(x), then 
the second point is f(x + h). What is the 
slope of the line between f(x) and f(x + h)? 
Remember the rule from geometry: slope 
equals rise/run. The rise is f(x + h)-f(x) 
and the run is (x + h)-x, or simply h. 
Therefore the slope is (f(x + h) - f(x))/h for 
any increment h, however small. As we 
make h smaller and smaller, the slope ap- 
proaches the derivative. Therefore: 

Lim (f(x + h) - f(x» _ df _ f'(x) 
h-0 h dx 

The expression df/dx is not a fraction. It 
means the derivative of f(x) with respect to 
x, or more simply, how much f(x) changes 
when x changes. 

Several rules ease finding derivatives, 



but they can always be found (if they exist) 
by the limit method. Unless you express 
an interest in the analytical approach (i.e. 
the method when performing operations 
by hand), I will stick with how they are 
done on the computer. 

Now, how do you find derivatives on a 
computer? Simple! You must define a few 
things in your program first: 

• The function 

• The value at which you wish to know 
the derivative 

• The increment value, h 

The short program below does this (see 
Listings 1-2). If you have Disk Basic, use 
the DEF FN capability. If you are a Level II 
user you must use a subroutine. 

You are asked for the value of x; h is 
defined as .001 times x. This makes sure 
that h is small compared to x. If, however, 
this causes an underflow (or the value of x 
is zero), then we define h to be 0.000001. 
The function is evaluated twice (with h 
added and with h subtracted) and these 
are subtracted. The difference is divided 
by2*h. 

This method is foolproof provided the 
function exists at x + h and x - h, and the 
derivative exists and is non-infinite at f(x). 

Quiz: What would it mean geometrically 
if the derivative were infinite? That's right, 
the tangent line would be vertical, and 
therefore its slope would be infinite. 

Higher Order Derivatives 

Higher order derivatives are simply 
derivatives of derivatives. We know the 



5060 
5070 
5080 
5090 
5100 
5110 



REM DERIVATIVE OF FUNCTION PROGRAM A 

REM FOR LEVEL II BASIC WITHOUT THE DEF FN 

CLS:PRINT TAB(16) ; "DERIVATIZER" 

PRINT"THE FUNCTION SHOULD BE DEFINED IN LINE 5110" 

INPUT" ENTER THE VALUE AT WHICH YOU WANT THE DERIVATIVE" ; XI 

H=.001*Xl : IF H=0 THEN H=lE-5 

X=X1+H:G0SUB 5100:Y1=Y 

X=X1-H:GOSUB5100 

D=(Yl-Y)/2/H 

PRINT"THE DERIVATIVE OF THE FUNCTION AT ";Xl;" IS ";D 

END 

Y=SIN(X) 'SAMPLE FUNCTION 

RETURN 

Program Listing 1. 



5000 REM DERIVATIVE OF FUNCTION PROGRAM A 

5010 REM FOR DISK BASIC WITH THE DEF FN CAPABILITY 

5020 DEF FNY(X)=COS(X) 'SAMPLE FUNCTION 

5030 DEF FND(X,H)=(FNY(X+H)-FNY(X-H))/2/H 'DERIVATIVE FUNCTION 

5040 CLS:PRIN? TAB(16) ; "DERIVATIZER" 

5050 PRINT"THE FUNCTION SHOULD BE DEFINED IN LINE 5020" 

5060 INPUT"ENTER THE VALUE AT WHICH YOU WANT THE DERIVATIVE" ; X 

5070 H=.001*X : IF H=0 THEN H=lE-5 

5090 PRINT"THE DERIVATIVE OF THE FUNCTION AT ";X;" IS ";FND(X,H) 

5100 END 

Program Listing 2. 



first derivative is the rate of change of f(x) 
with respect to a change in x. The second 
derivative is the rate of change of the first 
derivative with respect to x. Let's examine 
what this means. 

Since the first derivative is the slope of 
the tangent line, the derivative of a line 
would simply be the slope of that line. 
That is, if f(x) = a*x + b, then df/dx = a. We 
will shift our notation slightly and refer to 
df/dx as f'(x). The second derivative (f"(x)) 
is the rate of change of the derivative. 
Since the slope of a straight line is, by de- 
finition, a constant, the second derivative 
must be zero. That is, the rate of change 
of f(x) with respect to x never changes as x 
changes. All other functions have a non- 
zero second derivative if they have one 
at all. 

As an example of a second derivative, 
let's repeat an experiment made by Gali- 
leo. We climb to the top of a tower and 
drop an object to the ground. The position 
of the object is a function of time. How 
fast it is moving at a given time is called 
its speed. Recall that this is the first 
derivative of the position function with 
respect to time; that is, it is an answer to 
the question "How much does the posi- 
tion of the object change with a change in 
time?" 

Now, remember that gravity is an ac- 
celerating force. The longer something is 
allowed to be pulled down by gravity 
(disregarding air currents), the greater its 
speed. That means that the object's 
speed is not a constant, but depends 
upon the length of time the object has 
been falling. So, we can find the second 
derivative by taking the derivative of the 
speed with respect to time. To put it an- 
other way, we can see how much the 
speed changes with a change in time. This 
change is called acceleration. 

The parabola f(x) = xt2 has the first 
derivative f'(x) = 2*x. The slope of the 
tangent line is itself a linear function of x. 
Look at Fig. 3: I have drawn two different 
tangent lines, and as you can see, their 
slopes vary as x varies. The second deriva- 
tive turns out to be, in the case of the 
parabola, two. The third derivative is zero. 
Many functions have infinitely many 
non-zero derivatives (for example, the trig- 
onometric functions SIN(X) and COS(X)). 
But leaving that aside for now, how on 
earth do we calculate a second derivative 
of a function? 

The same way we got the first deriva- 
tive! F(x) is some function of x. If f'(x) ex- 
ists, then it is also a function of x. There- 
fore, apply our limit definition to f'(x) to 
produce f"(x). Simple? We can do this as 
often as we need or want to, provided the 
derivatives exist. I will show some ex- 
amples later that fail at some values of x. 
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There is a problem of accumulating er- 
rors in the derivatives using this finite dif- 
ference method. Each time we approxi- 
mate a derivative, any error is carried to 
any calculation that uses it, including 
finding a higher-order derivative. Error 
propagates and accumulates. 

In the calculations, remember that 



f(x) = (f(x + h)-f(x))/h. If we use another 
small increment k, we can derive the sec- 
ond derivative of f(x) as follows: 

f( X ) _ f'(x + k) - f'(x) _ f(x + h + k) - f(x + k) _ f(x + h) - f(x) 

k __h h 

k 

Since h and k are arbitrarily small incre- 



10 REM NEWTON'S ITERATION METHOD 

20 REM FOR LEVEL II BASIC WITHOUT THE DEF FN CAPABILITY 

30 DEFINT M,I:G0T0 100 

40 REM FUNCTION AND DERIVATIVE SUBROUTINE 

50 Y=C0S(X) 'SAMPLE FUNCTION 

60 RETURN 

70 X=X1+H:GOSUB50:Y1=Y:X=X1-H:GOSUB50:Y2=Y 

80 D=(Yl-Y2)/2/H 'NUMERICAL DERIVATIVE FUNCTION 

90 RETURN 

100 CLS: PRINT "THIS PROGRAM ASSUMES THAT THE FUNCTION IS DEFINED 

AT LINE 50. IT USES NUMERICAL DERIVATIVES, AS DEFINED 

IN LINE 80" 

110 PRINT: INPUT-ENTER INITIAL GUESS OF ROOT"; XI 

120 C=1E-5:INPUT"ENTER CONVERGENCE CRITERION" ;C 

130 M=20:INPUT"ENTER MAXIMUM NUMBER OF ITERATIONS" ;M 

140 REM START LOOP 

150 FOR 1=1 TO M 

160 H=.001*X1:IF H = THEN H=lE-5 

170 X=Xl:GOSUB 50: IF ABS(Y)<C THEN GOTO23 

180 GOSUB 70 

190 IF D=0 THEN D=lE-5 

200 X1=X1-Y/D 

210 NEXT I 

220 IF ABS(Y)>C THEN PRINT "CONVERGENCE NOT ACHIEVED" 

23 PRINT"NUMBER OF ITERATIONS IS ";I-1 

240 PRINT" COVERGED TO ";Xl 

250 PRINT"VARIANCE IS ";Y 

260 PRINT"DERIVATIVE AT THE ROOT IS ";D 

270 PRINT" (1) TRY AGAIN WITH A NEW X OR (2) END" 

280 A$=INKEY$:IF A$=" n THEN 280 ELSE A=VAL(A$):IF A<1 OR A>2 THEN 281 

290 IF A=l THEN 100 ELSE END 

Program Listing 3. 



10 REM NEWTON'S ITERATION METHOD #2 

20 REM FOR LEVEL II BASIC WITHOUT THE DEF FN CAPABILITY 

30 DEFINT M, I: GOTO 90 

40 REM FUNCTION AND DERIVATIVE SUBROUTINE 

50 Y=COS(X) [2 'SAMPLE FUNCTION 

60 REM ANALYTICAL DERIVATIVES HERE 

70 D=-2*COS(X)*SIN(X) 'ANALYTICAL DERIVATIVE FUNCTION 

80 RETURN 

90 CLS:PRINT"THIS PROGRAM ASSUMES THAT THE FUNCTION IS DEFINED 

AT LINE 50. IT USES NUMERICAL DERIVATIVES, AS DEFINED 

IN LINE 70" 

100 PRINT: INPUT" ENTER INITIAL GUESS OF ROOT";X 

110 C=1E-4:INPUT"ENTER CONVERGENCE CRITERION" ;C 

120 M=20:INPUT"ENTER MAXIMUM NUMBER OF ITERATIONS" ;M 

130 REM START LOOP 

140 FOR 1=1 TO M 

150 GOSUB 50: IF ABS(Y)<C THEN GOTO200 

160 IF D=0 THEN D=lE-5 

170 X=X-Y/D 'X(N)=X(N-1)-F(X(N-1) ) /F ' (X(N-l) ) 

180 NEXT I 

190 IF ABS(Y)>C THEN PRINT"CONVERGENCE NOT ACHIEVED" 

200 PRINT: PRINT"NUMBER OF ITERATIONS IS ";I-1 

210 PRINT"COVERGED TO ";X 

220 PRINT "VARIANCE IS ";Y 

230 PRINT"DERIVATIVE AT THE ROOT IS ";D 

240 PRINT" (1) TRY AGAIN WITH A NEW X OR (2) END" 

250 A$=INKEY$:IF A$="" THEN 250 ELSE A=VAL(A$):IF A<1 OR A>2 THEN 251 

260 IF A=l THEN 90 ELSE END 



Program Listing 4. 



ments, we can set h equal to k and deduce 
the following: 

tn W = f(x + 2.h) - 2.f(x + h) + t( x) 
ht2 

A similar process produces the third and 
higher order derivatives. Note that we get a 
Pascal's triangle for the coefficients with 
alternating signs. 

Problem Functions 

Take the function f(x) = 1/x, and try to find 
the derivative at x equals 0. You cannot, 
since the function itself doesn't exist. Try 
the derivative of SQR(x). SQR(O) is perfectly 
legitimate, but the derivative of this func- 
tion does not exist at x equals 0. Go ahead 
and try it. 

Now For a Use 

"Well," you might say, "So what?" 

"Well," I might reply, "we can use this 
derivative to construct a better equation 
solver!" The method is called the Newton 
(or Newton-Raphson) iteration method. 
This procedure converges much more 
rapidly than others such as the bisect 
method (provided you are sufficiently 
close to the solution). Called a quadratic 
method because the value of the error 
term decreases by a square with each 
iteration, it adds almost two digits of ac- 
curacy with each iteration. In fact, if this 
method does not converge within 20 itera- 
tions, it probably won't converge at all. 

Figures 4-5 show the outline of the 
method. In Fig. 4, we see a function 
graphed. We want to know the zero or root 
of the function (the value of x that makes 
f(x) zero, or where it crosses the x-axis is 
called the "zero"). Notice that all points 
on the curve have the coordinates (x,f(x)). 
Near the tangent line to the curve at some 
point X0, the tangent line is a good ap- 
proximation to the curve itself, although 
outside of this vicinity, it is a rather poor 
approximation. The linear function M(x) = 
f '(x)(x - xO) + f(x0) is close to what f(x) is 
around the x value XO. In fact, at XO, M(x) = 
f(x). Since these functions are approxi- 
mately the same, the zeros of these func- 
tions must also be approximately the 
same. We can use the zero of M(x) to ap- 
proximate the zero of f(x). If we let x1 be 
the zero of M(x), then x1 = xO - f(xO)/f'(xO). 
This is the value of x1 on Fig. 5. In our par- 
ticular example, the initial guess was 
x0 = 4. The next approximation is the x 
value where the tangent line. crosses the 
x-axis. Repeating the method using x1 in- 
stead of xO gives us x2. We repeat the pro- 
cedure until close enough to the solution, 
as defined by our convergence criterion. 

The type of function with which you can 
find as many derivatives as you like 
around some value XO, is called analytic 
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at XO. All functions that do not allow it at 
some point XO are called non-analytic at 
XO. Note that a function may be analytic 
everywhere but a single point (in the case 
of SQR, it is non-analytic at x equals 0), or 
a finite set of points, or everywhere. Most 
functions that we deal with on a daily 
basis are analytic, but watch out for 
singularities (points at which a function is 
undefined or is infinite). 

Since xO is approximately correct, we 
must be somewhere close to the zero of 
f(x), and x1 should be a better estimate 
than xO was. Note that we use the same 
approach— we have our line M(x) equal 
f'(x1)(x-x1) + f(x1), and find its zero, 
x2 = x1 - f(x1)/f'(x1), and so on for x3 and 
x4. X2 is a better approximation to the ac- 
tual zero than x1, and x3 is a better ap- 
proximation than x2. 

The Newton method, one of the sim- 
plest for solving equations around, has 
one of the fastest convergence rates. It is 
sometimes difficult to satisfy the require- 



ment of being sufficiently close; it may be 
necessary to resort to another method. An 
example of this type of function is shown 
in Fig. 6, f(x) = ARCTAN(x). X1 (-25.6, 
which is off the scale of the figure) is so 
far away from the actual zero (0.00) that 
when you repeat the procedure, you actu- 
ally diverge rapidly from the zero. This is 
because the trial point chosen was too far 
away. Set a ceiling on the number of itera- 
tions, or. check to see if the distance be- 
tween sucesslve terms is, indeed, becom- 
ing less. • . • 



The following short program allows you 
to solve for the zeros of equations. Four 
versions are included; you may easily con- 
figure it to your system (see Program List- 
ings 3-6). Versions 1 and 3 allow you to 
put in the analytical (as distinct from nu- 
merically calculated) derivatives, either as 
a DEF FN FP(DEFine FuNction FP)orasa 
short subroutine. Versions 2 and 4 allow 
you to numerically calculate them. If you 
have muMATH (the microsoft TRS-80 
learning tool), use it to solve for 
derivatives and then put them into the 




Fig. 4. y = xt3 + x. 
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Fig. 5. Newton Method. 
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Fig. 6. y = A ret ran (x). 



10 REM NEWTON'S ITERATION METHOD PROGRAM #3 

20 REM FOR DISK BASIC WITH DEF FN CAPABILITY 

30 DEFINT M,l' 

40 DEF FNY(X)=C0S(X) 'SAMPLE FUNCTION 

50 DEF FND(X,H)=(FNY(X+H)-FNY(X-H))/2/H 'DERIVATIVE FUNCTION 

60 CLS: PRINT "THIS PROGRAM ASSUMES THAT THE FUNCTION IS DEFINED 

AT LINE 30. IT USES NUMERICAL DERIVATIVES, AS DEFINED 

IN LINE 40" • * . •■■-...'. 

70 PRINT: INPUT n ENTER INITIAL GUESS OF R00T n ;X 

80 C=1E-5:INPUT"ENTER CONVERGENCE CRITERION" ;C 

90 M=20:INPUT"ENTER MAXIMUM NUMBER OF ITERATIONS" ;M 

100 REM START LOOP ' 

110 FOR 1=1 TO M 

120 H=.001*X:IF H = THEN H=lE-5 ,• 

130 IF ABS{FNY(X))<C THEN GOTO170 

140 X=X-FNY(X)/FND(X,H) ' 

150 NEXT I 

160 IF ABS(FNY(X) )>C THEN PRINT "CONVERGENCE NOT ACHIEVED" 

170 PRINT"NUMBER OF ITERATIONS IS "; 1-1 

180 PRINT"COVERGED TO ";X 

190 PRINT-VARIANCE IS ";FNY(X) 

200 PRINT"DERIVATIVE AT THE ROOT IS ";FND(X r H) 

210 PRINT" (1) TRY AGAIN WITH A NEW X OR (2) END" 

220 A$=INKEY$:IF A$="" THEN 220 ELSE A=VAL(A$):IF A<1 OR A>2 THEN 221 

230 IF A=l THEN 60 ELSE END " ' 

Program Listing 5. 




10 REM NEWTON'S ITERATION METHOD #4 

20 REM FOR DISK BASIC WITH DEF FN CAPABILITY 

30 REM AND ANALYTIC DERIVATIVES 

40 DEFINT M,I - * ' " 

50 DEF FNY(X)=COS(X) [2 ' 'SAMPLE FUNCTION 

60 DEF FND(X)=-2*COS(X)*SIN(X) 'ANALYTICAL DERIVATIVE FUNCTION 

70 CLS:PRINT"THIS PROGRAM ASSUMES THAT THE FUNCTION IS DEFINED 

AT LINE 30. IT USES NUMERICAL DERIVATIVES, AS DEFINED 

IN LINE 40" 

80 PRINT: INPUT"ENTER INITIAL GUESS OF R00T";X 

90 C=1E-5:INPUT"ENTER CONVERGENCE CRITERION" ;C 

100 M=20:INPUT"ENTER MAXIMUM NUMBER OF ITERATIONS" ;M 

110 REM START LOOP 

120 FOR 1=1 TOM 

130 DE=FND(X) : IF DE=0 THEN DE=lE-5 

140 IF ABS(FNY(X) )<C THEN 170 

150 X=X-FNY(X)/DE 

160 NEXT I 

165 IF ABS(FNY(X) ) >C THEN PRINT "CONVERGENCE NOT ACHEIVED" 

170 PRINT"NUMBER OF ITERATIONS IS ";I-1 

180 PRINT"COVERGED TO ";X 

190 PRINT"VARIANCE IS ";FNY(X) 

195 PRINT"THE DERIVATIVE AT THE ROOT IS ";FND(X) 

200 PRINT" (1) TRY AGAIN WITH A NEW X OR (2) END" 

210 A$=INKEY$:IF A$="" THEN 210 ELSE A=VAL(A$):IF A<1 OR A>2 THEN 211 

220 IF A=l THEN 70 ELSE END 

Program Listing 6. 
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TODAY'S just another good reason to be a subscriber to the 
CompuServe Information Service. Because TODAY is a magazine 
published free-of-charge for our customers and also offered to 
others interested in the latest developments in the growing 
videotex industry. 

TODAY includes new and current product and service . ' 
offerings on the System, technological developments at 
CompuServe and in the industry, customer profiles, features on 
information providers and announcements of special events. An 
extensive subject index appears in each issue. 

Ask for a demonstration of the 
CompuServe Information Service at a 
Radio Shack® Computer Center. Videotex 
software is available for various brands 
of personal computers. CompuServe 
Information Service, 5000 Arlington 
Centre Blvd., Columbus, =0hio 43220. • 
(614) 457-8650 ; 



CompuServe 




TECO MONITORS 

RATED BEST BUY BY 
THE COMPUTER SHOPPER 



NOW AN EVEN BETTER BUY 



B & W MONITOR HIRES 119.95 

GREEN PHOSPHOR HIRES 129.95 

GREEN PHOSPHOR ULTRARES 144.95 

TRS-80 CABLE 5.00 

5'." DISK DRIVES WITH PS & CASE .... 289.95 

FROM 

THE MAINE SOFTWARE LIBRARY 
P.O. BOX 197 
STANDISH, ME 04084 



CHECK. MO. COD (20% DEPOSIT ON COD) 
ADD $10 SHIPPING FOR MONITOR. $6 FOR 
DRIVES 

LNW-80-OWNERS 

WE HAVE SOME TERRIFIC IDEAS 
AND PRODUCTS TO MAKE THIS 
GREAT COMPUTER EVEN BET- 
TER. WRITE TO US FOR PACK- 
AGE BEFORE YOU BUILD. 
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This smart little program lets 
you talk back to big computers. 



Scripsit,™ Pencil/" 

BASIC and source 

code files. 



Continuous 
status display. 



User-friendly 
operation. 



User-defined sign -on 
and communications 
• settings. 



Transmits 

special and control 

characters. 



Handy menu 
of commands. 




other computers and a variety of bulletin board systems. COMMWHIZ 1 is so 
simple to use, you'll wonder why it hasn't been done before. Yet it offers 
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with one disk or more. And at the COMMWHIZ price of $79.95 post-paid, 
talk is cheap. (VA residents add 4% sales tax). 
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capability ot a MINI. 
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2 oi more 6"K RAM boards!. 



Add a board to give you as muc> HARD c Hop- 
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ana much MORE! 
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Basic program manually. 

Polynomials 

We now have routines and programs to 
solve for a root of some general equa- 
tions. We have not addressed the problem 
of finding all roots of an equation. In 
general, this is very difficult. An arbitrary 
function may behave erratically; our 



methods have a hard time zeroing in on all 
the zeros. But a special class of non-linear 
functions have fairly accessible zeros; 
these are the Polynomials. 

A polynomial is denoted P(N,X), where 
N is the order and X is the independent 
variable. P(N,X) is a sum of terms of the 
form An*XTN+ ... +A1*X + A0. It is a 
sum of constant coefficients (the Ai's) 



times decreasing powers of X, where the 
highest power is N and the coefficient An 
is non-zero. An example of a second order, 
polynomial is P(2,X) = 3*Xt2-1. 

P(N,X) has N roots, some of which may 
be repeated. The polynomial P(2,X) = XT2 
+ 2*X + 1 has the repeated root X= -1. 
The algorithm I describe below is Horner's 
algorithm; we will use it in a program with 
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POLYSOLVER BY BRUCE POWEL DOUGLASS 
SOLVES FOR ALL REAL ROOTS OF A POLYNOMIAL 
BY NEWTON'S ITERATION AND HORNER'S METHOD 
AND REDUCES THE ORDER OF THE EQUATION BY 
SYNTHETIC DIVISION 



'EVALUATE FUNCTION 



REM 

REM 

REM 

REM 

REM 

REM 

CLEAR 100:CLS»PRINT TAB (1 6) ; "POLYSOLVER" 

PRINT TAB(10);"BY BRUCE POWEL DOUGLASS" 

DEFINT I-N 

INPUT"ENTER THE ORDER OF THE EQUATION"; ;N 

N1=N 

DIM A(N) ,B(N) ,C(N) ,X(N) ,D(N) 

REM 

FOR I=N TO 1 STEP -1 

PRINT "ENTER THE COEFFICIENT OF X [ " ; I ; : INPUT A(I) 

NEXTI:INPUT"ENTER THE CONSTANT TERM VALUE" ;A(0) 

FOR 1=0 TO N:D(I)=A(I) :NEXT I 'SAVE ORIGINAL COEFF 

PRI NT : PRI NT : PRI NT 

PRINTTAB ( 10) ; "POLYNOMIAL TO BE SOLVED IS:" 

PRINT STRING$(63,"-") 

PRINT "F(X)=";:FOR I=N TO 1 STEP -1: PRINT A( I) ; "X [ " ; I ; " + " ; : NEXT I • PRI 
A(0) 
PRINT: PRINT 
GOTO 310 
B(N)=A(N) :FOR I=N-1 TO STEP -1 

B(I)=A(I)+B(I+1)*X 
NEXT I "NOW GET DERIVATIVES 
C(N)=B(N) :FOR I=N-1 TO 1 STEP -1 

C(I)=B(I)+C(I+1)*X 
NEXT I 
RETURN 
FOR J=l TO N1:K=0 

PRINT"ENTER INITIAL VALUE OF ROOT #";J;: INPUT X 

GOSUB 240: IF ABS(B( 0) )<lE-6 THEN 370 

IF C(1)=0 THEN C(l)=lE-4 

IF K>30 THEN 570 ELSE K=K+1 'MAX # OF ITERATIONS=30 
X=X-B(0)/C(1) :GOTO 330 
X(J)=X 
FOR 1=1 TO N 

A(I-1)=B(I) 
NEXT I:N=N-1 'REDUCE ORDER OF EQUATION 
PRINT"ROOT #";J;"=";X 
PRINT"REQUIRED ";K;" ITERATIONS" 
NEXT J 

REM NOW CORRECT FOR ROUNDOFF ERROR BY USING EACH OF 
REM THE COMPUTED ROOTS AS AN APPROXIMATION AND RESOLVING 
REM THE ORIGINAL EQUATION 
CLS:N=Nl:FOR 1=0 TO N: A( I) =D (I) :NEXTI 
FOR J=l TO N:X=X(J) 'GET COMPUTED ROOTS 

GOSUB 240 

IF ABS(B(0) )<lE-6 THEN 53 

IF C(1)=0 THEN C(l)=lE-4 

X=X-B(0)/C(1): GOTO 4 90 

X(J)=X 

PRI NT "ADJUSTED ROOT #";J;"= ";X 
NEXT J 
END 

PRINT"ROOT DID NOT CONVERGE AFTER ";K;" 
PRI NT "CONVERGED TO ";B(0) 
PRI NT "RESIDUAL VARIANCE IS ";B(0) 
PRINT" IF THE ANSWER IS ACCEPATBLE, PRESS 
A$=INKEY$:IF A$=""THEN 610 ELSE IF A$="Y" THEN 370 ELSE IF A$="N B THEN 

GOTO 610 



ITERATIONS" 

'Y' ELSE PRESS 'N' 
' THEN 370 ELSE IF 



Program Listing 7. Polysolver. 
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Just between you and us. . . 
We think we've got 

THE BEST 
TRS-80* MODEL III 
Disk System around! 
WHY? Here's three good reasons. 

1. VERSATILITY 

Our own proven, dependable drive controller board will give 
you the hardware to run almost any drive configuration you can 
imagine: 

• S'/j" and 8" drives in any combination. 

• Internal/external combinations (up to all 4 drives external). 

• Single- and dual-headed drive combinations. 

2. QUALITY 

• We chose MPI drives— the long-time leaders in the Held. 

• We construct our own disk drive installation kits of heavy 
gauge steel— no shielding problems! 

• We designed independently regulated linear power supplies- 
fast and reliable. 

3. PRICE (including installation & 90-day warranty) 

• Drive controller board and first drive $679 

• Second (internal) drive $279 

• Third drive (with cable) $359 

• Fourth drive $329 

If these sound like really good deals but you don't have the Model III 
yet, we've got the answer, 

A TRS-80 Model III, 48K, TRSDOS, 2 MPI drives $1899 

- Fully tested with 90-day warranty — 
Dollar-for-dollar, we think this is the BEST TRS-80 system you can buy 
We also slock for immediate shipment: 

MODEL III, 32K $899 

EPSON Printers, accessories & interfaces at Low, Low Prices 
We Now Accept Visa & Mastercard 

'TRS-80 iv a Trademark of Tandy Corp. 

NEW LOCATION 

PROCESS CONTROL TECHNOLOGY 

8030 Lorraine Ave., Suite 328 • Stockton, California 95210 • (209)952-6576 



Make 
Money 



Selling {%() 




microcomputing 



the only major journal for the users of the TRS-80*, a sure bet for getting the computer 
enthusiast into your store. Once through the door you can sell him anything. 

We know 80 will make you money . . . it's the only magazine for the TRS-80* users and you know how many 
of those there are. So call today and join the dealers who make money with 80. 

For information on selling 80 Microcomputing, call 603-924-9471 and speak with Ginnie Boudrieau, our 
Bulk Sales Manager. Or write to her at 80 Microcomputing, Pine Street, Peterborough, NH 03458. 

*TRS-80 is a trademark of Tandy Corp. 
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Copernica Mat hemat tea 



the Newton-Raphson iteration procedure 
to solve for all real roots of a polynomial. 
Note the reference to "real" roots. Com- 
plex roots or unstable roots may cause 
the program to fail to converge, so in the 
program below (Polysolver) I have set iter- 
ation maximums. 

Zeroing In 

In terms of the number of computa- 
tions, and in reference to accuracy of 
computation and run-speed of programs, 
it is always advisable to nest parentheses 
when evaluating polynomials. For exam- 
ple, you could compute the value of 
P(3,X) = 2*Xt3-3*Xt2 + X-2 by substi- 
tuting the value for X in each term, raising 
it to the given value, and then multiplying 
it by the constant. Finally, add ail the 
terms for the answer. An alternative ap- 
proach is to nest the equation to minimize 
the number of multiplications and arith- 
metic operations. This reduces roundoff 
error and greatly improves speed. The 
example, nested, would be: 

P(3.X)= -2 + X-(1 +X.(2 + X.(-3 + 2.X))) 

Multiply this; you will find the number of 
multiplications fewer than with the more 
obvious approach. This is especially im- 
portant on the TRS-80 where powers and 
exponents are only single precision. This 
approach enables you to work in double 
precision if you need greater accuracy. 

Nesting multiplications is called 
Horner's algorithm. In Polysolver, this is 
done by the program with the array ele- 
ments. Polysolver uses the A array to hold 
the coefficients of the polynomial being 
evaluated. The B array elements are de- 
fined by the relation B(K) = A(K) + B(K + 
1)*X, as K goes from N to zero. B(0) con- 
tains the value of the polynomial as a 
whole when the loop is iterated through 
from N to zero (step-1). That is, for a 



given value of X, running through the de- 
fining relation of the B elements is identi- 
cal to evaluating the polynomial using 
Horner's algorithm. 

Once we have used the Newton-Raph- 
son iteration to find one root (R1), we can 
define a new polynomial of degree N-1 by 
factoring out (X-R1) from P(N,X). Since R1 
is a root, (X-R1) factors out evenly, and all 
roots of the reduced polynomial are also 
factors of the original polynomial. We re- 
peat the procedure until we have N roots. 



"Complex roots or 

unstable roots 

may cause the 

program to 

fail to converge. . . " 



This gives a polynomial of degree N-1, 
Q(N-1,X)*(X-R) = P(N,X). The method used 
is called synthetic division. 

Another elegant part of this algorithm is 
that the reduced polynomial Q(N-1,X) = 
P(N,X)/(X - R) is equal to the derivative of 
P(N,X) (called P'(N,X)) at the point of evalu- 
ation. This equality, not generally true, 
holds for the point of evaluation and a 
small area around the point of evaluation. 
This is actually a faster method of com- 
puting the derivative than that given previ- 
ously. Since we need it for the Newton- 
Raphson iteration, this is a quick way to 
find the derivative. This is the C array in 
the program Polysolver: C(1) is the ele- 
ment actually containing the derivative of 
P(N,X) at the point. It is not C(0) since Q is 
a polynomial of order N-1. 



This procedure is sensitive to unstable 
roots. That is, some equations have roots 
that are "almost" complex rather than 
real; the accumulated roundoff error is 
enough that the program cannot find the 
second or third root. Round-off error fig- 
ures noticeably during the factoring. Even 
if you find N roots, they are less and less 
accurate the later you find them. Polysolv- 
er avoids this problem: It finds all roots 
and, with these roots as close guesses, 
resolves the original polynomial. Thus, 
while the error may be fairly large for the 
Nth root, it is made much more accurate 
by using the roots found in first iterations 
as an approximation to the real roots. The 
original polynomial and the Newton- 
Raphson iteration zero in on the real roots 
with greater precision. 

Polysolver (Program Listing 7) looks for 
N roots. If some roots are complex it will 
oscillate, unable to find them. After 50 iter- 
ations, it will give the value it did find, the 
number of iterations, and the option of ac- 
cepting the faulty value or inputting a new 
trial value. If it did not find the root be- 
cause of instability, it will still often ap- 
proach the root; the discrepancy may be 
eliminated during the last part of the pro- 
gram that adjusts the roots. If the roots 
are clearly complex or you are too far from 
any other real roots to find them, it allows 
you to choose another estimate. 

Use the program to solve the cubic 
equation: Xt3 + 6*Xt2 + 11 *X + 6. You 
should find roots - 1 , - 2, and - 3. As an 
example of an unstable equation, find all 
roots of XT4-3.1*Xt3- 1.53*Xt2 + 
1 2.427 *X - 9.826. All roots are real, but ac- 
cumulated roundoff error won't let you 
find them using an iterative procedure. If 
you input as the trial value for X, the pro- 
gram converges to 1.6999. If you input 
again, it converges to -2. There are two 
more real roots— can you find them?B 
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D Address change only 
U Extend subscription 
U Enter new subscription 

D 1 year $24.97 Canadian $27.97 



U Payment enclosed 

(1 extra BONUS issue 
□ Bill me later 

US funds. Foreign surface $44 
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Let us know 8 weeks in advance so that you won't miss a sin- 
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BASIC GRAPHICS 



TEXT ENHANCEMENT PACKAGE 

BTEXT 



BTEXT 

BTEXT allows the creation and use of alternate character sets 
from BASIC. BTEXT includes 15 commands which can select 
character types, create sound, scroll the screen, print inverse 
characters, and control the cursor. 

BTEXT comes with two alternate character sets built in. 
These are large and very large alphanumerics created using 
graphics blocks. Using a program included in the package, the 

user can create new charac- 

ter sets and control them " 
using BTEXT. Commands to 
produce alternate texts are 
SMALL. LARGE and TEXT 
Sound can be produced by 
using the BEEP command. 
Any of the alternate charac- 
ter sets can be made black- 
on-white using the BLACK 
command. The INVERSE 
command reverses the color __-__-_—___^____ ===:= 
of everything on the screen. 
The screen can be filled with — 

a specified character X using 

— the FILL X command. The 
user can turn the cursor on 
or off in any character set. 
The PLOT X.Y command 
moves the cursor to the des- 
ignated point on the screen. 
The screen can be scrolled 
at two speeds. FAST or SLOW. 
The WINDOW command 
allows scrolling of the screen 
only in the section designat- 
ed by user. 





B It :X I I RS-80 Model I or Model III 

(j.sm •//(•: SI 9.95 



Diskette: $22.95 



GGRGRBASIC 



GRAPHICS ENHANCEMENT PACKAGE 
FOR THE TRS-80 MODEL I AND MODEL III 

The TRS-80's Level II BASIC contains no easy to use, fast 
commands for handling graphics. GRBASIC 3.0 fills this void by 
adding a set of commands to Level II BASIC that allows line 
drawing, shape handling, circle generation, and sound genera- 
tion. Corner to corner lines are drawn in 8/ 1 00 of a second! 




All existing Level II programs are 
upward compatible with GRBASIC 
3.0. No existing BASIC commands 
are altered, and all GRBASIC com- 
mands are tokenized. GRBASIC 
includes versions of GRBASIC for 
1 6K. 32K. and 48K machines. SEDIT. 
a shape editor program, and MISSILE, 
a real-time arcade game written entire- 
ly in GRBASIC. 

If you own an original GRBASIC 
1.0. ipe will upgrade it for $5.00 if 
you return the ORIGINAL tape or 
disk to us. 

Cassette versions are NOT com- 
patible with Disk BASIC! 

GRBASIC 3.0 Cassette and Manual 

GRBASIC 3.0 Diskette and Manual . 



FEATURES OF GRBASIC 

LDRAWj Draivs or erases tines 
between sets of coordinates. Coor- 
dinates may be chained. 

SDRAW..USING...: Draivs or erases 
the designated shape, at the des- 
ignated coordinates, including 
extended space. 

CIRCLE: Draws a circle around a 
designated center with a designated 
radius, including drawing in 
extended space. 

TURN: Rotates a shape in 45 degree 
increments. 

SIZE: Sets the scaling factor for 
shape drawing. 

AUDIO: Sends modulated sound 
to speaker. 




$19.95 
$24.95 




MED SYSTEMS SOFTWARE 

P.O. BOX 3558 CHAPEL HILL, NC 2751 4 
TO ORDER, CALL 1-800-334-5470 ..„ 
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Data Acquisition 

and Control for the TRS-80* 

$180 ppd. 

The STARBUCK-8882 is a complete eight channel 
data acquisition and control system, plug 
compatible with the Model l Level II TRS-80. It 
includes 8 protected analog inputs (0-5 Vdc with 
8± 1 bit accuracy). 8 protected digital inputs. 8 
optoisolated digital outputs, and two joystick 
ports. Interrupt-driven software package allows 
simultaneous data acquisition and storage while 
using the TRS-80 tor any other purpose! 
Application manual covers home security, energy 
monitoring, weather station use. appliance 
control, graphics and games Price includes 
case, power supply, extra expansion card edge, 
connector cable, complete software package and 
detailed applications manual. Manuals only are 
available for $4.00 ppd. Model III version also 
available. To order, write: 

STARBUCK DATA CO. 

P.O. Box 24. Newton, MA 02162 



Massachusetts residents add 5% sales tax. 
"TRS-80 is a trademark of Tandy Coro 
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PROF I T FROM YOUR 
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TR9-BO 



OPTION 
INVESTING 



|F= > F*Ot3R«l"'l M«X I M I SE! 
RETURN FR0H LISTED 
STOCK OPTION 

I NVEST I IMQ 



HANDLES CALLS, PUTS, SPREADS, IN 
AND OUT; COMMISSIONS, RISK, COST 
OF MONEY, DIVIDENDS. TABLES AND 
BRAPHS. PRINTS, STORES TO DISK. 
INDEXED MANUAL A COMPLETE BUIDE 
TO OPTION INVESTING. M/C & VISA. 
*X25. SEND FOR FREE BROCHURE. 

OPTIONB-SO, BOX 47l|[] 

CONCORD, MASS 01742 

ITRADERARK TANDY CORP jTgAjgjjgK APPLE COMPUTER, INC 



PRESERVE 

• microcomputing 



SO 



BINDERS 




Keep your issues of 60 Microcomputing together, handy 

ond protected in handsome ond durable library files or 

binders. Doth styles bound in dark green leatherette 

with the magazine logo stamped in gold. 

Filesi Each file holds 6 issues, spines visible for easy ref- 
erence, $5.95 each, 3 for S17.CO. 6 for $30.00 

Binders: Each binder holds 6 issues and opens flat for 
easy reading. $7.50 each. 3 for $21.75, 6 for $42.00 

(Postage paid in USA. Foreign orders include $2.50 per 

item) 

Please state years. 1980 to 1983 

Send check or money order to: 

JESSE JONES BOX CORP. 

P.O. Box 5120 

Philadelphia, PA 19141 

Allow 4 to 6 weeks for delivery 
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IN STOCK NOW!! call for 

SPECIAL SYSTEM PRICE! 
(213)650-5754 

EXCELLONIX 



• 7180 Woodrow Wilson Dr, • 
□ Los Angeles, CA 90068 □ 



• 'T.»D»A..ofr»orcoKK«' l o. ^208 • 
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wabash 

When it conies to 

Flexible Disks, nobody 

does it better than 

Wabash. 

MasterCard, Visa Accepted. 
Call Free: (800) 235-4137 




PACIFIC 
EXCHANGES 

100 Foothill Blvd 
San Luis Obispo. CA 
93401 (InCal. call 
(805) 543-1037) 



thb publication 
is available in 
microform 




University Microfilms International 



300 North Zeeb Road 

Dept. PR. 

Ann Arbor. MI48106 

U.S.A. 



18 Bedford Row 
Dept PR. 
London, WC1R4EJ 
England 




TOTAL 
DISKETTE A 

BACKUP M 




INCLUDING UNLIMITED BACKUP 
OF MOST PROTECTED DISKS 

If your diskette software library is not com- 
pletely backed up, or, if you are wasting disk- 
ettes by making backup copies of all your 
diskettes, your problem is solved! Using 
DUMPLOAD, the total contents of your disk- 
ettes can be safely dumped to tape. The hi- 
speed tape option allows six 35 or 40 track 
diskettes to fit on one C60 casette. 

• TRS-80 Model 1 16K-48K 

• TRSDOS or NEWDOS80 Compatible 

• May be used to back-up TRSDOS, VTOS 
4.0, NEWDOS, MICRODOS, or data 
disks. (Single Density) 

— S16.95 on Cassette — $19.95 on Diskette 
Plus $1.00 handling (Indiana Res. add 4% tax) 
TOLL FREE 24 HR. ORDERING SERVICE 
1-800-525-9391 (Ext. 509) (Except Colo.) 
1-800-332-9259 (Ext. 509) (Colo. Residents) 

or Mail Check or Money Order To: 
COMPLETE COMPUTER SERVICES ^210 
8188 HEATHER DRIVE 
NEWBURGH, INDIANA 47630 
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PRIZE WINNING 

CHESS 



SFINKS 3.0 (New) 

Prize winner in Paris in the 1981 Microcomputer 
Chess Championship. Sfinks 3.0 is the fastest and 
strongest chess program ewer written! 
FEATURES: Book Openings. Chess Clock. Thinking 
on Opponent's Time. Infinite Levels of Play, and 
Ruthless Playing Ability! 

32 K cassette or disk only S 39 95 

SFINKS 1.61 

Prase winner in San Jose in the latest (1980) US 
Microcomputer Chess Championship: Sfinks 1.81 
beats Sargon II. Mychess and Gambiet 80 fcasy to 
use with many convenience features 

32 K cassette or disk now only 24 

Please specify cassette or disk ond Model I or III 

INCLUDE $2 00 SHIPPING AND HANDLING 

WILLIAM A. FINK 

P.O 80X5912 

UGHTHOUSE POIMT. FL 33074-5912 
Exceptional Dealer Diico<mf Available. 



(305) 942-5706 






Subscription. 
ProbhSm? 



80 Microcomputing does not keep 
subscription records on the premises, 
therefore calling us only adds time 
and doesn't solve the problem. 



Please send a description of the prob- 
lem and your most recent address 
label to: 

80 Microcomputing 
Subscription Dept. 
PO Box 981 
Farmingdale, NY 11737 



Thank you and enjoy your subscription 
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If You've Written a 
Topnotch Program- 
We'd Like to Publish It! 
Programs needed for BUSINESS/ 
OFFICE Applications: 
WORD PROCESSING 
PAYROLL/TAX CALCULATION 
GENERAL LEDGER/ AR-AP 
ORDER ENTRY/INVENTORY 
Start collecting your royalty 
checks soon! Write for our free 
Programmer's Kit today. 
INSTANT SOFTWARE, INC. 
Submissions Dept. ^ 2 

Peterborough, NH 03458 



JUST RELEASED BY MTS, Inc. 
The NEW 2 YEAR VERSION of 

INDEX-80 

which proved a best seller last year 
this program works! 

The NEW INDEX-80 is 

• a computerized index tor MORE than 1000 articles 

in all 1980 and 1981 Issues of 
'80 Microcomputing'™ 

• RAPIDLY SEARCHES MORE THAN 5000 
SUBJECTS/KEYWORDS 

• SEARCHES FOR SUBJECT OR KEYWORDS 

• SEARCHES FOR MULTIPLE SUBJECTS/KEYWORDS 

• SEARCHES FOR TITLE Oft AUTHOR 

• SEARCHES FOR DATE 

• ALPHABETICAL INDEX OF ALL SUBJECTS 

KEYWORDS 

SPECIFY MODEL I or III 32 K disk or 48K disk 1 9.95 
1981 Update for present INDEX-80 owners 10.95 

Shipping: Add $1.00; foreign $2.00 
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^184 

P. O. BOX 596 
NICEVILLE. Fl 32578 
1904) 897-374! 
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GET YOUR 
TRS-80 DIRECT 



FORT 
WORTH 



AUTHORIZED SALES CEMTER 

rUT-T l -'Vn _ /tun 

COMPUTERS video 



377 PLAZA, HWY 377 GHANBURY 

FORT WORTH. TX 78048 ^ 214 



AND SAVES 

Get our quote "before" you buy. 

Full manufacturers' warantee. 

Texas residents add 4% sales tax. 

817-573-4111 



TO 



COST Of CALL REFUNDED FOR ORDERS BY TELEPHONE 
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If You've Written an 
Outstanding Program- 
We'd Like to Publish It! 

We're looking for EDUCATION 

Programs: 

SPECIAL EDUCATION/AID 

TO THE HANDICAPPED 

MULTI-MEDIA COMPUTER INSTRUCTION 

TEACHER-AUTHORING LANGUAGES 

MANAGEMENT TRAINING 

SIMULATIONS 

Earn money while helping others. 
Write for our free Programmer's 
Kit today! 

INSTANT SOFTWARE, INC. s 2 

Submissions Dept. 

Peterborough. NH 03458 



lynx.© 

TRS-80 
Modem 




LYNX features. 

• Compatible wiihcoth Model Lan 

• No separate pu'cnases required 

• One-year warranty 

• Autodial /auto answer. 

• WoiKSv.ithanysoM.va'e,inclu0ingST-80byMicklus 

• Active clear, o-ea< ana "Control" keys. 

• Hall or full duplex, variable word length, panly anri 

stop bits 

• Dial Ircm phone koyboa.'d Of memory. 

• WotXs with or without Modeim RS-232card 

• Can be placed or- oiihc S'Oe of Model III 

• No tools recceox install. 



POSTPAID 

$239.88 

Order No. 8-3A1 

ffiES 



HIGH TECHNOLOGY AT AFFORDABLE PRICES 



LA& 



TOOBDER 
CALL TOLL FRE£ 
1 800 218 3900 

in Hcbruka 
12 Johnson Street. Milford NH 03055 1 800 «*(t«787 
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THE ULTIMATE CHECKBOOK 

The Ultimate Checkbook is designed to help the individual keep 
track ot checks, tax deductions, and deposits as well as provide tor 
fast and easy checkbook balancing and bank reconciliation. How- 
ever, its versatility is such that it can be used effectively as a 
"Mini-Ledger" for many small businesses. 

FEATURES: 

• Menu driven for easy use '■ 

• Checks can be entered, edited, and deleted quickly 

• In-memory check capacity of approximately 400 checks 

• Check listings on screen or your printer 

• Running balance displayed when posting checks 

• Defaults for check numbers and date to speed data entry 

• Check-by-check balance displayed or printed 

• Search routine finds checks quickly and easily 

• Fast MACHINE LANGUAGE, multi-key sort 

• Totals checks and deposits by deduction, budget, or deposit 
categories 

System Requirements: TRS-80 Models I & III with 48K, DOS & 
Printer (Optional). Please indicate model when ordering. $39.95. 
Please add $2 for handling and postage; $5 overseas; for your 
convenience you may phone in VISA or M/C orders. 

StoFTWAREHOUSE INTERNATIONAL 

We've Moved! P.O. Box 1383 >.» Tandy Corp. 

Clovis, CA 93613; (209) 251-7877 

In Australia: Computer Campus; Kent Town, S.A. 5087 

Phone: 08.42 4826 











If You've Written an 
Extraordinary Program- 
We'd Like to Publish It! 
Programs needed for MANAGE- 
MENT applications: 
PERT & CPM SCHEDULING 
PREDICTIVE MODELING 
DECISION-MAKING SIMULATIONS 
PRODUCTION SCHEDULING 
EXPENSE ANALYSES 
Royalty checks may be in YOUR 
future. Write for our free Pro- 
grammer's Kit today. 
INSTANT SOFTWARE, INC. *"2 
Submissions Dept. 
Peterborough, NH 03458 



TAjiSSS' 8 ' 



PROFESSIONAL 

FEDERAL INCOME TAX 

PROGRAMS 



For TRS-80 Model 
Drives and 32K 



Model 



Reqi 



Di 



• Determines Least Tax Quickly 

• Essential Information Relayed between Forms _ 
Automatically— Avoids Duplicating Entries 

• Uses IRS prescribed Computer Generated Prmt-outs 

• Prohibits Bypassing of Mandatory Entries 

• Accuracy Assured by Triple Check Logic 

• Enter only Pertinent Lines— Much Faster than Line 
by Line Entry 

• Smgle Line Correction with Automatic Update of 
Succeeding Totals 

Basic Package 1040. 1040A. Schedules A. B 

Ail (or $100.00 Additional Schedules S25.00 each 

Single Schedules may be purchased separately 

Send $2 50 lor Full Description and Samples 

(applied to purchase once] 

HE MICRO-TAX 

P.O. Box 4262, Mountain View, CA 94040 

Call: (415) 964-2843 ^ 339 



TRS-80 I 

COMPUTER 
DISCOUNTS 



• Factory Direct 

• Best Prices Anywhere 

• No Out-of-State Taxes 

• Full Radio Shack Warranty 

• Free Price List 

SCOTT TASSO 

Owner 

Radio Shack Associate Store #7053 

175 N. Delsea Drive -510 
Vineland, N.J. 08360 
(609) 691-7100 



-See List of Advertisers on page 402 
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EDUCATION gQ 

by Earl R. Savage C/^^ 



"You will lose the time of day, 
but that is seldom needed." 



School computer facilities vary from 
individual classrooms to libraries to 
full-blown laboratories and most of them 
have accumulated a game or two. The up- 
shot is that game-playing can get out of 
hand. Teachers need a method to put 
limits on this recreation. 

The "time-limiting" methods outlined 
here are rather simple but give you im- 
mediate control. They also serve as points 
of departure for developing more ad- 
vanced techniques. Keep in mind, these 
methods can be applied to all instruc- 
tional programs when time is a factor. 
This column deals with programs written 
in Basic. However, these techniques are 
readily adaptable to programs in other 
languages. 

When writing programs you can incor- 
porate these time-limiting procedures. 
With equal ease, you can insert time- 
limiting into programs currently in use. 

Time's Up! 

The simplest approach is to set up a 
counter/checker operation. First, locate a 
portion of the program through which ex- 
ecution must pass repeatedly as the 
game is played. Then, insert the following 
statement: ST = ST+ 1:IFST = xxPRINT 
"SORRY, TIME IS UP!":END. Replace xx 
with an appropriate number. It may be 
large or small depending upon how fre- 
quently the statement is executed and 
how long you wish to allow the game to be 
played. When the counter (ST) reaches xx, 
the program ends. 

So far, so good. The game ends at the 
selected time. There is nothing, however, 
to prevent the student from rerunning the 
program immediately. Here you can get a 
bit sneaky. Change the previous state- 
ment to read: ... IS UP!:POKEyy,222:END. 
At the beginning of the program, insert: 



IFPEEK(yy| = 222PRINT 
"NOT AGAIN!":END 



Now 222 is POKEd into a memory loca- 
tion just before the program stops. When 
the student tries to run the program again, 
it checks that same location for 222. If 222 



is found, the program ends before the 
game gets started. The unsophisticated 
student will be stymied. 

In this example, yy represents an ar- 
bitrary location near the top of memory. 
You might use 32700, minus 3 or whatever 
is appropriate for your machine. Note, the 
POKEd number, 222, is also arbitrary. You 
may use any number unlikely to be there 
accidentally (avoid and 255). 

While this method will work in any pro- 
gram, there is another you can use if your 
computer has a real-time clock. You will 
lose the time of day but that is seldom 
needed. Consider the following Model III 
statements: 



4 POKE 16921, 5 : POKE 16920, 1 



162 IF PEEK (16920) >8PRINT 
"SORRY, TIME IS UP!": END 



When line 4 is executed, the real-time 
clock is reset to the hour of five and the 
minute of zero. Line 162 (which should be 
in a frequently executed portion of the 
program) checks the time and, if it is over 
eight minutes, ends the program. 

That action terminates the game at the 
time you choose, but what prevents a 
rerun? Well, did you wonder why the clock 
was set to the unlikely hour of 5 am in line 
4? Consider this line: 

3 IF PEEK (16921) = 5 PRINT "NOT AGAIN!" 
: END 

Any student attempting to rerun the 
program within an hour is thwarted. 

Note, both of these techniques prevent 
the student from running other programs 
containing the same statements. If this is 
not your wish, simply vary the 222 (or its 
memory location) or the 5 am from pro- 
gram to program. 

These techniques may be effective for 
your students depending upon their level 
of programming proficiency. You can be 
less obvious by spreading the parts 
around in the program and using a few 



GOTO's and GOSUB's to connect them. 

If you have a favorite method of limiting 
game-playing, write me about it. We'll try 
to share them all with other readers. 

TRSDOS 

I suppose that TRSDOS is used in more 
TRS-80's than any other disk operating 
system. TRSDOS does a great job. 
However, there is one annoying problem 
on Model III TRSDOS 1.2 and 1.3. The 
trouble arises when you call up the direc- 
tory of a disk with more than 1 1 programs 
on it. Later versions of Model I TRSDOS 
display the directory a page at a time. On 
the Model III, the directory goes on to the 
end, scrolling the first programs right off 
the screen. 

There is no published patch (so far) to 
cause a slower or page-by-page display of 
the directory. Until there is one, here are a 
couple of ways around the problem. 

First, you can flip on the printer and 
make a printout of the entire directory. 
This overcomes the problem but uses a lot 
of paper for those occasions when all you 
want is to check on the spelling of a file- 
name or find a program in a pile of disks. 
You can also enter Basic and call the 
directory (CMD"D:0). 

The remaining solution is to develop 
your reflexes: Press Break just before the 
directory begins to scroll. In this way, you 
can examine eight to 12 entries. 

These stop-gap measures are inconve- 
nient, to say the least. If you have 
developed a patch, let us spread the word 
and make a lot of folks happier. 

"Will it Sell?" 

Everyone who has learned to program 
has had at least one fantasy about strik- 
ing it rich with the fruit of his labor. Our 
more proficient students often ask "Do 
you think this program would sell?" It is 
sometimes difficult to arrive at a realistic 
answer. Here are a few factors you should 
ponder. 

The prime consideration should be 
whether the program does something that 
others do not do, or if it does its job better 
than others like it. Familiarity with the 
marketplace enables you to pass this hur- 
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die and can come from reading ads to 
keep track of what is available. 

Objective and accurate estimation of 
the commercial potential of a program is a 
tough job. Yet, this must be done to avoid 
losing an opportunity or an investment. 
The situation is the same whether you 
plan to place the program with a software 
house or to produce and market it inde- 
pendently. (Now, that's an interesting 
decision, too.) 

There is a lot of work involved in prepar- 
ing a program for commercial considera- 
tion. First and foremost, your program 
must be absolutely bug-free. Not only 
must it run with any reasonable user in- 
put, but it must not crash with 
unreasonable input. This means exten- 
sive and effective error-trapping. 

The program must execute quickly and 
efficiently. This is determined, within any 
given language, by the design and organi- 
zation of the program statements. Effi- 
ciency does count. 

Another area is often overlooked or 
given only perfunctory attention by ama- 
teurs. Every program submitted to a pub- 
lisher should be accompanied by two 
documentations. 

The first set is written for the publisher 
considering your submission. Program 
documentation ordinarily includes a 
listing, a variables list and an outline of 
the program organization if this is not 
clear from remarks in the listing. 

The second set of documentation is 
written for the user. It includes a state- 
ment of what the program does, sugges- 
tions for its use, and any information the 
buyer needs to use it effectively. Emulate 
good documentation in programs you 
have purchased. 

There are sources of more detailed in- 
formation on the preparation and submis- 
sion of programs to software publishing 
houses. One such is a free package from 
the Submission Department, Instant Soft- 
ware, Inc., Peterborough, NH 03458. 

In addition, a new monthly publication 
shows promise. Programmer (Box 3210, 
Manchester, NH 03105) covers such 
topics as what types of programs various 
companies are seeking, and how to make 
submissions. 

There is one caveat: This field, like all 
others, contains its share of crooks. When 
choosing your potential publishers, stick 
with respected, established houses- 
stay off side streets. 

If you and your students come up with a 
really good program, don't hide your light 
under a bushel. Check into the marketing 
possibilities. You may make a buck to 
help pay expenses! ■ 



DIGITAL DEXTERITY 
FOR YOUR *TRS-80. 




Advanced Operating Systems provides you with the. means to explore 

the inner and outer limits of your TRS-80 microcomputer. With these 

five programs from Advanced Operating Systems you can become a 

computer-keyboard virtuoso. 
tLDOS, DISK OPERATING SYSTEM 

With the proper hardware, LDOS supports up to eight double- 
sided, double-density, 80 track drives and accommodates both 5 1 /»" 
and 8" hard or floppy disks. Major advantages of LDOS include the 
ability to mix 35, 40, or 80 track drives on the same cable and the 
ability to combine various logical record lengths. The LDOS system 
comes with a complete 200-plus-page user's manual. Disk only for 

Model I or Model III. 

MACRO-MONITOR ... THE SHADOW 

What secrets lurk deep within the heart of your microprocessor? Only 

THE SHADOW knows. This powerful machine language program 

disassembles and displays program instructions from any part of your 

computer memory. THE SHADOW allows you to single-step through 

your Model I or Model III ROM. Available for Model I tape or disk; 

Model III disk. 

SUPERKEYS 

With this utility program, commonly used BASIC functions, statements, 

and whole lines can be entered with a single keystroke. Any of 255 

different keyboard characters can be used. SUPERKEYS also offers a 

"relocate" feature which allows for single-line relocation and 

renumbering. Disk for Model III only. 

AOS UTILITIES 1 
1 (CONTAINS 2 UTILITY PROGRAMS) 

VARKEEP is a variable-passing utility which can SAVE variable values 

and pass them to other BASIC programs, allowing you to perform true 

program chaining. SCREENPACKER is a powerful graphics utility which 

allows you to "draw" images, produce large-graphic letters, and SAVE 

them on disk. Model I and Model III disk only. 

DOSPLUS— DISK OPERATING SYSTEM 

DOSPLUS offers you greater speed with its ability to chain functions 
and accommodate various logical record lengths. Available for Model I 

single or double density, and for Model III 

Now available at your local software retailer, or call 

;58 to order. (Indiana residents, call (219) 879-4693.) 

MasterCard and VISA accepted. 

ADVANCED 

OPERATING 

SYSTEMS 

450 St. John Road 
Michigan City, IN 46360 
(219)879-4693 



*TRS-80 is a registered trademark of Radio Shack, a division of Tandy Corp 
tLDOS is a trademark of Logical Systems, Inc. 
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SO NEWS 



edited by John P. Mello Jr. 



Wraps off Tandy's 16-bit micro 

New Pocket Computer and graphics package also unveiled 



by G. Michael Vose 

80 Micro Technical Editor 

Obviously undeterred by the entry o 
IBM into the personal computer der- 
by, Radio Shack announced its own 16-bit 
computer January 19 at a press confer- 
ence held at One Tandy Center in Fort 
Worth. The new computer, called the 
TRS-80 Model 16, is aimed at the burgeon- 
ing business computer market and, with a 
price tag of $4,999, offers minicomputer 
power at a microcomputer price. 

At the same press conference, the com- 
pany also announced a new TRS-80 Pock- 
et Computer, a Model Ill-like computer ter- 
minal, a high resolution graphics package 
for the Model II, and an upgrade kit that 
turns the Model II into a Model 16. 

The New Model 16 

Radio Shack's new machine is based 
on the Motorola MC68000 16-bit micro- 
processor. The MC68000 addresses either 
one of two memory configurations— in a 
standard 128K, or an optional 512K. In ad- 
dition, the machine contains a Z80 micro- 
processor with its own 64K of memory. 
The Z80 handles all input/output opera- 
tions for the MC68000 and will also be 
available for running existing Model II 
software. 

The Model 16's white cabinet is similar 
to that of the existing Model II. The 
detachable keyboard features black and 
white keys in contrast to the Model ll's 
black and grey keyboard. Also featured is 
a green phosphor screen housing two 
trim-line, double-sided, double-density 
eight-inch disk drives. Additional drives 
can be accommodated including the Ra- 
dio Shack 8.4 megabyte hard-disk unit. 

The Model 16 operating system looks 
like, and is upwardly compatible with, the 
current Model II TRSDOS. A single com- 
mand signals the computer to function in 
either the 68000 or the Z80 mode. The op- 
erating system, still unnamed as of late 




January, features Editor/Assembler, De- 
bug, Cross referencer and linking loader 
programs. RS Cobol will be available 
within weeks of the April availability date 
of the Model 16, and compiler and inter- 
preter versions of Basic plus compiled 
Fortran will be available within the year. 

Multitasking will be available in June 
according to Radio Shack. The Model 16 
can then be operated by three users 
simultaneously, two using the new $699 
Model Ill-like terminals. The new terminal 
will be called the Radio Shack DT-1. 

Model II owners will be able to upgrade 
their computers to the Model 16 con- 
figuration for $1 ,499. The upgrade must be 
performed at an authorized Radio Shack 
service center and will be subject to the 
following restrictions: the white on black 
screen will be retained; the on-board disk 
drive will be retained; and the memory will 
be restricted to 256K. 
The Model 16 operating system is in- 



cluded as part of the upgrade package. 

The TRS-80 Pocket Computer I! 

The new Pocket Computer debuting in 
April features a true 8-bit processor in 
contrast to the current PC's piggy-backed 
four-bit processors. Selling for $279, the 
PC-II is made, like its predecessor, by the 
Japanese OEM Sharp. Radio Shack plans 
an RS-232 interface for the PC-II later in 
the year leaving open the possibility that 
the PC-II will be able to communicate 
with other TRS-80 computers. 



Model II Graphics 

To enhance the graphic capability of 
the Model II, Radio Shack has also an- 
nounced a $499 high-resolution graphics 
package. Details on this package and 
some of the other new products were 
sketchy as 80 Micro went to press. Look 
for more details in an upcoming issue. ■ 
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Looking for a Spelling Checker? 
Get more than just a spelling checker — get 

HexspeLL z 

the EVERYTHING checker 



f*£SS: (L) LEARN HORO (R) REPLACE WORD (S) SKIP WORD 
UORD IN ERROR! nisstake 



This is ari exanple of a text being checked in 
HEXSPELL. The text scrolls up the screen as it is checked. 
ttven an error is detected, sou have three choices. 

1) REPLACE the incorrect word. The replacement word 
is INSTANTLY RE-CHECKED for correctness, then inserted in the 
text. 

2) The nord is correct, leave it as it is. 

3) Tell HEXSPELL to LEARN this word for future 
reference, with just one keystroke. 

Hexspell requires just one step to check and 
correct a text, and learn new words. Your docunent is reads to 
prin t as soon as Hexspell is finished. A word that is in error 
e.9.|«isstake],i5 highlighted in the text for eass correction. 



Hexagon Systems is proud lo announce another first in text checking — an everything 
checker Hexspell 2 checks not only dictionary words, but learns and checks codes, for- 
mulae and numbers which are so essential in many commercial and technical documents 
With Hexspell 2 you define what characters make up a word, then teach Hexspell the new 
■ words' ' it needs to check your text This advanced system builds on the unique features of 
the original Hexspell (the first TRS-80 spelling checker) Hexspell 2 features a one-step in- 
teractive process, a word list that adapts itself lo your word usage, a 2b. 000 word imr 
word list and more than three years ol research and experience. 



Hexspell 2 upgrade for registered owners of Hexspell Vers. 1 — 
S35 from Hexagon Systems or your nearest dealer. 

Hexspell requires a TRS-80 Mod I or Mod U with ? drives and 48K 



US $99 



HeXAGON 



P.O. Box 397, Station A 
Vancouver, B.C. Canada V6C 2N2 
Telephone (604) 682-7646 
Micronet 70235,1376 

■^46 
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EARLY 

math 
skills 



V 



By Cleo Hughes 

What better way to encourage learning than to combine 
it with the things a child loves most about computers: 
graphics and sound? The BRIGHT & EARLY series makes 
learning fun by rewarding accomplishment with video 
entertainment. Designed for ages six and older, the 
math skills package contains five programs: 
"Add-a-pet" (Addition) , "The Big Boom" (Subtraction) > 
"Spaceman Math" (Multiplication) , "Moon Lander" (Div- 
ision) , and "Basic Math" (Flash card review) . 

More correct answers bring greater rewards, including 
rocket launches, volcano eruptions, freeing imprisoned 
astronauts, etc. A side benefit is introducing the 
use ot a computer. Available on 16K tape for models I 
and III for only S13.95. 

MAIL ORDERS: Include $2.00 shipping & handling (DC. residents add 6% sales tax). 
CHARGE CARD CUSTOMERS: Call (202) 544-6674 for fastest service. 



THE LIBERTY SOFTWARE O) 



635 Independence Avenue, S.E. 
Washington, D.C. 20003 

'2 (202) 544-6674 
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TRS-80;s and 
Hewlett-Packards 

Best Discounts Possible 

WE PAY SHIPPING in the 48 continental states on prepaid 

orders of $100.00 or more. 
NO TAXES are collected on out-of-state shipments. 
WE ACCEPT Visa, MasterCard and American Express, or you 

can save additional money by paying cash. 



Pan American Electronics 



TOLL FREE ORDER NUMBER 800/531-7466 

1117 Conway • Dept. 36 • Mission, Texas 78572 
Phone 512/581-2766 • Telex Number 767339 

FORT WORTH BRANCH 

2912 N. Main • Dept. 36 • Ft. Worth, Texas 76106 
Phone 817/625-6333 • Telex Number 794836 




TM - Trade 



irk of Tandy Corporation 



-See Lis! ol Advertisers on page 402 
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SINEWS 



Meters trashed for game change 



by John P. Mello Jr. 

80 Micro News Editor 



A recent rash of petty thefts linked to the lure of electronic games 
in a major New England city appears to be an aberration rather 
than a rule on the national scene. 



During the last four months of 1981 
more than 50 juveniles were arrested in 
Providence, Rl, for jimmying parking 
meters to get change to play electronic 
games. But an informal survey of big city 
police departments conducted by 80 Mi- 
cro revealed Providence's bane was not 
shared by other major U.S. cities. 

James Higgins, a lieutenant with the 
Providence Police Department's Juvenile 
Division, explained in a telephone inter- 
view the epidemic of parking meter rob- 
beries piqued the curiosity of police. They 
began questioning juveniles on why they 
broke into the meters, and the answer be- 
came repetitious: to get change to feed 
their electronic "jones." 

Although several juvenile gangs were 
involved in the thefts, Higgins said, "there 



were a lot of individual efforts, too." 

In neighboring Cranston, Rl, homes 
have been burglarized by teenagers seek- 
ing money for the games. "We have had 
several instances where juveniles have 
told investigators that's what they'd done 
with the money," Police Chief Anthony 
Moretti said in a telephone interview. 

But in Chicago, Los Angeles, Houston, 
New York, Detroit, Boston, Miami, and 
New Orleans, police said juvenile crimes 
linked to electronic games was not a 
significant problem in their cities. 

"We really haven't compiled any statis- 
tics that crimes are taking place specifi- 
cally for that purpose (playing electronic 
games)," a spokesperson for the Chicago 
Police Department's Youth Division said. 

He added game rooms were kept to a 



minimum in the Windy City. "You have to 
have a special license to have a game 
room," he noted. "They are not easy to ob- 
tain in the city of Chicago." 

"We don't have any research, to my 
knowledge, of kids committing thefts to 
play the games," observed Patricia Ann 
Adams, a detective with the Juvenile 
Division of the Los Angeles Police 
Department. 

"However," she said, "in our experi- 
ence, where there are a lot of electronic 
game arcades and pinball arcades, since 
they do attract juveniles, other crimes 
related to kids occur there. For instance, 
narcotics sales to children and adults 
picking up children for sexual purposes." 

She added, "The same thing would be 
true of parks and other amusement areas 
—places where children congregate. It 
certainly has nothing to do with the elec- 
tronic games per se." 

"Nothing of significance has come to 
our attention," said Paul Michna, a cap- 
tain with the Juvenile Division of the 
Houston Police Department. 

Continued 







V X KKoW IT'S GREAT FoB.THei£ HArt>/£Yfe CoofWMioM... ^ 
1W6IP BPMJ[PgaU1Y Coor>i[^tjo^ THAT CoMC£PM<$ ME.-.' 



-1981 Washington Post Company. Reprinted with permission. 
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TRASHINGSconr/ntyec/ 



He said a juvenile narcotics squad has 
been assigned to keep an eye on the ar- 
cades "because in those game rooms we 
find marijuana and crystal and speed." 

"We just can't blame the game rooms 
for being a problem area," he maintained. 
"It's just a place where juveniles con- 
gregate. We've got others that congregate 
on shopping center parking lots and the 
Dairy Queen parking lot." 

"I know these coin-operated games 
have become an obsession with a lot of 
these kids," he noted. "We find a lot of 
them in the game rooms around the high 
schools and junior highs. Instead of being 
in school, they're playing these games. 
These are the kids who will look for any ex- 
cuse to skip school. If it wasn't the games 
it would be something else." 

A school official in Providence was also 
concerned with the games distracting 
children from school. Josephine DiRuzzo, 
chairman of the Providence School Com- 
mittee, has proposed a bill in the Rhode Is- 
land legislature making it illegal to oper- 
ate the electronic games near schools. 

An ordinance adopted by Oakland, CA, 
last December included provisions mak- 
ing it unlawful for an electronic game to 
be placed within 1,000 feet of a street en- 
trance or exit to a school or playground. 
Oakland Deputy City Manager George 
A. Dini said the new ordinance was recom- 
mended by a group of citizens in one of 
the city's residential areas. "They were 
disturbed by an empty store where some- 
one moved in a bunch of video games," he 
explained. "They had a bunch of teenag- 
ers hanging out there at night and I guess 
disturbing the neighborhood." 

He said some people also felt the 
youngsters were "squandering their lunch 
money" on the games, a concern also 
voiced by school committee members in 
Cranston, according to Chief Moretti. 

Dini added, "It's not the games them- 
selves. They just attracted youngsters 
who stayed there late in the evening." 

Jeffrey Young, a graduate student at 
the Center for Applied Social Science in 
the Psychology Department of Claremont 
Graduate School in California, has been 
studying game player's behavior since 
September and expects to release his re- 
search results this summer. He contend- 
ed electronic games are not necessarily 
addictive, but technology has made them 
more attractive to game players than 
mechanical games were to them. He also 
noted, "The kids we see in the arcades 
don't seem to be hoods. "■ 



Tandy tries hand at videotext 



Videotext will be put to a real 
test in Texas this year when the Tan- 
dy Corporation tries to find out if people 
are willing to pay for the service. 

"This is a commercial application of 
present-day computer technology that 
allows for the electronic transmission of 
information to a subscriber's home or of- 
fice," Tandy President and Chief Ex- 
ecutive Officer John V. Roach said in a 
statement released by Radio Shack. 

The computer newspaper Infoworld 
quoted Radio Shack Senior Vice President 
Charles A. Phillips as saying of the experi- 
ment: "This is an entry-level effort in elec- 
tronic journalism." He added, "If there's 
any real test here, it is this: Can we sell the 
general public on buying a Videotex ter- 
minal?" 

At press time, Phillips told 80 Micro 
Tandy expected the project to begin 
February 1 5, "a couple of weeks later than 
we were hoping for." 

He said in the telephone interview Tan- 
dy had lined up one information provider 



they decide to put it in the service." 

Asked how many subscribers Radio 
Shack expected the Fort Worth-Tarrant 
County project to garner, Phillips said the 
projections were "in house" and not for re- 
lease to the public. 

Before Tandy announced its videotext 
experiment, it and Datapoint Corp. joined 
the Texas Newspaper Publishers Associa- 
tion in a lawsuit to block an Austin, TX, ex- 
periment in electronic delivery of informa- 
tion by the American Telephone and Tele- 
graph Co. 

"It's an interesting development that 
they would oppose our doing it but go 
ahead and conduct one themselves," said 
Pic Wagner, a Washington spokesperson 
for AT&T. "It's not surprising. I suspect 
there will be a number of firms conducting 
experiments." 

Phillips explained: "We filed to uphold 
the injunction won by the association. 
Then we had to go back to court to give 
testimony as to why we thought AT&T 
didn't belong in this business in this state. 
But AT&T picked up their marbles and 



"// there's any real test here, it is this: 
Can we sell the public on videotext?" 



for the project, the Fort Worth Star- 
Telegram, and was "talking with two or 
three" other providers. 

"We're maintaining a certain respon- 
sibility to bring in certain service pro- 
viders," he observed. "The newspaper will 
be the bulk of the information with its 
news, weather, sports— you name it." 

Roach said Tandy intended to invite 
providers with specialized data bases to 
join the project. The providers, he said, 
could include newspapers, financial in- 
stitutions, and airlines. 

At press time, Tandy had yet to set the 
fees for subscribers, but Phillips said they 
would be "less than $10." 

Asked if there would be any charges in 
addition to subscription fees, he respond- 
ed, "Right now we haven't identified any, 
but I don't want to exclude the possibility." 

He said the newspaper would make 
most of the decisions on additional charg- 
es: "What they're printing in the paper 
today— the copyrighted and syndicated 
stuff— they may want to affix a charge to 
or negotiate a charge with the supplier, if 



went home and didn't want to go to court 
over it." 

"The main purpose of that experiment," 
Wagner maintained, "was to determine if 
there is a market for these types of servic- 
es and what the customers want and how 
much they're willing to pay." 

"It had become apparent to us," Wag- 
ner continued, "that the proposed experi- 
ment was going to be tied up in litiga- 
tion before the Texas Public Service Com- 
mission and perhaps elsewhere for a long 
time. Because of our ability to obtain 
some of the information elsewhere it 
just seemed a wise course to drop the ex- 
periment." 

"Information is not our business; hard- 
ware is," Phillips declared. "We just don't 
like competing with a company who's 
funded with regulated funds rather than 
open-market, free-enterprise funds. 

"We'll compete with anyone in the free- 
enterprise system, but not with anyone 
who's fighting with regulated funds. They 
can just dip down and there's no such 
thing as losing money. "■ 
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#9 NEWS 



Grid crowns garnered with micro 



As coaches sift through the shards of 
last season and prepare for spring 
football, some of them are fantasizing 
about the mythical walk-on with all the 
tools to turn things around. A pair of 
coaches in Minnesota have found such a 
walk-on. However, he's not made of blood 
and bone but silicon and he's helped the 
duo compile an impressive high school 
won-loss record. 

The walk-on is called Champs, a foot- 
ball scouting program forTRS-80s now be- 
ing sold by Radio Shack. Since it was 
developed in 1976 by coaches J. Richard 
Dewey and Mathew L. Rauh, Jr., squads 
with access to the program have been the 
champion of their eight-team conference. 

Rauh and Dewey don't claim their pro- 
gram will make a team another Dallas 
Cowboys, but they do say it can make 
gridiron field generals more effective 
coaches. 

"It didn't affect our style of coaching," 
said Dewey, who developed the program 
with Rauh at Apple Valley High School, 
"but it made us more effective coaches. 
From the information we were able to 



gather and the efficiency with which we 
were able to gather it, we were able to 
spend more time coaching the kids." 

He explained in a telephone interview 
with 80 Micro the program was designed 
to save time: "We were gathering quite a 
bit of the information by hand. It was tak- 
ing us 30 to 35 hours to do it. With the 
computer, we did 20 minutes work and the 
computer did the rest." 

"Now that we're spending only 20 
minutes doing the work instead of 30 
hours," he continued, "we're able to 
spend more time coaching the players 
and consequently we're going to get bet- 
ter performance out of the players." 

The program also enabled Apple Valley, 
with some 1800 students, and Dewey's 
and Rauh's current school, Rosemount, to 
get better performance out of their teams. 
Dewey maintained, "The information 
we're getting is going to help us put a 
player in the right spot more often and 
when you put players in the right spot 
more often, you have more success." 

During the four years they used 
Champs at Apple Valley, Dewey and Rauh 



What Champs does 

Champs analyzes an opponent's offensive tendencies, although 
Dewey said he and Rauh are preparing another package, to be 
released this year, to analyze defensive tendencies. 

When Champs is loaded into aTRS-80, a main menu listing eight 
options appears on the screen. The add and change functions 
allow a user to add or change information on an opponent. The list 
function will list to a printer all the information on an opponent; 
automatic will allow a user to print reports in up to 10pre-designed 
formats. 

The more info option lets the user define a field situation and 
find out what plays a team ran in that situation in the past. With the 
percent option, the user can define a situation — what does a team 
do between its 41 and an opponent's 35 yard line?— and find out 
relevant percentages— run: 78 percent, pass: 20 percent and kick: 2 
percent. 

The sort option will sort all information of a specified type. For 
instance, a down and distance sort will reveal which plays were run 
on first and 10, first and more than 10, first and less than 10, second 
and long and so forth. 

The Model III Champs program disk stores complete descrip- 
tions of 5500 plays and the Model I program 700 plays. 

Coach Dewey said the program will sell for $149.95— "a real 
steal. "■ 




teams were 37-6, won the conference 
championship every year, and earned two 
state runner-up trophies. At Rosemount, 
the one year the pair used Champs their 
team won the conference championship. 

Asked if opposing coaches tried to 
counter the duo's computer by adding 
new wrinkles to their game plan, Dewey 
explained, "That's difficult to do. Football 
coaches tend to be stereotypical in 
general. They tend to go back to what 
they've done well in the past." 

"Generally speaking," he said, "on the 
high school level, during the first two 
weeks of practice, we get into the basics 
for our whole season." 

By trying to add new wrinkles to your 
game, Dewey explained, you reach a point 
of diminishing returns "because you have 
to start retraining people. You're not go- 
ing to get the same results if you have to 
retrain people every week." 

Dewey and Rauh had their scouts — vol- 
unteers like parents, former players or 
coaches— survey an opponent three 
times, although the program will work 
with less information. "It's not required to 
go out and see a team three times to have 
a successful report," Dewey noted. "You 
can get to the point where you have too 
much information. Computer generation 
can cause information overload." 

Dewey, who has a bachelor's degree in 
math and a Ph.D in management informa- 
tion, said the pair have other athletic pro- 
grams in the works, including a defensive 
tendency program, athletic department 
administration and recruiting. ■ 
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LOAD 
80 

LOADS 
EASY 



(SMS) 



LOAD 80 



ELIMINATE HOURS OF 
TYPING AND 
AGGRAVATION 




In the April, 1981 issue of 80 Microcomputing 
we introduced LOAD 80 to save you the time and trouble of 
typing our programs yourself. LOAD 80 cassette tapes 
contain dumps of the major program listings in 80 
Microcomputing. 



If you have not yet ordered any LOAD 80 tapes and wish 
you had, don't worry. We are now offering a "back issue" 
cassette program. You can order any LOAD 80 cassette 
from April, 1981 to date for $9.97. Back issues of 80 
Microcomputing are also available with the LOAD 80 cas- 
settes for $3.50. With the complete documentation found 
in the companion magazine issue, you should have no dif- 
ficulty loading any of 80's major programs. 



Please send me the following: 

month year 
Tapes Magazines 



month year 



ITEM 


COST 


QTY. 


TOTAL 


LOAD 80 Tapes 

add $1.50 per tape for postage and handling 


$9.97 






80 Microcomputing 

add $1.00 per magazine tor postage and 

handling 


$3.50 








T 


OTAL 





[ , Check Enclosed 



NAME 



Bill my: 



MC □ AE 



VISA 



ADDRESS _ 

CITY 

CARD# 

SIGNATURE 



STATE, 



ZIP. 

EXP. DATE, 

INTERBANK*. 



Please allow 4-6 weeks tor delivery 

LOAD 80 • 80 Pine Street • Peterborough NH 03458 

Attn: Debra Boudrieau 



IS 



HPIRD CDPV 



STDfiflGE 

a problem? 



Here's the ideal way to keep your grow- 
ing collection of 80 Microcomputing in 
order! The 80 Microcomputing Library 
Shelf Boxes. 




| 

I 
m 

0, 

...sturdy, corrugated, white, dust-resistant boxes will keep your 
issues of 80 Microcomputing orderly and available for constant 
reference. Self-sticking labels are available for the boxes, too, not only 
for 80 but also for Kilobaud Microcomputing, 73 Magazine, CQ, OST, 
Ham Radio, Personal Computing, Interface Age, Byte and Radio 
Electronics. Ask for whichever labels you want with your box order. 
Each box holds a full year of the above magazines. Your magazine 
library is your prime reference. Keep it handy and keep it neat with 
these strong library shelf boxes. One box (BX1000) is $2.00, 2-7 boxes 
(BX1001) are $2.00 each, and 8 or more boxes (BX1002) are $1.25 each. 
Be sure to specify which labels we should send. Shipping and handling 
charges are $2.00 per order. Call in your credit card orders on our toll 
free line 800-258-5473, or use the order card in the back of the magazine 

*° dmallto: ATTN: BOOK SALES 

Peterborough. 



m 



microcomputing 



. NH 03458 



very No COD mil.' 




Due to shipping problems in Europe, we are ask- 
ing our subscribers to send us their most recent 
mailing label from 80 Microcomputing. If you are 
unable to provide us with a label, please send us 
your name and address, and tell us at what point 
you are presently in in your subscription. This in- 
formation is very necessary in order to solve a 
forwarding problem, so we are asking foryour co- 
operation in this matter. Please direct all infor- 
mation to: Attn: Doris Day, 80 Microcomputing, 
80 Pine Street, Peterborough, NH 03458. 
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5ft NEWS 



Wordstar pirate hit with lawsuit 



by Kerry Leichtman 

80 Micro staff 



Micropro International and Digital 
Research have filed what is believed 
to be the first-ever software copyright in- 
fringement lawsuit against Data Equip- 
ment Inc. of Sunnyvale, CA and its parent 
company Dataforce International. 

The suit claims Dataforce made and 
sold unauthorized copies of Micropro's 
Wordstar, Datastar, Wordmaster, Mail- 
Merge and Digital Research's CP/M soft- 
ware packages. In their suit the plaintiffs 
demand: an injunction preventing the 
defendants from copying or marketing 
counterfeit copies of the plaintiffs' soft- 
ware; impoundment of all counterfeit 
copies of plaintiffs' software and the 
equipment used to make such copies; an 
accounting of profits generated by the il- 
legal copying and marketing of such soft- 
ware; punitive and exemplary damages of 
$1 million; treble damages for trademark 
infringement; and $50,000 for each 
copyright infringement. 

Allegedly, Dataforce acted as original 
equipment manufacturers. The software 
was distributed as part of system 
packages. The system hardware was 
most commonly manufactured by Altos. 
These hardware and software packaged 
systems were sold to law firms, account- 
ing offices and other service profession- 
als. Most of the systems were sold in Cali- 
fornia, although some were sold to firms 
in other parts of the northwestern United 
States. There is no evidence the hardware 
was obtained by illegitimate means. 

The alleged scam unfolded when un- 
suspecting users began calling Micropro 
and Digital Research requesting modifi- 
cations or program enhancements. When 
it was discovered that these callers were 
not registered users, the firms became 
suspicious and figured out the rest. 

The suit was filed in U.S. District Court 
in San Francisco in November, 1981. The 
process has moved to a procedure called 
discovery. Once the suit is filed, represen- 
tatives from Micropro and Digital Re- 
search have the right to meet with and in- 
terrogate the defendants under oath. The 
representatives also have the right to go 
through the defendants' files. The charge 
for not cooperating is perjury. That is, if 
you can find the defendants. 

Ronald S. Laurie, copyright, trademark 
and patent counsel for both Micropro and 
Digital Research said: "This is not the 




usual situation. Usually the discovery pro- 
cess is anywhere from one to three to four 
years, depending on how complicated the 
law suit is. But we seem to be having trou- 
ble getting any kind of a response out of 
the defendants. 

"They have not filed an answer to the 
complaint. It seems like everyone has 
disappeared. We can get a default judge- 
ment, but then the question is who do you 



collect against if no one is around?" 

Both Data Equipment and Dataforce In- 
ternational are, or were, located in Sun- 
nyvale, CA. When 80 Micro attempted to 
reach the defendants for comment it 
received the same response as Micropro 
and Digital Research's lawyers: "The 
number you have reached is not in service 
at this time and there is no referral. Thank 
you. This has been a recording. "■ 



Atari targets software pirates 



The Atari Corporation has begun 
in earnest to crack down on software 
pirates and copy cats. 

It has hung the hairshirt on a swash- 
buckler known as "B.B. Roberts"; gone to 
court against two software manufactur- 
ers; and settled with a third. 

The Sunnyvale, CA company hired a pri- 
vate detective to nail Roberts after he sent 
a letter— bearing on the masthead a one- 
eyed pirate— to interested parties offering 
several well-known computer software 
packages at discount prices. 

Atari did not prosecute Roberts 
because "he never cashed a check and he 
never produced any software," an Atari 
spokesperson told the computer news- 
paper Infoworld. However, Atari did wring 
a repentant essay from Roberts and is us- 
ing it to discourage pirating. 

In federal district court in Fresno, CA, 
Atari obtained a temporary restraining 
order against On-Line Systems, producers 



of "Gobbler" and "Jawbreaker." The order 
prohibits On-Line from manufacturing or 
selling the games. Atari claims the games 
infringe on the firm's rights to the home 
computer version of Pac Man. 

On-Line has filed a lawsuit against Atari 
claiming it is attempting to restrain trade 
by monopolizing the rights to any game 
with a maze and dots. 

Atari did not fare as well in Chicago. A 
federal district court judge there denied 
Atari's and arcade manufacturer Midway's 
motion that a preliminary injunction be 
issued against Magnavox Corp. to stop it 
from producing its home-video game K.C. 
Munchken. 

Atari and Activision, of Santa Clara, CA, 
settled their differences out of court. Ac- 
tivision makes plug-in game cartridges for 
Atari computers. It was started several 
years ago by former Atari employees. The 
firms refused to make the terms of the set- 
tlement public.B 
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TRS-80 ^ 



FREE 



COLOR GAME 

LIMITED OFFER! 

WE'LL SEND YOU OUR BONUS GAME OF THE MONTH 

WHEN YOU BUY ANY 2 GAMES 



'** GATOR ZONE 

THE FIRST ANTI-PREPPY COMPUTER GAME ^ 
WHERE YOU'LL FIGHT OR LOSE YOUR SHIRT? 






18.95 



STARBASE ATTACK 5 ' 295 

wmwmwm •*■•«»* 12.95 

&TMM EMffltoM s 12.95 



SS&ESSZi 

HIGH SPEED ARCADE GAME 



kqswc mmme, 18.95 



■MBGALLOPING GAMBLERS 

illustrated memory banks 

P.O.BOX 289 

WILLIAMSTOWN, MA. 01267-0289 

JEL.413-663-9648 



EACH 



Master Card 
and VISA accepted. 

*TRS 80 is a TM uf 
Tandy Corp. 

"CASSETTE , 



CERTIFIED CHECKS OR MONEY ORDERS ONLY 
PHONE ORDERS - CALL MON-FRI 9-5 EST 
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Can You Create Letters Like The Above 
In 4 Keystrokes . . . 

And Ha vt A Word Processor Print Thorn Just As A Regular Lottor Or Flit? 
If Not, It's Tlmo To Explore GEAP. 

OEAP Standi For Graphics Editor And Programmer. 

Depending On Your Hardware 4 the GEAP Package You Chooie, You Can Create Diagrams, 
Figure*. Flyeri, Potters, Letterhead* And Artwork With Ease. 

Using GEAP Does Not Require Basic Programming Knowledge, However We Have Facilities To 
Allow Programmers To Create Screen Formats And Program Documentation Within Their 
Programs With Ease. 

We Offer GEAP In Modular Form. You Can Get It All At Once Or Purchase It In Pieces As Your 
Needs Or Hardware Grows. 

FLEXIBILITY, EASE OF USE, AND EASY FUTURE EXPANSION IS 
WHAT GEAP IS ALL ABOUT. 

GEAP Regular Facilitiies — 16K-48K Disk, Stringy, or Cassette Supported. 

Sample Commands & Facilities In The Basic GEAP Package: 

MODES: Alphanumeric, Graphics, Single Graphic Pixels Can Be Intermixed. Free Style Drawing, 

Create Composites From 2 Or More Drawings, Reverse Graphic Pixels (Selectively), Graphic Block 

Moves, Graphics Keypad, "Paintbrush", Magnification, Rotation, Save Screen As Basic Program 

— ASCII Compatible, Compressed, Or String Format. 

OPTIONAL MODULES & PACKAGES: 

MODULE 1 — More rotation. Magnification, & Other Powerful Commands. 

MODULES 2-4 — Letterset Modules. Instant letters. No Drawing Required. This Is How We 

Created The "GEAP" Cube Letters In 4 Keystrokes. 

MODULE 5 — EPSON Printer Support Module. Now Non-Programers Can Use The EPSON 

MX-SO To Print Their GEAP Creations — Posters, Flyers, All With Epson Quality. 

GEAP 48K DISK — You Get Module 1-5, & Additional Disk Related Features. Expansion 

Modules Run Via Menu Selections. If You Have The Hardware, This Is The GEAP For You. 

NEWSCRIPT Support Package — All Of The GEAP 48K DISK Commands, Plus Facilities To 

Interact With NewScript. Now The Perfect Marriage. Word Processing & Graphics Processing. 

Requires Current NewScript Update. 

25.99 Expansion Module 1-4 16.99 

45.99 NewScript 99.99 



Regular GEAP 
GEAP48K 

California Add Sale! 
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When Ordering, List System & Peripherals 

J F CONSULTING 

74-355 BUTTONWOOD PALM DESERT, CA. 92260 

(714) 340-5471 

Epson MX-80 is a trademark of Epson America NewScript is a trademark of ProSoft. 




TRS-80 OWNERS 
" T REJOICE! 



Our professional quality software 
development tools let you program 
your TRS-80 with more ease and 
power than you ever imagined possi- 
ble. Programming will become a 
pleasure when you use our full 
screen editors. These editors are not 
just patched up word processors. 
They have been specially designed to 
enhance the BASIC and ASSEMBLER 
programming languages. Our 
assemblers provide full screen option 
menus to relieve you of the burden of 
remembering command names. Com- 
bine user oriented features like this 
with the finest and most extensive 
documentation in the industry and 
you will see why programming a 
TRS-80 is now better than ever. 



T-ZAL: TAPE BASED ASSEMBLER: Assem- 
ble to memory or tape. Create relocatable 
SYSTEM tapes! Includes relocating LOADER 
pgm. 8 character symbols with XREF. 
Upgrades to disk when you do! 
Mod 3 Cat # 1250-20 S 49.95 

FULL SCREEN PROGRAM TEXT EDITORS: 

All CAU lull screen editors support four way 
cursor motion and scrolling with user selec- 
table auto repeat and scroll speeds. T— ' 
visual character insert, delete, and ~" 
Block move, copy, delete. Global fi 
change. Editor for BASIC also prov 
automatic line renumbering and 26 
definable macro keys. 
For Tape and Disk BASIC: 
Mod 1 Cat # 1010-20 $24.95 
Mod 3 Cat # 1210-20 $29.95 
For Mod 1 EDTASM source files: 
Tape Cat #1010-30 $24.95 
Disk Cat # 1010-31 $34.95 
(Disk version shipped on tape.) 



M-ZAL: ™ DISK EDITOR/ASSEMBLER: 

Modular Assembler Language development 
system includes full screen text editor, multi- 
pass assembler, and object module linker. 
Allows 8 character symbols and source file 
chaining/nesting with 'INCLUDE cmd. Full 
support for relocation and global symbols. 
Symbol table with cross reference. Req. 32K 
Disk system. 

Mod 1 Cat # 1050-10 $149.00 
Mod 3 Cat #1250-10 $149.00 

XBUG: DEBUGGING TOOL & MONITOR: 

Display/Modify memory and regs. Set up to 
10 invisible and transparent breakpoints. 
Multi-speed single step. Load/Copy/Create 
SYSTEM tapes. Uses only 2.5K and can be 
dynamically relocated to any address. 
Mod 1 Cat # 1020-10 $19.95 
Mod 3 Cat #1220-10 $19.95 



Note: these products are not available for 
level 1 machines. 

When ordering specify Model, RAM size, # of 
disks. 

Send check, money order, or MC/ VISA 
numbers and expiration date to: 
Computer Applications Unlimited 
P.O. Box 214. Dept. EEW 
"~, New York 10580 

N.Y. State residents add applicable sales tax. 
Dealer Inquiries Invited. 

S^i I COMPUTER 
f APPLICATIONS 
y TM UNLIMITED tm 

A Div ol CAU. Inc 

Quality* Reliability* Service 

•TRS-80 is a TM of Tandy Corp 



isSee List ol Advertisers on page 402 
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Group 
formed 
to fight 
software bucs 



by Kerry Leichtman 

80 Micro staff 

The call to arms has been sounded and 
the war against software piracy has 
begun in earnest. Ms. Robin Robinson has 
created the Association for Software Pro- 
tection. Robinson previously spent over 
two years as Software Protection Director 
for Mini-Computer Business Applications 
before starting up the organization. 

"One individual trying to protect his 
product from both the ignorant and the 
devious is a time-consuming job," said 
Robinson. The association, she added, 
will attempt to assist software developers 
by coordinating efforts to eliminate the 
ever-increasing piracy problems facing 
the industry. 

For the organized concept to work, 
Robinson said she needs the cooperation 
of the software industry. To enlist this 
support, she distributed a questionnaire 
and established the association's guide- 
lines through the industry's responses to 
it. With the results compiled, Robinson 
has now announced her membership drive. 

Benefits to members will come in many 
forms: A bi-monthly newsletter will be 
distributed containing case histories, 
legislative updates, responses to mem- 
bers' questions and news; an information 
library established to house information 
on international software laws and to 
maintain a compilation of software pro- 
tection problems within the industry 
along with solutions so far developed; on- 
going research pertaining to current pi- 
racy problems; conferences and an edu- 
cational campaign directed toward the 
user unfamiliar with software copyright 
restrictions; providing "starter packs" as 
assistance for both software developers 
and software users. 

The starter packs, to be placed in soft- 
ware packages, "will not only educate, but 
will serve as an endorsement of our mem- 
bers," said Robinson. 

Response to Robinson's efforts have 
been favorable, she said, and requests for 
applications and information have steadi- 
ly arrived at the association's offices. For 
application and additional information 
contact: Ms. Robin Robinson, The Asso- 
ciation for Software Protection, 10143 
Leona Avenue, Tujunga, CA 91042. ■ 



Videotext journalism 

Reporting of the future taught in Florida 



They're readying themselves for the 
journalism of the future at the Univer- 
sity of Florida in Gainesville. The school 
has established an Electronic Text Center 
and aims to have a curriculum in videotext 
editing and programming by 1983. 

"People who are training to become 
editors will have an option of moving into 
this area," said Ralph Lowenstein, dean 
of the College of Journalism and Com- 
munications. 

He told 80 Micro in a telephone inter- 
view, "There may well be a curriculum in 
place by the fall of 1983." 

Lowenstein said by this summer, the 
college expects to have "rotatext" — non- 
interactive videotext continually rolling 
over a viewer's tube. 

The school hopes to use channel 11 of 
the local Cox Cable tv affiliate to broad- 
cast its rotatext from 12 midnight to 9 am. 
The cable company has also reserved a 
"superband" channel for teletext — a type 
of videotext that is interactive. 

In July, the college will hold a two-week 
course on videotext for up to 25 jour- 
nalism professionals. 

But the cornerstone of the new cur- 
riculum, a survey course on videotext, 
began in January. 

"We wijl try to give students some ex- 
perience they can use editing on 
videotext," said Dr. Kurt Kent, who is 
teaching the survey course. It will consist 
of lectures and labs, he explained, and in- 
cludes material on microcomputers, 



mainframes, information systems and 
computer graphics. 

Asked the difference between news- 
paper and videotext editing, Kent, who 
knows Fortran, Basic, PL1, Compass and 
Assembly Language, responded: "The 
space constraints are the first major dif- 
ference. You have so little space that 
you've got to treat your stories 
differently." 

Kent, a graduate of the Universities of 
Iowa and Minnesota, said story "jumps" 
present another problem to videotext 
editors: 

"In videotext, you have to pay more at- 
tention to getting a complete part of the 
story on the screen for each screenful, so 
people don't have to go to the next screen 
to understand the screen they're looking 
at." 

"The feeling is," Kent observed, "few 
people will take the time to look through 
the whole story start to finish. There might 
be quite a few people looking at page one, 
but the fallout after that is going to be 
pretty big." 

Dean Lowenstein said the 1,350-stu- 
dent college of journalism has one of the 
largest newspaper editing labs in the 
country. Housed in its new $6.3 million 
building, the school has 19 VDTs — two of 
them feeding into the Gainesville Sun, a 
newspaper owned by the New York Times 
Company. 

The college also has a Public Broad- 
casting System tv station and three radio 
stations.! 



CP/M arrival stalled at IBM 



by G. Michael Vose 

80 Micro Technical Editor 



Two months after its arrival on the 
microcomputer scene, the IBM Per- 
sonal Computer is still waiting for a ver- 
sion of the CP/M operating system. The 
software has been adapted for the Per- 
sonal Computer by its originators, Digital 
Research, but IBM is still testing it. 

Full marketing rights for the Personal 
Computer version of CP/M-86, the opera- 
ting system written for the 16-bit 8088 and 
8086 Intel microprocessors, have been ac- 
quired by IBM. Tom O'Niel of Digital 
Research's Marketing arm expects IBM to 



release the software "in late February or 
early March." O'Niel did not know what 
IBM planned to charge for the system. 

The Personal Computer Marketing Divi- 
sion, through its spokesperson Jeannette 
Maher, could not offer at press time a 
release date for CP/M-86 or speculate on 
its eventual price. Apparently only 
authorized IBM retail outlets will sell 
CP/M-86 for the Personal Computer. 

The operating system currently avail- 
able for the Personal Computer, called 
IBM DOS, is necessary to run the applica- 
tions software currently available for the 
machine. This includes VisiCalc, Easy 
Writer, accounting and game packages. 
The IBM DOS costs $40. ■ 
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Greymoon 




Greymoon is the medieval land in which this 
simulation of conquest and economic devel- 
opment takes place. As creator of Greymoon, 
you can buy, sell, plant, feed, hire, build, raid, 
invade, and consult various advisers. Objectives? 
Gain land, become wealthy, develop your initial 
small village into a city state and increase 
your rank from master to King. Obstacles? 
Every year brings one of over a dozen random 
events, which, until the end of year, are un- 
known to you except through hints by your 
advisors. Can you compete with the many 
neighboring nations of Greymoon? 

Even has sound routines. It will keep you 
interested for hours on end. Each game is 
different. The game is very fast but you can 
play at your own speed. All ages will like it and 
it takes no special skills, but a sharp mind. This 
is better then an adventure game in the fact 
that each game is different and is more real- 
istic. 

TRS-80 Model I or III 

16K Tape $19.50 Disk 24.95 



Modem Games 

Play Chess, Checkers, and Othello over your 
modem with your friends! Each game features 
full graphics, sound, and a chat mode permit- 
ting you to send messages and sounds(to get 
the other persons attention). Games are for 
two players either one or two computers. 
Complete documentation included. All three 
games on each program, comes with 2 disks 
or 2 tapes one for you and one for a friend (you 
must have two programs to play over the 
modem.) TRS-80 Model I orlll, (includes 2 tapes 
or 2 disks). You must have 232. or Lynx Modem. 

2 Tapes $29.95 2 Disks $29.95 

Hayes Smart Modem 

Auto answer/auto dial complete with two excellent modem 
programs all for only $259.00 

Microcompatible 16k print buffer . . $279.00 

Cable $35.00 



SUPERMETER 



The biggest problem in loading tapes has been the volume 
control. Prerecorded tapes are produced at differing volume 
levels. Now finally, a device to let you set the correct volume 
levels for loading any tape. You will now load any tape the FIRST 
time. SUPERMETER plugs in (no cutting or soldering) between 
your tape recorder and the computer and lets you set the 
volume to the level that your computer wants. 

SUPERMETER $29.00 



DOS SALE 

Multi Dos (the one we recommend) $79.00 

L Dos $159.00 

New Dos 80 2.0 S 145.00 

Dos Plus 3.4 $139.00 

We sell them all We recommend and use MULTI DOS 

Don't lei its low price fool you It'll do everything the others will 
and quite a few things they can't. 

MULTIDOS has the BEST BASIC - - its the EASIEST to use 
and its the FASTEST system around. For more details see Cos 
Electronics full page ad in this magazine. Why pay twice as 
much for a operating system thai s complicated and hard to 
use 

Look what you get with Multido's Basic 

A file handling utility sold separately for $19.00 

A graphics program sold separately for $19.00 

A Golbal editor sold separately for $19.00 

Boss debugger single stepper sold separately for $19 00 

Total value if purchased separately $76.00 

you get all this plus the best basic for only $79.00 



SPECIALS 



MULTI DOS with Aerocomp Doubler 
MULTI DOS with Super Directory . . . 
MULTI DOS with Super D & Doubler 
AEROCOMP DOUBLER 



$209 00 

$99.00 

$219.00 

$1 39.00 



tie** 

Baja 




Take your dune buggy and enter it in the 
famous Baja Desert race. The race has straight- 
aways, curves, S's, and obstacles. We feel that 
this is the best car race game made for the 
TRS-80. 

The game has 10 different action packed skill 
levels. The program is all machine language for 
fast graphics and excellent sound. 1 to 6 players. 



TRS-80 Model I or III 
16K Tape $15.95 



Disk $19.95 



THE TWO YEAR DISK'S 

All Wabash Disks are certified 1 00% error tree for two years by the 
manufacturer If you have any problems return them to us lor new 
ones. 



5 '•« single density 

Double Density 40 or 80 tracks. 

Double Density two sides 

8"Disks 



$25 95 
S32.99 
$35.99 
$35.99 



^Fortress 



The Newest game by Larry Asmun author of Alien Defence. Fast 

paced graphics, sound etc. 

Excellent. 



Tape. 



$14.95 Disk. 



Alien Defense II 

Newest version of the best arcade game ever written for the 
-80 by Larry Asmun of Softsector has talking routines. Harder 
then original version. 

Tape $ 1 8.95 Disk $23.95 




jBtmgcon ^scap 



t 



At last!! An adventure which takes quick thinking and strategy! 
Different from fixed adventures 

* Super graphics * * Interactive Sound * 

* Uses latest programming techniques * 
« Fast Paced • 

the creator's ghost has sensed an intruder, and he is deter- 
mined 10 hunt you down (H is intelligence in tracking was set 
by you). This feature makes this simulation unlike others tor 
you're always "on the go." 

* Written by an experienced gamer in fantasy role-ploying. 
based on me game Dungeons & Dragons. 

Objective: Your character begins on the first ot a three level 
dungeon, searching for magical "stones" which permit you to 
descend to the next lower level 

The Adventure: There are numerous traps, and over a dozen 
hostile monsters that come in various sizes, shapes and degrees ol 
nastiness it has various treasures and magic items (weapons, 
elixers. cloaks, scrolls, etc ) You can become a tighter, a theit or a 
magic user Each lime you play you get a totally ditlerent and 
exciting game 

This short description only Degins to tell you of the many ad- 
ventures and some of the features ot this exciting game. 
This will be your favorite adventure game 1 
Complete documentation included. 
You must specify Model I or Model III Available on: 
Tape. 16K $19.95 Diskette. 32K . $24.95 

Small Business Programs 

CHECKING ACCOUNT Mod. I or III. 48k disk $39 00 

Excellent check writing program for small business. Prints checks 
on printer, sorts into 32 catagones for bookeeper and IRS 

BILLING SYSTEM Mod. I or III. 48k disk $39.00 

Excellent system tor the small business man. It is last and easy to 
use Prints out invoice and monthly bills. Adds interest etc. 

S65.00 



Special buy both programs checking and billing 



FAMILY TREE Tape$32.00 Disk $39.00 

Excellent Family Genelogy program works on both Model I and III 
Excellent program lor beginning Family Tree Complete directions 
lor research and program use. 



Scarf man 

LASER DEFENSE 



. S14.95/S23.95 
$14.95/17.95 



SUPER DIRECTORY 

This will be the standard of which all other Directories are 
judged. It will read any normal type of diskette Mod I or III, 
Multi Dos, Ldos, Dos Plus, Tri Dos, New Dos. Double 
Density, Single Density, 35, 40 or 80 track drive's. 

It is easy to use but at the same time has all the features 
you will ever need. Display to screen or to printer. 
Displays by program, or disk, or subject. 

You can even add a line to help tell what the program is 

about Example: 

TRACEPRT/CMD 146U PRINT TRACE OF MACHINE 

LANGUAGE RUN. 

Traceprt/cmd is file name on disk • 1 46 is disk number 

• U is for utility •PRINTTRACE OF MACHINE LAGUAGE 
is descriptor file. 

Special Introductory offer with each directory ordered 
before June 1st we will include 4 blank Wabash double 
density Disks for a dime or you can get a box of ten disks 
for only $19.90. 
Please specify operating system. 

Super Directory $39.90 With 4 Wabash Disks. . . $40 00 

With 10 Wabash Disks . . $59.80 



COMPUTER 
SHACK 

1691 Eason • Pontiac, Michigan 48054 (313)673-2224 

^See List ol Advertisers on page 402 



ALL PRODUCTS IN STOCK SHIPPED WITHIN 24 HRS. 
DEALER INQUIRY'S INVITED 

M.C. & VISA OK "109 

PLEASE ADD $2.00 FOR 
SHIPPING IN U.S.A. 
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Now micros can talk mainframe 



by G. Michael Vose 

80 Micro Technical Editor 

The 1982 Radio Shack Computer Cat- 
alog (RSC-6) debuted software to 
allow TRS-80 Model II microcomputers to 
converse with the IBM family of mini- and 
mainframe computers. The three software 
packages (ReformaTTer, Binary Syn- 
chronous Communications 3270, and 
IBM/DEC Compatible Binary Synchro- 
nous Communications 3780) are priced 
from $249 to $995. These packages enable 
the Model II to transfer files between 
TRSDOS and IBM formatted disks (IBM 
3741 single density format) and commu- 
nicate with IBM Systems 360/370 ma- 
chines or with DEC PDP-11 or VAX-11 mini- 
computers (or any device equipped with 
bisynchronous communications ability). 

Without the use of this kind of sophisti- 
cated communications software, how- 
ever, there has been no method of using 
the data files generated by one computer 
on a different system. This problem has 
surfaced as more microcomputer sys- 
tems have been pressed into service in the 
nation's places of business. Many mana- 
gers are anxious to extract data from their 
company computer for use on their office 
microcomputer system. In other situa- 
tions, companies are being stymied by an 



Growing micro use 
created demand for 
sophisticated software 
to make mainframe a 
micro second language 



inability to use a word processor data file 
generated by the computer at the home 
office on their own dedicated system. 

Since floppy disk storage is the most ef- 
ficient method now available for data 
storage, INSTOR Corporation of Menlo 
Park, CA has devised a solution to the 
computer incompatibility problem. The 
company has built an intelligent floppy 
disk storage system allowing data ex- 
change between different computer 
systems. 

INSTOR/80 and 801 

The devices, called the INSTOR/80 and 
INSTOR/801, interface to the host com- 
puter via its RS-232 communications port. 
The INSTOR/80 then converts output from 
the host computer to the IBM 3741 format 
and makes all necessary ASCII/EBCDIC 



conversions. Any computer using the IBM 
format can use these disks. With the prop- 
er software, over 25 different computers 
including the IBM Personal Computer and 
HP3000, PRIME, Data General and DEC 
minicomputers can then read these IBM 
formatted disks. Once the information is 
transferred to an INSTOR/80 disk, it can 
be read off that disk from the same or 
another INSTOR/80 into a different com- 
puter. The INSTOR/80 can also be used 
with OCR page readers, scanners, bar 
code readers and other data collection 
devices. 

The INSTOR/80 will retail for $3,000 
while the INSTOR/801, made specifically 
for the IBM Personal Computer, will retail 
for $2,000. Both models use eight-inch 
disks. 

The INSTOR/80 can be a significant 
time-saver over communications software 
methods of transferring data from com- 
puter to computer. The INSTOR/80 
transfers data at the rate of 9600 bits per 
second. Importantly, the two computers 
do not have to be tied up at the same time 
if data is transferred using disks rather 
than communications links. 

For more information, contact INSTOR 
Corporation at 175 Jefferson Drive in 
Menlo Park.B 



Computer Week created in Granite State 



Declaring that, "Whereas it is general- 
ly agreed that all students should 
become computer literate in order to func- 
tion effectively in today's environment," a 
proclamation will be signed this spring by 
Gov. Hugh J. Gallen making the first week 
in May Educational Computer Week in 
New Hampshire. 

Sponsored by the University of New 
Hampshire Department of Computer Ser- 
vices, the highlight of the week will be an 
all day Educational Computer Fair. The 
fair will be staged at the UNH Memorial 
Union Building on Tuesday, May 4. It will 
provide educators, students and the gen- 
eral public the opportunity to view current- 
ly available educational microcomputer 
software and to obtain information about 
the educational uses of microcomputers 
(see 80 Micro, February 1980.) 

The fair will feature simultaneous pre- 
sentations by educators and vendors con- 
cerning the use of computers in educa- 
tion. Educators and industry representa- 



tives will discuss trends in educational 
computing, the value of learning comput- 
er programming as a methodology for 
training young minds and other innovative 
ideas. Exhibitors will be charged $100 for 
a 12-by-12 foot booth. Space is limited. 

The coordinator for the fair is Anne 
Knight, the Educational Coordinator for 
the UNH Department of Computer Ser- 
vices. Knight, who is also chairperson of 
the New Hampshire Association for Com- 
puter Education Statewide (NHACES), 
told 80 Micro, "Educators are becoming 
more interested in computers and com- 
puter literacy." Her department at the uni- 
versity is acquiring information about 
educational software for dissemination to 
New Hampshire school districts. The de- 
partment owns a TRS-80 Model I and 
some educational software in spite of an 
infinitesimal microcomputer budget. 

By spotlighting computers and educa- 
tion for the entire week of May 3-7, Knight 
hopes to engage the imagination of stu- 



dents and their parents to the potential of 
educational computing. By involving the 
governor and the state news media 
through the proclamation of Educational 
Computer Week, she hopes to "make 
everyone at least aware that microcom- 
puters are likely to be an exciting aspect 
of the educational experience." 

The other formal activity planned for 
Educational Computer Week is an Infor- 
mation Swap to be held at the Ramada Inn 
in Concord, NH. Sponsored by the associ- 
ation, the swap will begin at 4 pm and will 
be followed by dinner and a guest speak- 
er. In addition, the association is encour- 
aging local school districts to organize 
meetings on their own to explore the 
educational uses of microcomputers. (For 
more information, call Anne Knight at 
(603) 862-3527.) ■ 



— G. Michael Vose 
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Congressman offers 
Email to constituents 



Constituents of a Pennsylvania 
Congressman may give him their "two 
cents' worth" through an electronic mail 
service. 

Democrat Jim Coyne developed the 
service with the U.S. House Information 
System and Dialcom, a national 
telephone-access computer firm. 

Coyne, quoted by the computer 
newspaper Infoworld, said of Email, "As 
the public becomes more aware of it, it 
will be easier for them to give elected 
officials their two cents' worth— and 
that's about what it will cost them." 

Free computers 
for French 

Telematique, the French national 
program to advance electronic 
information technologies, has 
announced plans to offer as many as a 
million French citizens free computer 
terminals. 

According to a report in the computer 
newspaper Infoworld, the computers 
would be part of a massive electronic 
telephone directory experiment that may 
eventually replace printed directories in 
all French households. 

Currently the French are conducting 
an electronic telephone directory 
experiment in Western France. By the 
beginning of this year 270,000 homes 
and businesses were expected to be 
participating in that trial. 

At Comdex the French announced 
plans to expand the experiment to Paris. 
A portion of those terminals will be 
aimed at the professional market and 
will be an open-ended tool for the 
businessman. 

Roy Bright— managing director of In- 
telematique, the international marketing 
arm of Telematique— said the 300,000 to 
600,000 terminals ordered by the French 
could lower the price of the devices in 
the United States to $300. 

CompuServe-AP 
experiment extended 

Eleven newspaper members of the 



Associated Press will continue their 
videotext experiment with a major data 
base through the middle of 1982. The 
experiment was slated to end in 
December 1981. 

Some of the newspapers have been 
on-line with CompuServe Inc., of 
Columbus, OH, since July 1980, but 
others didn't plug into the system until 
last summer and fall. 

Experimenters will take a close look a 
three aspects of the videotext test in its 
final months: 

• A study of the experiment by RMH 
Research Inc. to pinpoint the wants of 
present and future videotext subscribers 
and measure the market potential of 
videopapers; 

• Implementation of the first national 
electronic classified advertising data 
base provided by newspapers; and 

• Installation of computer terminals in 
100 homes across the United States for 
five months to get the reaction of a 
cross-section of videotext viewers. 

Newspapers participating in the 
experiment are the Columbus (OH) 
Dispatch, Washington Post, Los Angeles 
Times, New York Times, St. Louis Posf- 
Dispatch, Minneapolis Star & Tribune, 
Atlanta Journal and Constitution, 
Norfolk (VA) Virginian-Pilot and Ledger 
Star, San Francisco Examiner and 
Chronicle, and Middlesex (Framingham, 
MA) News. 



The news is up 
to date at this mall 

When shoppers at the Westmount Mall 
in London, Ontario, tire of consumerism, 
they can take a break at the Videopress 
booth, a "first of its kind" commercial 
videotext system using Telidon 
technology. 

The Free Press Printing Company, 
which created the booth, sells 
commercial spots — displayed on four- 
foot tv screens— to stores in the mall, 
non-competing merchants outside the 
mall and national advertisers. A 
continuous stream of 10-second ads are 
recycled every six minutes. The 
messages can be changed or updated 
instantly and inexpensively, allowing 
advertisers to react almost instantly to 
market conditions. 



Shoppers may access information at 
the booth through three interactive 
touch-screen terminals. The information 
includes news headlines, weather, road 
conditions, entertainment, local 
community events, winning lottery 
numbers, a mall guide and a mall gift 
guide. 



First Epaper in Canada 

Canada's first electronic newspaper has 
hit the tubes. Using Telidon— an 
information system developed by the 
Canadian government— La Presse of 
Montreal offers an electronic edition 
featuring national and international 
news 24 hours a day. 

The Epaper involves 50 sequential 
screens repeated every 20 minutes. 
Nighthawks can catch the next day's 
news by tuning in at midnight. 

Electronic La Presse is offered by the 
Videotron Group to 551,000 cable tv 
subscribers in greater Montreal, Trois- 
Rivieres, Quebec City, Sherbrooke, Vic- 
toriaville, Gatineau and Mont Laurier. 

Soon at your local 
stationery store 

Wilson Jones Company, which has sold 
commercial office supplies for more 
than 80 years, is entering the software 
business. The firm, a subsidiary of 
American Brands Inc., will be marketing 
six accounting software packages aimed 
at the more than 10 million small busi- 
nesses in the United States. According 
to American Brands, formerly The 
American Tobbaco Company, the 
distribution channel opened by Wilson 
Jones has the potential of reaching 
more than 10,000 retailers. 



Another 

communications 
bill unveiled 

A bill to restructure the $75 billion 
communications industry was 
introduced by U.S. House tele- 
communications subcommittee 
chairman Tim Wirth, D-CO. 

A restructuring bill has also been 
introduced in the U.S. Senate and 
another proposed by the Federal 
Communications Commission. 



continued 
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Wirth's bill, aimed at fostering 
competition in the industry, would allow 
American Telephone & Telegraph Co. to 
set up a subsidiary to provide 
unregulated data-processing services 
and to sell phone equipment. 

The subsidiary would be designed 
to minimize the possibility AT&T would 
use its revenue from monopoly services 
such as local phone service to subsidize 
competitive services provided by the 
new unit. 

However, the chairman's bill would 
give AT&T two options for setting up the 
subsidiary. 

If the new "Baby Bell" offered 
services the parent company provided, it 
would have to receive some of its initial 
capital and all of its subsequent capital 
from outside the Bell System. 

If the subsidiary offered new services, 
the separation requirements between 
parent and subsidiary would be less 
stringent and only one-fourth of the 
capital would come from outside the Bell 
System. 

A plan for setting up Baby Bell was 
submitted to the FCC by AT&T at the 
end of last year (see 80 Micro, February 
1981). 

Hearings on Wirth's bill were 
scheduled for last month and a 
subcommittee vote on the proposal 
planned for this month. 



More data bases 

Computer users can tap at least 960 
data bases, up from about 400 two years 
ago, according to Cuadra Associates, 
publisher of an industry directory. For 
every data base that's discontinued, 
about 25 new ones crop up, Cuadra said. 



CompuServe to 
manage Comp-U-Card 

A major computer information provider 
and the largest computerized shopping 
service in the nation have announced a 
five-year, $9.5 million resource manage- 
ment agreement. 

Under the pact, CompuServe of 
Columbus, OH, has agreed to manage 
orders for Comp-U-Card of Stamford, CT. 



In a statement released by 
CompuServe, an H&R Block company, it 
predicted it would have to dedicate 
entire mainframe computers to meet 
Comp-U-Card's needs. 

Comp-U-Card will use CompuServe to 
allow the shopping service's some two 
million subscribers to buy brand name 
appliances, furniture, electronic goods, 
china and silver at prices as much as 40 
percent below manufacturers' list prices. 
The service can be accessed through 
computers, the telephone and cable tv. 



Button button 

Seymour Rubinstein, president of Micro 
Pro International, manufacturer of 
WordStar, had this bit of advice for 
members of the Western Computer 
Dealer's Association at its recent 
meeting in San Mateo, CA: "Get to know 
the 'hot buttons' of the customer — 
what feature he or she needs — 
and push them." 



$50,000 reward 
for info on 
semiconductor thieves 

Monolithic Memories of Sunnyvale, CA, 
is offering $50,000 for information 
leading to the arrest and conviction of 
anyone responsible for robbing $2.7 
million in semiconductor chips from the 
firm last Thanksgiving weekend. The 
theft is reportedly the largest ever of 
semiconductor devices. 



Daisy wheel will 
roll over dot matrix 

"I know this isn't a popular opinion, but I 
think you will see daisy wheels making a 
comeback and the growth rate of dot 
matrix printers slow." 

That's the view of Peter Wright, vice 
president of Gatner Group Inc. Wright's 
remarks, reported by Computer Business 
News, were made at Comdex '81 held 
last November in Las Vegas. 

Wright said the average price of daisy 
wheel printers will drop over the next 18 
months to $1500. Currently the average 
is $3000. 

Wright also predicted greater 



penetration by the Japanese into the 
daisy wheel market: "Two years ago 
Qume and Diablo each owned 40 percent 
of the market, but recently Japanese 
companies have seized the opportunities 
available in this market." 

In a related matter, the Venture 
Development Corporation of Wellesley, 
MA, said in a study released late last 
year U.S. printer manufacturers are 
being challenged by foreign competitors. 

The report added that some American 
small system manufacturers have 
already switched to Japanese daisy 
wheel printers, which are cheaper and 
faster than similar printers made in the 
states. 



New York-Canadian 



synergy 



The New York Times Information Service 
Inc. and Info Globe of Canada 
announced an agreement to market 
each other's data bases in their 
respective nations. The NYT Information 
Service data base includes the full text 
of the New York Times; AMI, a marketing 
and advertising data base; and MEDAB, 
a Middle East information service. Info 
Globe's data base includes the full text 
of The Globe and Mail, a national 
Canadian newspaper, and MARKET- 
SCAN, a stock quotation service. 

Info Manager Barbara Hyland noted in 
a statement announcing the pact, "We 
believe that many positive benefits will 
flow from the synergy which will develop 
as a result of this agreement." 



Flakey computer 

If you live in a state beginning with "M," 
you may receive an unwanted surprise 
from New York City. 

"We're having a little trouble on our 
computer with states beginning with the 
letter 'M,' " a spokesman for the city's 
parking violations bureau told the 
Boston Globe. "Thousands of violation 
notices have been sent erroneously." 

The problem came to the Globe's 
attention when Natick, MA, was billed 
$120 for three $15 fines and the usual 
harsh penalties for late payment. The 
vehicle owned by the town and cited on 
the tickets was a half-ton air 
compressor— a trailer-like vehicle 
without an engine. ■ 
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Disk drive users are in luck— 
this month LOAD 80 branches 
out to include disks as well as 
cassettes. This column will 
cover the specifics of LOAD 80 
on disk: loading and running 
programs on one or two-drive 
Model I or Model III systems. 

Like the cassette, LOAD 80 on 
disk will be made up of the list- 
ings we publish monthly in 80 
Microcomputing. Because not 
everything will fit, we select 
those programs which are fairly 
long (more than a few screen- 
ful) and of general interest. In 
any case, the disks you receive 
will be brimful. 

LOAD 80 will be produced on 
a single-density TRSDOS 
2.3-formatted data disk, with no 
operating system. To increase 
the disk space and keep the 
price down, it will be produced 
on double-sided (flippy) disks. 
These disks have two sense 
holes and two write-protect 
holes, enabling users to read the 
disk one side at a time. 



Using a flippy in this manner 
could result in short media life 
because the direction in which 
the disk spins relative to the 
read-write head is changed 
when the disk is flipped over. 
Therefore, back-up this disk onto 
a single-sided disk immediately. 

Model III Users 

Since the disks are in a single- 
density format, Model I users 
with more than one drive can 
simply place their operating 
system in Drive 0, place the 
LOAD 80 disk in another drive, 
press Reset, and begin. Model III 
users, however, have the pro- 
blem of reading a single-density 
disk with a double-density 
operating system. Here is how 
to do it with Model III TRSDOS: 

1. Place a back-up of your 
TRSDOS disk in Drive 0. Place 
your LOAD 80 disk in Drive 1, 
either side up. 

2. PURGE files on Drive until 
you have at least 134 free 





Versions 


(Y/N) Syntax 


DOSPLUS 


All 


Y COPYI filename 


LDOS 


5.0 


Y XFER filename 




5.1 


Y COPY filename (X) 


MULTIDOS 


All 


Y COPY :0 Sfilename 


NEWDOS 


All 


Y COPY .0 Sfilename TO filename 


NEWDOS80 


All 


Y COPY :0 $tilename TO filename 


TRSDOS 


All 


N 


ULTRADOS 


All 


Y COPY :0 Sfilename TO filename 


Table 1. 


Model 1 s 


ngle-file, single-drive copying. 





Versions 


(Y/N) Syntax 


DOSPLUS 


All 




Y COPYI filename 


LDOS 


All 




Y COPY filename (X) 


MULTIDOS 


All 




Y COPY :0 Sfilename 


NEWDOS80 


AH 




N 


TRSDOS 


All 




N 


Table 2. Model III 


single 


file, 


single-drive copying, single to 


double density. 









GRANS. (See your operating 
manual for details on the 
PURGE utility.) 

3. Type CONVERT and 
<Enter>. Answer 1 to Source, 
to Destination. 

4. CONVERT will read each 
file in single-density format and 
then copy it in double-density 
format onto your TRSDOS disk. 

5. Flip the LOAD 80 disk over 
and do steps 3-4 again. 

Consult your manual if you 
have trouble. Remember that 
not all files will run correctly on 
the Model III. This is especially 
true of assembly language pro- 
grams. 

One-drive Users 

Because LOAD 80 is pro- 
duced without an operating sys- 
tem, one-drive users must own 
an operating system or utility 
which permits single-file, single- 
drive copying. Model III owners 
with only one drive encounter 
another problem because the 
data disk is single-density and 
the DOS disk is double-density. 

We have prepared the follow- 
ing tables of a few popular oper- 
ating systems, along with their 
single-file, single-drive copy 



capabilities. Table 1 is for the 
Model I; Table 2 is for the Model 
III. As with all software, read the 
manual thoroughly before you 
use the program, and follow on- 
screen prompts. You will find 
the correct file names listed in 
the LOAD 80 directory enclosed 
with the disk. 

Please note that this informa- 
tion comes directly from the pro- 
ducers of the various operating 
systems; if a command doesn't 
work call them, not us. 

Errata 

Program 6 on side B of the 
December LOAD 80 (file name 
P1) is incomplete. Lines 
100-3780 were inadvertently left 
off the tape, but were included 
in the magazine. The correct ver- 
sion will be included on the 
March LOAD 80. Use Floppy- 
Fixer on page 326 of the Decem- 
ber 1981 80 Microcomputing as 
documentation. 

Please address any questions 
to: 

Art Huston 

Technical Editor 

80 Microcomputing 

Pine St. 

Peterborough, NH 03458 

or call (603) 924-9471. ■ 



Program 


Title Page 


Comments 


1 


THREEDEE 138 


NONE 


2 


PRMSRCH 152 


NONE 


3 


HUMANS 154 


NONE 


4 


GRADES 184 


NONE 


5 


SCRNPRNT 214 


NONE 


6 


CENSOR 216 


NONE 


7 


OTHLLO80 252 


NONE 


8 


RGRAPHIC 294 


NONE 


9 


BLTNBRD 314 


NONE 


10 


FLPYFIXR 


Needs EDTASM 


•Page 326 of December 1981 80 Microcomputing. 
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March 

1-2 Michigan Association for Comput- 
er Users in Learning, Wayne, Ml. 
Sixth annual convention featuring 
sessions on facets of education 
uses of computers, Western Michi- 
gan University, Kalamazoo, Ml. 

3-4 University of Washington 
Academic Computer Center, Seat- 
tle, WA. Eighth Annual Computer 
Fair. 

3-7 Catalyst, Jersey City State Col- 
lege, Jersey City, NJ. Microcom- 
puter Week '82, "an international 
event of significance to 
educators," Jersey City State Col- 
lege, Jersey City, NJ. 

9-10 The Yankee Group, Cambridge, 
MA. Seminar on the Super Service 
Bureau, New York City, NY. 

12-13 Seattle Pacific University and Na- 
tional Council for Computers in 
Education. Fifth Annual Comput- 
ers in Education Conference, Seat- 
tle Pacific University, Seattle, WA. 

16-18 McGraw Hill International Training 
Systems, Edutronics Division, New 
York City International Training 
Conference: Tools for Data Pro- 
cessing Training, McGraw-Hill 
Building, New York City, NY. 

18-20 Technical Education Research 
Centers, Cambridge, MA. Work- 
shop on microcomputers in educa- 
tion, Mesa Community College, 
Phoenix, AZ. 

22-25 The Interface Group, Framingham, 
MA. INTERFACE '82— communi- 
cations-information conference 
and exposition for sophisticated 
end users, Dallas Convention 
Center, Dallas, TX. 

24-26 Technical Education Research 
Centers, Cambridge, MA. Work- 
shop on Microcomputers in educa- 
tion, Lewis and Clark College, 
Portland, OR. 

26-28 The Interface Group, Framingham, 
MA. Showcase Expo for small busi- 



ness proprietors, independent 
neighborhood professionals and 
mid-level corporate managers, 

Georgia World Congress Center, 
Atlanta. 

28 Greater Baltimore Hamboree and 
Computerfest. Timonium, MD. 
Multi-interest small computer and 
electronics show, Maryland State 
Fairgrounds Exhibition Complex, 
Timonium, MD. 

7-9 American Management Associa- 
tion, New York City, NY. Course 
on paperwork management, New 
York City, NY. 



April 



1-3 Alaska Association for Com- 
puters in Education, Anchorage, 
AK. Educational Computing— The 
Future is Now conference, An- 
chorage, AK. 

2-3 Montana Council of Teachers of 
Mathematics and Montana Office 
of Public Instruction. Rocky 
Mountain Computer Conference 
for educators, Ramada Inn, Bill- 
ings, MT. 

2-4 Kengore Corp., Franklin Park, NJ. 
Eighty/Apple Computer Show— 
an exposition for products and 
services for Apple and TRS-80 
computers, NY Statler Hotel, New 
York, NY. 

12-14 American Management Associa- 
tions, New York, NY Course on pa- 
perwork management, Chicago, 
IL 

15-17 The Interface Group, Fram- 
ingham, MA. Showcase Expo for 
small business proprietors, in- 
dependent neighborhood profes- 
sionals and mid-level corporate 
managers. A. J. Cervantes Hall, 
St. Louis. 

15-18 National Computer Shows, Chest- 







Ken Orr will be one of the featured 
speakers March 16-18 at the international 
training conference held in New York City 
by the Edutronics Division of McGraw-Hill. 



nut Hill, MA. Southwest Computer 
Show and Office Equipment Expo- 
sition, Market Hall, Dallas Market 
Center, Dallas, TX. 

16-18 Virginia Computer User's Confer- 
ence, Association for Computing 
Machinery, and Virginia Polytech- 
nic Institute and State University. 
12th Annual Conference with 
topics on artificial intelligence, of- 
fice automation and data-base 
management, Marriot Hotel, 
Blacksburg, VA. 

22-25 The National Computer Shows, 
Chestnut Hill, MA- New York Com- 
puter Show and Office Equipment 
Exposition, Nassau Coliseum, 
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Uniondale, Long Island, NY. 
3-25 The Interface Group, Fram- 
ingham, MA. Showcase Expo for 
small business proprietors, in- 
dependent neighborhood profes- 
sionals and mid-level corporate 
managers, Miami Expo Center, 
Miami, FA. 

24 John Craig's Computer Swap, 
Palo Alto, CA. Flea market for 
computer enthusiasts, Santa 
Clara County Fairgrounds, San 
Jose, CA. 



May 

4-8 University of California Extension, 
Berkeley. 16-Bit Microprocessor 
Workshop, (6 week evening 
course), Mountain View, CA. 

6-9 The National Computer Shows, 
Chestnut Hill, MA. Southern Cali- 
fornia Computer Show and Office 
Equipment Exposition, LA. Con- 
vention Center, Los Angeles, CA. 

7-9 The Interface Group, Fram- 
ingham, MA. Showcase Expo for 
small business proprietors, in- 
dependent neighborhood profes- 
sionals and mid-level corporate 
managers, Anaheim Convention 
Center, Anaheim, CA. 

11-12 The Yankee Group, Cambridge, 
MA. The Next Generation of Con- 
sumer Electronics seminar, Palo 
Alto, CA. 



19 University of California Extension, 
Berkeley. The Manager's Ap- 
proach to 16- Bit Microprocessors, 

(one-day intensive course), Moun- 
tain View, CA. 



21-23 The Interface Group, Fram- 
ingham, MA. Showcase Expo for 
small business proprietors, in- 
dependent neighborhood profes- 
sionals and mid-level corporate 
managers. Commonwealth Pier 
Exhibition Hall, Boston, MA. 



Coming 
Next Month 



What's the ultimate utility? How about a 
utility to help you find utilities? That's what 
will be featured next month when 80 Micro 
raises the curtain on its buyer's guide to 
utilities — editor/assemblers, 
disassemblers, monitors, terminal 
packages, Basic editors, and tape, file and 
speed-up utilities. Also in April. . .Gather 
around the chalk board as Jake Com- 
mander presents a tutorial on utilities; 
polish up your Skinner box for an exclusive 
80 Micro interview with the graduate stu- 
dent that got B.F. on the research road 
after a 20 year hiatus; and steel yourself for 
some April foolishness fashioned to 
feather your funny bone. 



Proof Notes 



Continued from page 10 



tion of television camera and computer. 
This combination can be used to set up a 
feedback loop between program and cam- 
era, allowing the program to modify its own 
designs. The motion picture industry is 
already well into inventing and using these 
new ideas. As you can see, between typing 
in a short program and interfacing external 
hardware, computer graphics can be as 
simple or complicated as you want. 

To push your video display to its greatest 
heights, however, some patience and 
perseverance will be required. Although we 
provide you with some programs to try out, 
if you're serious you should familiarize 
yourself thoroughly with computer graph- 
ics to get that all-important extra insight. 

^See List of Advertisers on page 402 



It's interesting to see how many proficient 
programmers avoid graphics because of 
the extra efforts involved. If you have the 
determination to master both the arts of 
programming and graphics, your services 
are likely to be always in demand. To get 
started, you will need some reading with a 
little simple math thrown in. Unfortunately, 
there is a dearth of good beginners' books 
on the subject. Most that I've seen jump feet 
first into some awful-looking math which 
would scare off any neophyte. I hope we 
manage to provide some enlightenment, en- 
couragement and inspiration in this issue. 

Jake Commander 
Technical Consultant 



CV*V^ You ' veWritten 

(CyV a Fantastic Game? 

^* Then We'd Like to Publish It! 
We're looking for hot GAME pro- 
grams: 

ARCADE (HI-SPEED GRAPHICS) 
ADVENTURE FORMAT 
FANTASY WARGAMING 
BOARD GAMES 
LOGIC & PUZZLE GAMES 

There's Gold in them there 
Games! Write for our free 
Programmer's Kit today. 

INSTANT SOFTWARE, INC. 

Submissions Dept. 

Peterborough, NH 03458 



r*2 



<X}¥^^ V You've Written 

(JJ^* State-ofthe-Art Software- 

We'd Like to Publish It! 

We're looking for SYSTEM software: 
DISK OPERATING SYSTEMS 
MONITORS 

PROGRAMMER AIDS/UTILITIES 
LANGUAGES 
DATA BASE SYSTEMS 
Then, sit back and collect your 
royalty checks. Write for our free 
Programmer's Kit today! 

INSTANT SOFTWARE, INC. ^2 

Submissions Dept. 

Peterborough. NH 03458 
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J#^ 



^> 



If You've Written 

a Useful Program-- 

We'd Like to Publish It! 

We want programs for 
INDUSTRIAL applications: 

JOB COST ESTIMATES 
INDUSTRIAL (PROCESS) CONTROL 
JOB TRACKING 
MACHINE SCHEDULING 

Get published and earn royalties! 
Write for our free Programmer's 
Kit today. 

INSTANT SOFTWARE. INC. 
Submissions Dept. *»2 

Peterborough, NH 03458 
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NEW PRODUCTS 



edited by Janet Fiderio 



Featuring — The Prism Printer 
Color Graphics and Printing for your TRS-80. 




The Prism Printer. 



The Prism Printer 

The Prism Printer is a fully con- 
figured 132-column dot matrix, soft- 
ware selectable, eight color printer. A 
four band ribbon carries the process 
colors of cyan, magenta, yellow, and 
black. Additional ribbons are optional. 

Prism features include: semi-auto- 
matic cut sheet feed, a high speed 
data mode, nine-wire ballistic-type 
print head incorporating two stag- 
gered rows of print needles to create 
vertically overlapping dots in a single 
pass (achieves correspondence quali- 
ty print and true mixing of colors), pro- 



portional spacing, enhanced (bold) 
text printing, and standard print densit- 
ies of 10, 12, or 16.7 characters per inch. 

Selectable features include: auto- 
matic text justification, programmable 
horizontal and vertical tabbing, reverse 
paper feed, and fine positioning of 
characters. Microprocessor controlled, 
the printer has : 'logic seeking" look- 
ahead capability and high-speed slew 
for maximum output. It has both anRS- 
232C serial interface and a Centronics- 
compatible parallel interface. 

Priced at $1995, this printer is avail- 
able from Integral Data Systems Inc., 
Milford, NH 03055, (603) 673-9100. 

Reader Service ^550 



Only the Shadow Knows 



Macro Mon, dubbed "The Shadow," is a 
machine language program allowing dis- 
assembly and examination of program in- 
structions from within the computer's 
memory. It disassembles each instruction 
as it is executed, and then optionally 



sends it, with all current register values, to 
the video screen or printer. 

"The Shadow" may be located any- 
where in RAM. Additional features include 
the ability to: single-step through ROM, 
set user-defined break points in RAM or 
ROM, find any string up to 16 bytes long in 
RAM or ROM, provide a visual display of 
tape Loads and Saves, and relocate any 



machine language program in RAM with 
all external calls and jumps changed to 
execute in their new location. 

It is available for the Model I (cassette 
$54.95, disk $59.95) or for the Model III 
(disk $69.95) from Advanced Operating 
Systems, 450 St. Johns Road, Michigan 
City, IN 46360, (219) 879-4693. 

Reader Service ^551 



Datapack 

A Data 

Communications Package 

Datapack is a terminal package pro- 
gram for the Color Computer. It allows you 
to use the computer as a buffered com- 
puter terminal through a modem to a time 
sharing network, or as a direct-connect 
terminal to another computer system. 

The program saves data stored in the 
buffer either to cassette tape, or outputs 
to the printer. The data output is automati- 
cally set to the maximum size of your 
system memory when entered, allowing 
maximum space for saving data. Also in- 
cluded are features to send control codes 
and to enable or disable keyboard echo. 
When the terminal mode is exited the con- 
tents of the buffer may be viewed on the 
screen or saved to tape for later loading. 

For more detailed information contact 
Cer-Comp, 5566 Richochett Ave., Las 
Vegas, NV (702) 452-0632. Datapack is 
priced at $24.95. 

Reader Service ^552 



Wildcat, Disk Directory 

Wildcat is an advanced disk directory 
catalog system which reads directories 
directly from the disks of all Basic, Scrip- 
sit, Pencil, and Edtasm type files. It also 
appends the first 50 characters of any 
data or other ASCII type file. 

The catalog information contains the 
disk ID, name, date, free grans, filespec, 
and first line remark. Four versions are 
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Nanos System 
REFERENCE CARDS 

(for Model I and Model III) 



•"IH1J1 II 

iwiiiiiii 



At last! No more flipping through the pages of the Basic manu- 
al! No more working through the maze of machine language in- 
structions! These cards completely summarize the Basic and 
Assembler manuals! FEATURES (on most cards): 
memory map, eyeball graphics, math instructions, basic com- 
mands, store instructions, basic functions, load instructions, 
basic statements, move instructions, special keys, exchange 
instructions, print using examples, shift instructions, basic 
special characters, compare instructions, basic and assembler 
messages and codes, branch instructions, basic facts, data al- 
teration instructions, reserved words, I/O instructions, ROM 
routines, complete character chart with graphics and space- 
compression codes, hex-dec chart, control code cross-refer- 
ence, assembler instructions commands and operators, screen 
line layout, editor commands & subcommands, condition code 
easy access 

Plus— "magic graphics number— a mystery until you learn how 
to use it! 

Designed as a fold-up, accordion-style card, fits in your pocket. 
Panels organized for optimum speed for reference. 
Model I: BASIC only FC1001 $2.95 
Model I: BASIC and Assembler FC1002 $4.95 NEW! 

DOS RANDOM ACCESS & BASIC FILE 
HANDLING— By H.J. Muller. This book 
was written for the nonprogrammer. It is 
ideal for the businessman or professional 
who needs to solve and write special pro- 
grams for in-house business problems, or 
the hobbyist who wants to go beyond the 
cassette recorder and into disk storage 
and file manipulation. It is written as a 
self-instruction tutorial and will provide 
anyone with some Level II experience with 
the ability to write special programs for in- 
ventories, mailing list, work scheduling, 
record keeping, research project data ma- 
»,„,,„ ,. nipulation, etc. 150 pages. BK1236 $24.50 

NEW! 

FOR THE MODEL III 

MOD II ROM COMMENTED— Soft-Sector 

marketing, 1981. This book is not an in- 
struction course on machine language, 
but rather an information source that you 
can use time and time again for writing 
your own program or patching old Mod I 
machine language programs. It contains 
an explanation of ROMs in the latest ma- 
chine from Tandy, with must every loca- 
tion of the 14K ROMs listed, with com- 
ments. BK1 235 $22.50. 





NOW AVAILABLE FOR THE MODEL III 

Nanos System Reference Card 

(as described above) 

Model III: BASIC FC1004 $3.95 

Model III: BASIC and Assembler FC1003 $5.95 



Prices do not include shipping and handling charges. Please include $1.50 for first 
book, $1.00 each additional book and $10.00 per book foreign airmail. Sorry no COD 
orders. Use the order card in this magazine to order. Allow 4-6 weeks for delivery. 

80 Microcomputing Bookshelf • Peterborough, NH 03458 



1-800-258-5473 




■ See List of Advertisers on page 402 



EIGHTY/ 

APPLE 

COMPUTER 

SHOW 

(Formerly the Natl TRS-80 Show) 

FOR APPLE* and 

TRS-80* COMPUTER 

SYSTEMS 

April 2-4, 1982 

New York Statler 

7th. Ave. & 33rd. Street 

New York, NY 

The EIGHTY/APPLE COMPUTER 
SHOW will feature over 100 exhibitors 
of equipment, supplies, books, maga- 
zines, parts, software and accessories 
for the TRS-80 and Apple Computer 
systems. There will be demonstrations 
of new and exciting products for the 
TRS-80 and Apple systems, for the 
businessman, professional, educator 
and hobbyist. In addition, most exhibi- 
tors will be selling their products at the 
show for immediate delivery. If you 
own a TRS-80 or Apple Computer, or 
have been thinking of purchasing one 
of these two exciting systems, don't 
miss the Eighty/Apple Computer Show. 
SAVE $2.00 on admission by bringing 
in the coupon below! 

SHOW HOURS 

Friday April 2 11AM to 7 PM 
Saturday April 3 11AM to 7 PM 
Sunday April 4 11AM to 5 PM 

REGISTRATION $5.00 Day 

Children under 12 - $1.00 

FOR EXHIBITOR INFORMATION 
CONTACT 

Kengore Corporation 

3001 Route 27 

Franklin Park, NJ 08823 

(201) 297-2526 

'TRS-80 is a Trademark of Tandy Corp. and Apple is 
a Trademark of Apple Computer Co. 

^ — ■« ■» ■ SAVE $2.00 —■■■■ — ■ 

This coupon is good for Two Dollars 
($2.00) off the regular daily registration 
fee of $5.00. Limit one coupon per per- 
son, not applicable to children's admis- 
sion. Only original copies of this cou- 
pon will be accepted. 

EIGHTY/APPLE SHOW 

April 2-4, 1 982 
NY Statler 
(NO CASH VALUE) £ 

■ — - - m SAVE $2.00 m — m — ■! 
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available for the Model 1, 48K, with at least 
two five-inch disk drives. 

Wildcat is priced at $39.95 and is avail- 
able from Donald M. Fielding, 2207 NW 61 
Place, Margate, FL 33063, (305) 972-6744. 

Reader Service ^553 



Stiff Upper Lisp 



An improved version of Lisp is now be- 
ing marketed. 

Stiff Upper Lisp offers an interactive 
computing environment with more than 
120 compiled functions in less than 14K 
bytes. Lisp functions and data have the 
same form so that one function can ana- 
lyze another. 

Additional features include a library of 
functions written and callable as needed, 
symbolic debugging aids, an editor writ- 
ten in Lisp that can be customized, an on- 
line help facility, a printer formatter, and a 
spelling correction function. 

For more information contact Lifeboat 
Associates, 1651 Third Ave., New York, NY 
10028,(212)860-0300. 

Reader Service ^554 



Entire Game System 

The Adventure System was designed to 
provide a standardized adventure format 
to replace those currently on the market 
and allow authors the capability to design 
original adventures limited only by their 
hardware. In addition, the Adventure Sys- 
tem provides end users the criteria to eval- 
uate new adventures as they appear. 

The system consists of an adventure 
editor, a driver program to execute data 
bases created by the editor, and two com- 
plete adventures written by the author. It 
is available for the Model I and III disk sys- 
tem with 48K from The Alternate Source, 
1806 Ada, Lansing, Ml 48910, (517) 487- 
3358. The package is priced at $39.95. 

Reader Service ^555 



Data Ace 

For the Model II 



Data Ace combines a Data Base 
Management and Operating System, a 
conversational Data Definition Language 
(DDL), an Interactive Query Language 
(DIL), Block Structures programming 
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Data Ace 



language for easy development (DML), 
and a full screen text editor to create and 
maintain programs and procedures. The 
combination of these features enable the 
user to automate a business rapidly to the 
exact requirements needed. 

This system runs on the Model II with 
64K, an expansion box, at least one drive 
and a printer. The price of the system is 
$1350. The package includes a formatted 
disk, a demonstration disk, a two systems 
disk (for each use), and both volumes of 
the users guide. 

For additional information contact The 
Aragon Group Inc., 1904 Wright Circle, 
Anaheim, CA 92806, (714) 634-9012. 

Reader Service ^556 



New Dip Printer 



The Dip-95 is a nine-wire impact printer 
with switch-selectable, dual-mode capacity. 

The data processing mode uses a nine 
by nine matrix font while the correspon- 
dence mode uses an 1 1 by nine font. Some 
of the features offered are: six different 
character sizes, one or two pass printing, 
bidirectional printing, tractor and friction 
feed, continuous loop ribbon cartridge, 
variable line density, continuous form 
length control, and telecommunications 
capabilities. 

Its dot-addressable graphic capabili- 
ties can provide plotting, drawing illustra- 



:'■:'■ '^ ■■■■■■■■■ •■ '-•• .." ,-■.■■■, ; : ;;-.■; = :? /. 

s ■ : - ;■.*"•-.■■. v?; >>K 

■Pl^^^^ m^m 



. ..; 








The Dip-95 Printer. 
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tions, printing CRT screen graphics, and 
special effect symbols. 

The Dip-95 is priced at $929 from Dip 
Inc., 745 Atlantic Ave., Boston, MA 021 1 1 , 
(617)482-4214. 

Reader Service ^557 



Automated 
Electronic Mail System 

The Automated Electronic Mail System, 
geared towards the commercial software 
user, allows point-to-point document 
communications. The system consists of 
two programs. 

The first, an auto answer (data collec- 
tion) system, features unattended recep- 
tion of ASCII files with automated error 
handling and optional logging of files 
received. 

The sending system features auto dial 
and spooled output of up to 64 files. The 
system allows the user to set the time one 
wishes the output to begin. Once set for 
output, the user can walk away. All error 
handling and output is done by the 
system. 

The answering system can accept data 
from any computer equipped with a Bell 
103 compatible modem. However, with an 
MSB unit, verification and re-send on error 
of data is accomplished at an effective 
baud rate of 275. 

Available for the Model I and III, the re- 
ceiving system is priced at $1300, includ- 
ing modem and connecting cable. Price of 
the sending system is $500. Options are 
available for an additional cost. For more 
detailed information contact MSB Con- 
sulting, 170-15 Highland Ave., Jamaica 
Estates, NY 11432, (212) 526-0825. 



Agricultural Software 

The Farm P&L Software package is 
designed for the commercial agricultural 
producer who uses a cash accounting 
system. 

The system files and accumulates cod- 
ed expenses and income. From this coded 
data a 10-page profit and loss statement/ 
management report is generated. 

Information included on this report is: 
detailed and total income and expenses 
for the month and to date, a breakdown of 
expenditures to date, detailed listing of all 
loans payable and all payments made to 
date, and much more. 

This software is customized to the cus- 
tomer's operation and available for the 



Model I, II, III, and the Pocket Computer. 
Prices depend on the customizing, Con- 
tact Summerville Enterprises, Agri-Com- 
puter Services, 104 Broad St., S.E. Alice- 
ville, AL 35442, (205) 373-6383. 
Reader Service ^558 



Power Line Monitor 

The Inmac Power Line Monitor is a 
device that monitors the power sent to 
computers and other sensitive equip- 
ment, using standard 120 Vac. 

The Monitor differentiates six different 
types of problems: power failure, low or 
high line voltage, voltage spike or drop, 
and high frequency noise. The system 
enables the user to determine whether a 
shutdown is due to a faulty system or a 
power problem, and includes a trouble- 
shooting guide to facilitate user repairs. 

The cost of this product is $295. For in- 
formation contact Inmac Corporation, 
2465 Augustine Drive, Santa Clara, CA 
95051. 

Reader Service ^559 



Bad-Check Summary 

The Automated Bad-Check Summary is 
a program designed for the Model I owner. 
It is a computer-managed business ser- 
vice package which lets you provide a 
bad-check service to the retail businesses 
in your area to make money. 




By gathering bad-check information 
from merchants, the user forms a cumula- 
tive list that is constantly revised. The 
bad-check summary generated by the pro- 
gram consists of the bank number, the 
person's account number, amount of 
check, date written, and the reporting sub- 
scribing merchant. 

The summary is available on disk for 
$99.95 from ABS Suppliers, Box 8297, 3352 
Chelsea Circle, Ann Arbor, Ml 48104, (313) 
971-1404. 

Reader Service ^560 



E. E. Ladder 

The Electrical Engineering Ladder Net- 
work Analysis Program, known as E. E. 
Ladder, is designed for the Electronics 
designer. 

The program calculates either the 
transmission coefficient or the insertion 
loss magnitude, along with the phase an- 
gle of the user's design, allowing modifi- 
cation of the design to fit the response of 
the actual network. These functions are 
calculated over any desired frequency 
range and are plotted on the video display 
or line printer. The circuit reflection coeffi- 
cients and driving point impedances are 
also calculated over the frequency range 
selected. 

E. E. Ladder can be used in the design 
of matching networks, filters, terminators, 
crossover networks, and other passive el- 
ement designs which are frequency de- 
pendent. 

Disks can be purchased for $59.95, 
tapes for $54.95 for the Model I and III. 
Both are available from Advanced Operat- 
ing Systems, 450 St. John Road, Michigan 
City, IN 46360, (219) 879-4693. 

Reader Service ^561 



Search and Sort 



The Inmac Power Line Monitor. 



Search and Sort (SNS) is a collection of 
fast machine language routines which 
may be called from Basic. The package 
sorts strings, integers, single and double 
precision numbers in either ascending or 
descending order. It also does a lightning 
quick search of an already sorted list of 
strings for a given string, and optionally 
inserts a string in the proper place to re- 
tain sorted order. 

SNS is available on cassette for $1 1 .95 
or on disk for $13.95. Both disk and cas- 
sette include the 16K, 32K and 48K ver- 



^See List of Advertisers on page 402 
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sions as well as a Basic test program 
which demonstrates the use and features 
of the collection. For more information, 
write Micro Pro Systems, Route 2 Box 533, 
Cumming, GA 30130, (404) 887-6814. 
Reader Service ^562 



Data Processing Directory 

DP Directory, a new data processing 
reference magazine, publishes the tables 
of contents of over 100 Data Processing 
periodicals each month. The Directory 
covers many data processing magazines 
dealing with hardware, software, systems 
development, telecommunications, graph- 
ics, word processing and personal com- 
puting. 

Twelve monthly issues are available for 
$48 from DP Directory, Box 562, Bloom- 
field, CT 06002. 

Reader Service ^563 



Two New Word Games 



Two new word games are available for 
the Model I and III; both emulate such 
popular games as Scrabble and Boggle. 

Wordwiz pits two players against each 
other using the computer as a score- 
keeper. The object of the game is to make 
as many legitimate words as possible 
from an array of 25 letters. 

The object of the second game, Senten- 
ceer, is to form as many sentences as 
possible from an array of 24 words. Again 
the computer acts as a record and score- 
keeper. 

Both games are priced at $9.95 and are 
available from Shirley Software, Box 417, 
Old Greenwich, CT 06870. 

Reader Service ^564 



Abstract Strategy Game 

Richochet is a game of strategy com- 
bining fast action and arcade-style 
graphics. 

The player maneuvers blocks to set up a 
shot at the opponent's goal while protect- 
ing his own goal from attack. Each player 
has two launchers he can fire against one 
of four different computer opponents or a 
human. 

Richochet is available for the Model I 
and Model III on disk and cassette from 




The W-DLT Data Line Tester. 



Automated Simulations, Box 4247, Moun- 
tain View, CA 94040, (415) 964-8021. It is 
priced at $19.95. 

Reader Service ^565 



Data Line Tester 

The W-DLT, a portable data line test 
device, identifies the seven most-used 
RS232 data lines and shows likely causes 
of problems. 

In addition, by the flip of a switch the 
W-DLT becomes a null modem used to in- 
terconnect terminals, modems, or com- 
puters without having to reconnect any 
cables. This lets standard devices com- 
municate with each other with one stan- 
dard cable. 

This data line tester is available for 
$59.95 from Warren Instrotech LTD., Box 
4500, Ogdensburg, NY 13669. 

Reader Service ^566 



Estate Planning Software 

Estax 81 is estate planning software for 
the Models I, II and III. 

Written by an estate planning attorney 
for use in a law office, accountant's of- 
fice, life insurance agency or bank trust 
department, "Estax 81" projects estate 
taxes for a husband and wife under the 



Economic Recovery Tax Act of 1981 for 8 
different marital deduction arrangements, 
completing all computations in less than 
60 seconds. 

At least one disk drive, TRSDOS and 
48-64K are required. Priced at $295, this 
software is available from Professional 
Data Corporation, 6449 Goldbranch Road, 
Columbia, SC 29206. 

Reader Service ^567 



APL for the Model II 

TIS-APL is now available in three ver- 
sions for the Model II in kit form. 

The kit consists of an APL interpreter 
on disk, APL keycaps, and an APL charac- 
ter generator. Version I, for educators 
($295), contains all the primitive APL fea- 
tures. The second version, for software 
development ($495), includes all APL prim- 
itives plus all file handling and editing fea- 
tures. The third version, for full software 
support and development ($1195), con- 
tains the versions of the second with the 
added support of receiving future updates 
and enhancements at no added cost. The 
package includes complete access to 
Telecompute's user inquiry telephone 
number. 

For further information contact Tele- 
compute Integrated Systems Inc., 251 
Spadina Ave., Toronto, Ontario. Canada 
M5T 2E2. 

Reader Service ^568 
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PORTFOLIO 
Management System 



• Stores multiple portfolios of stocks, 
puts, calls, warrants, mutual funds, 
and bonds. 

• Retrieves market quotes from your 
Dow Jones News Service Account' 

• Printsanalysis by Portfolio- 
High • Low • Last • Close • Volume 
Current Value • Gain or Loss 
ValueChange* Price Change 
Dow Averages 

• Creates Tax Record 



MODEL I III 
S149.95 



MODEL II 
$495.00 



Send Check or Money Order to: 

Snowden E. Bunch, Ph. D. 

( c/o Ehlen Enterprises 

6319 Briarwood Road 

Columbia, SC. 29206 

((803)787-7256 



" Accouni established separately with 
Dow Jones. Inc. 



ARE YOU TIRED OF 

- Fighting protected disks. •• 

- Paying $5.00 more for your 
programs . . . 

- Wasting a whole disk for 1 
program . . . 

- Or a program that won't run when 
you put it to disk? Well, finally... 

VECTOR FIX IS HERE! 

• Identifies machine language pro- 
grams on cassette & loads them into 
high memory. 

• Adds an appendage to patch the 
keyboard vectors enabling the 
program to run from disk regardless 
of the type of DOS. 

• Dumps the program to disk or . . . 

• Allows you to scan or modify the 
program using debug' & return to 

VECTOR FIX! 

• Full Control of your monitor. 

• Even patches programs which 
have already been put to disk by 
Apparat's 'Lmoffset Module' thus 
eliminating special loading or 
booting procedures. 

32K MODEL I TRS-80 $19.95 

DISK 

Personal checks take 15 banking days to clear. 
Send check or money order to: 

MICRO-MEDIA 

P.O. Box 538, Linden, MI 48451 



CASM ZSO EDITOR/ASSEMBLER 

TRS-80* Model I or Model III 



• SOURCE FILES CREATED AND EDITED IN RAM 

• SOURCE FILES ASSEMBLED FROM DISK 

• CHAINING OF SOURCE FILES PERMITTED 

• MACHINE LANGUAGE OBJECT CODE 

STORED IN RAM OR TO DISK 



S><& 



tt*. 
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■ TRS-80 is a trademark of Tandy Corp 
Z80 is a trademark of Zilog Corp 
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MINIMUM 
REQUIREMENTS: 
32K0FRAM 
ONE DISK DRIVE 

COMPREHENSIVE INSTRUCTION MANUAL 
«„ CASMW/MANUAL$99 

nicroProdUd" " 337 CASM MANUAL ONLY $20 
P.O. Box 892 • Marysville, WA 98270 • (206) 659-4279 dealer inquiries invited 



SAVE YOUR CLOAD 



WITH THE 



TW^r 



ff 



DATA CONDITIONER 



99 



Exclusively From Communications Systems Labs 

TIRED of CLOAD troubles with prerecorded tapes? Are CSAVEs 
a headache? USE THE DATA CONDITIONER TO: 

■Copy system and data tapes without your compute r. 

■ Eliminate noise and minor dropouts. 

■ Signal condition in both directions-loading & saving. 

■ Operates at ALL TRS-80 baud rateslMod III high speed too!). 

RUGGED CONSTRUCTION-AC POWE RED - DESIGN ED & MADE IN THE USA 
Introductory Price $59.95 (post paid) through April 30,1982 ORDER TODAY! 
Phone Order? ■■■ Use your VISA , MASTERCARD or AMERICAN EXPRESS 

call 

(808) -677 -3380 ^361 



write 
COMMUNICATIONS SYSTEMS LABORATORIES 
94-165 Leokane Street, Waipahu, HI 96797 
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Text Entry/Edit and Photocomposition 

For TRS-80 r Model-I or Ml with 48K RAM 
and 2 Disk Drives. (3 Disk for Model-I) 
"Native code" driver (parallel and RS-232) 
for Autologic APS-5* & Micro-5 Photo- 
typesetters. Full screen editing and 100, 
FDP compatible markup codes, allowing 
200 User Defined, disk resident, Formats. 
Algorithmic Hyphenation with 500 word 
expandable exception dictionary and 
maintenance program assures correct 
word breaks. Optional line printer proofing 
for context, line-breaks, and hyphenation. 
This low cost, high quality system is now 
available for immediate delivery in a 
predefined configuration of 8 Font Fami- 
lies, for Service Center Use. A complete 
Telecommunication and Mail Order APS- 
5* Typesetting Service, for your MP-X job, 
is now offered by Watson Directory Corp. 
in St. Louis MO. with rates as low as 
$4.95/ft. and measures up to 70 pica. 
Software & User Documentation.. $495. 

(User Documentation Only) $ 25. 

Complete Hw/Sw TRS-80 Model III 48K 
System with User Documentation $2895. 
Quotes on Custom Turn-Key System for 
"your" APS-5* available on request. 

MICRO PPJNT-X INC 

P.O. BOX 581 Ballinger, Texas 76821 

(915) 365-2343 

Tandy Corp 



8 Trademark Radio Shack, Di 
'Product of Autologic Inc. 
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COGNIVOX VIO-332. The affordable 



See Review in December 81 issue of 
80 MICROCOMPUTING 

If you have a TRS-80 model I, level II with at least 16K 
of RAM, COGNIVOX VIO-332 will add a whole new 
dimension to your computer. 

Imagine being able to use your voice for entry of com- 
mands and data and then listen to the computer talk 
back to you! This exciting possibility has now become a 
reality at a very affordable price. 

COGNIVOX can be trained to recognize words or short 
phrases from a vocabulary of up to 32 entries of your 
choice. To train COGNIVOX to recognize a word, you 
simply repeat the word three times under the prompting 
of the system. The voice output vocabulary can have up 
to 32 entries chosen by the user. 

COGNIVOX comes complete with microphone, power 
supply, built-in speaker/amplifier, cassette with soft- 
ware and extensive user manual. It plugs into the expan- 
sion port of the keyboard or in the expansion interface 
via a standard 40-pin flat cable with connectors on both 
ends (not included - $19 extra). 

Software provided with the unit includes demonstra- 
tion programs, two voice operated games and programs 
that play music. It is also very easy to add voice I/O to 
your own programs. A simple statement in BASIC is all 
that is needed to either recognize or say a word. 

Use COGNIVOX for data entry when hands or eyes are 
busy, as an educational tool, a sound effects generator, 
an aid to the handicapped, or as a super toy. Use it with 
the Radio Shack power controller (#26-1182) to control 
by voice appliances and lights in your home. The list is 
endless. 

COGNIVOX costs only $149 (plus $4.50 shipping in the 
US, foreign add $15 for air shipment, CA add 6% tax.) 
The 40-pin flat cable jumper is $19 extra. To order send a 
check by mail or call us at (805) 685-1854, 9AM to 5PM 
M-F and charge it to your VISA or MASTERCARD. 
COGNIVOX is backed by a 120-day warranty against 
manufacturing defects. 

VOICETEK PO. Box 388, Goleta, CA 93116 



sSee List ol Advertisers on page 402 
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The Signalman MK1 Modem 



Compact, Low cost Modem 

The Signalman MKI is a Bell 103 com- 
patible, completely portable modem. 

The Signalman interfaces to any RS-232 
port with a built in RS-232C cable. Its 
small physical size allows users to mount 
it in out-of-the-way spots with its velcro 
fasteners. A tone-audible carrier detect 
circuit replaces flashing LEDs as confir- 
mation of standard phone line connec- 
tions for both voice and data. 

Priced at $129, the modem also in- 
cludes automatic mode selection (origin- 
ate/answer) and a talk data switch. For 
more information contact Anchor Auto- 
mation Inc., 16130 Valerio St., Van Nuys, 
CA 91406, (213)997-6493. 

Reader Service ^569 



The Formula 



The Formula is a software package in- 
corporating the characteristics of a data 
base manager, a word processor, and a 
compiler language along with a general 
accounting system. It is intended to be a 
flexible system generator for business 
and other applications. 

The Formula permits complete applica- 
tion development through the process of 
defining what should go into files, steps 
the job-stream should take in processing, 



and report format. The system also pro- 
vides a complete general accounting sys- 
tem including general ledger, accounts 
receivable, and accounts payable. Also in- 
cluded is a Basic full screen editor. Label 
printing and a professional time account- 
ing system are options. 

The cost of the Formula software is 
$595. For information contact Dynamic 
Microprocessor Associates Inc., 545 Fifth 
Ave., New York, NY 10017, (212) 687-7115. 
The Formula runs on CP/M. 

Reader Service ^570 



Software Enhancements 

A Software Enhancements/Documen- 
tation package is now available for Radio 
Shack's Disk Payroll System for Models I 
and III. 

This software uses machine language 
sorts and features perfectly aligned ver- 
tical spacing and form tops on any 
80-column, or wider, printer. It also allows 
you to make changes to employee data 
without reprinting the entire screen. 

All changes to your Radio Shack disks 
are made under program control so pro- 
gramming skills are not needed. This En- 
hancement/Documentation package is 
priced at $39 and is available from Micro- 
computer Applications, 3485 Mock Or- 
ange Court South, Salem, OR 97302, (503) 
364-1090. 

Reader Service .^571 



Cave Hunting for Treasure 

Cave Hunter is a game for the 16K Color 
Computer using high resolution graphics, 
color, and sound. 

Your objective is to maneuver your way 
through a cave in search of the valuable 
treasures which lie there. As the passage- 
ways weave in all directions, angry cave 
creatures relentlessly pursue you. 

Priced at $24.95, Cave Hunter is avail- 
able from Mark Data Products, 23802 Bar- 
quilla, Mission Viejo, CA 92691, (714) 
768-1551. 

Reader Service *-572 



The Electronic Breadboard 



A new computer-aided design program, 
the Electronic Breadboard, helps elec- 
tronics technicians, engineers and experi- 
menters to evaluate voltages, currents, 
impedence and frequency responses 
without a lot of guesswork. 

The program simulates the effect of the 
addition or removal of components, calcu- 
lates point impedance, analyzes the fre- 
quency response of a circuit, and allows 
circuit designs to be saved on tape or disk. 

Available for the Model I, Level II, 16K 
and Model III, 16K for $49.95. Contact In- 
stant Software Inc., Peterborough, NH 
03458, (603) 924-9471 for more information. 

Reader Service ^573 



Cassette Business Package 

CBP is a cassette business package for 
the Model I and III with 16K. It consists of 
the following programs: a cassette data 
base manager, a word processor, an in- 
ventory control system, a stock manage- 
ment program, a check balancing pro- 
gram, a label printer, a deposit calculator, 
a statistics program, a sort utility, and a 
key access utility. 

CBP is priced at $59 and is available 
from The Micro Architect Inc., 96 Dothan 
St., Arlington, MA 02174, (617) 643-4713. 

Reader Service ^574 



Enhanced Hexspell 

Hexspell 2 is a spelling checker for the 

Models I or III with two disk drives and 48K. 

It features one step error detection and 
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for the TRS-80 from Micro -Mega 



The Original GREEN SCREEN 




The eye-pleasing Green-Screen fits over the front of your 
TRS-80 Video Display and gives you improved contrast with 
reduced glare. You get bright luminous green characters and 
graphics like those featured by more expensive CRT units. 
Don't confuse the Original Green-Screen with a piece of thin 
film stuck to the face of your video tube, such as that adver- 
tised by others. The Original Green-Screen is mounted in a full 
frame perfectly matched to the color and texture of the 
TRS-80 Video Display. It is attached with adhesive strips 
which do not mar your unit in any way. 
The full frame design of the Original Green-Screen "sguares 
off" the face of your video display and greatly improves the 
overall appearance of your system. 

(Specify whether for Model I or Model III) 

THE GREEN-SCREEN $13.95 

Add $1.50 for postage and handling. 

^162 



Terms: Check or money order, no CODs or credit cards, please Add amount 
shown lor postage and handling to price ol the item. All items shipped within 48 
hours by first class or priority mail. Virginia residents, add 4% sales tax 



Micro- Mega ■ P.O. Box 6265 ■ Arlington, Via 22206 
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AT LAST ! ! I PRINTER HELP FOR SCR I PS IT USERS 

SCRIPTR IS A DISK AND CASSETTE BASED UNIVERSAL PARALELL 

PRINTER DRIVER FOR THE SCRIPSIT WORD PROCESSING SYSTEM. 

COMPARE SCRIPTR' S FEATURES 



ENTRY AND REENTRY TO DOS WITHOUT LOSING THE TEXT. 
OUTPUT ANY CODE TO THE PRINTER FROM THE TEXT. 
PROGRAMMED COMMANDS FOR ALL MX-80 AND MICROLINE 80 
FUNCTIONS-! LINESPACING / VERT * HORIZONTAL TABS ) 
CONTINUOUS DISPLAY OF THE ENTIRE PRINTOUT. 
INSERT MATERIAL AT SPECIFIED PLACES DURING THE 
PRINTOUT FOR FORM LETTERS AND REPEATING FORMS. 
EDITING DURING THE PRINTOUT FOR ERRORS, CHANGES. 
KEYBOARD ENTRY OF (7) GRAPHICS DURING EDITING. 
MACRO FUNCTION FOR DRAWING BORDERS WITH GRAPHICS 
VARIABLE SPEED PROGRAMABLE SPEED READER. 
AN INTERACTIVE ERROR CHECKING MODE. 
SEE WHERE ALL PAGES WILL START AND END WITHOUT 
DOING A PRINTOUT AND WASTING PAPER OR TIME. 
UNDERLINING , EVEN WITH GRAPHICS. 

6 SAMPLE PROGRAMS FULLY EXPLAINING ALL FUNCTIONS. 
65 PAGE BOUND MANUAL, INDEXED, EASY TO READ TYPE. 
RETURN PROG+DOC FOR FULL REFUND IF NOT SATISFIED. 
WILL WORK WITH ANY PARALELL PRINTER. 



10) . 
11). 

12) . 
13> . 

14) . 

15) , 

16) . 



THE PRICE OF THE DISK VERSION IS «40.00 WHICH 
INCLUDES POSTAGE AND HANDLING. VERSIONS AVAILABLE 
FOR MODEL I. +11 1. MODEL III. VERSION WORKS WITH MOD I. 
SCRIPSIT/LC AND NOT WITH THE STANDARD MODEL III. VER- 
SION OF SCRIPSIT. WE ALSO DO CUSTOM VERSIONS FOR OTHER 
POPULAR PRINTERS AT REASONABLE PRICES. SPECIFY MODEL 
COMPUTER DESIRED. FOR ORDERS OR INQUIRIES WRITE / CALL 




PIONEER SOFTWARE 
1746 N.W. 55TH AVE. #204 
LAUDERH I LL , FLOR I DA 
33313 (305) -739- 2071 



CHECKS - MONEY ORDERS / ACCEPTED - COD'S 

......■■■■■■■ nn 




SOFTWARE you can BET oni 



fiL 



OPTION 80 



II you gamble in the Dig casino-Wall 
Street -you need a program to evaluate 
call options 0PTI0N80 tells you 
when it's time to buy and when it's time 
to sell. Suggests hedges to minimize 
your risk Takes only 15 minutes a week 
to update and run. Comes with data 
tor 25 calls Easily expanded to include 
as many as you wish. Sold only on 

« Sm ° On.y $25.00 



* 



TOUT 3 



i DRAWS 



A vastly improved version ot the 
original TOUT horse race handicapper. 
Now. thousands ot races are simu- 
lated in seconds to give you each 
horse's probability ot winning and 
identity overlays. Horses are 
screened using factors derived trom 
an operations research study This 
handicapper outperforms programs 
and calculators selling lor much more. 

Only $19.0° 



Jacks or better to open with a joker that 
can be used as an ace or in straights 
or Hushes (Gardenia CA rules). You play 
against six computer-controlled oppo- 
nents. This program has true arliticial 
intelligence capabilities DRAW5 was 
developed originally by Real World 
Simulations. Alter three years ot refining, 
it's now available for the TRS-80. It 
will provide hours ol fun. challenge and 
education Now 30% 
taster Only $15.00 



T0UT3 and 0RAW5 supplied on 500 baud cassette. Add $4.00 

for Model I or III diskette. All programs available on 8" 

disk for Model II at 56 00 additional. PA residents add 6% sales 

WILSON 

Software Division • 539 Springhouse Lane • Camp Hill, PA 17011 



tax. North Star diskette version ol DRAW5 can be obtained 
Irom Real World Simulations, Box 4107. Torrance. CA 90510. 



TRS-80 is a Tandy Corporation trademark. 



Houston's Software Store • Micro Solutions, Inc. 

Color Computer Software • Model I • Model III • Model II & CP/M 

Communications Programs • 
Color Computer • Rompack that allows your primer to be used with your modem. Allows downloading to tape. 
Model I or III • Intelligent terminal program easy to use. Allows downloading and uploading (Disk) 

Games • 
Color Computer 
Model I or III 



Rompack "Star Blaster" action packed machine language high res. graphics (Requires 16k) 
Arcade games Meteor Mission 2. Galaxy Invasion, Robot Attack, Cosmic Fighter. (Tape/Disk) 
and more. Send for list 



$59.95 

$149.95 



. . . . $39.95 
11695/20.95 



Accounting Programs 
Model III 



Model II 



In Houston 
9949 I. Harwin 
Houston, Tx. 77036 
(713)-789-5443 



General Ledger 400 accts. 1000 transactions/month, allows for departmental income statement $199.95 

Accounts Payable 400 accts. 1000 transactions/month, and 99 department codes $199.95 

Accounts Receivable 400 accts. 1000 transactions/month, and 99 department codes $199.95 

Payroll 400 employees weekly, bi-weekly, monthly, salaried, hourly, 2 misc. ded $199.95 

Available for floppy or hard disk. Capacities below are for 2 tloppy drive systems. 

General Ledger 5000 accts, 2000 transactions/month, allows for departmental income statements $499.00 

Accounts Payable 2000 accts. 5000 transactions/month, and 99 departmental codes $499.00 

Accounts Receivable 2000 accts, 5000 transactions/month, and 99 department codes $499.00 

Payroll 2000 employees weekly, bi-weekly, monthly, salaried, hourly. 2 misc. ded $499.00 

In Florida 
P.O. Box 271793 
VISA-M/C Accepted Tampa, Fl. 33688 

Prices include handling and shipping 

^362 






$14.95 



** 



11 .55 S & H 
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WILL-0-BOX 

Holds 50 discs 5V* 
Removable sliding 
top 

Protects your Discs 
Sturdy Acrylic 
8 in. Box $21 .95 
+ $1.75S&H 

WILL-O-SCREEN FOR TRS-80® 

Sturdy Acrylic-gr, amber, lime 
Mod I-S5.95. Mod ll-$7.95, 
Mod lll-$6.95 +$1.25S&H each 



BIBLE TEACHING PROGRAMS 

TRS-80 LVII16K 
Learn the order of Bible Books 

Tape Disc 

1. O.T. Books--$4.95 7.95 

2. N.T. Books--$4.95 7.95 

3. Both O.&N. --$7.95 10.95 

MONEY BACK GUARANTEE 
Send check or money order 

"WILLIAMS ENTERPRISES" 
3101 CheverlyAve. 
^heverly , MD 207£ 

• Radio Shack 



******************** 
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correction. Erroneous words are highlight- 
ed in full context when detected, and can 
be immediately replaced. The replace- 
ment word itself is immediately checked 
for correctness. 

In addition to dictionary words, Hex- 
spell 2 checks complete texts includ- 
ing codes, formulae and numbers com- 
mon in many commercial and technical 
documents. 

For more detailed information contact 
Hexagon Systems, Box 397, Station A, 
Vancouver, BC. Canada V6C 2N2, (604) 
682-7646. It is priced at $99. 

Reader Service ^582 



Software For Physicians 

MOS-2 Software gives Physicians in 
groups of up to ten the ability to organize 
information on 15,000 patients by name 
and procedure and to file transactions on 
both daily and monthly bases. 

Among the features available are in- 
surance form processing, recall capabili- 
ty, morbidity indexing, diagnosis and pro- 
cedure statistics, aged receivables and 
patient account status. Options include a 
referral file to keep track of referring doc- 
tors, and word processing to send 
customized letters. 

The system is designed for the Model II. 
A demonstration disk is available for $99. 
The full system is priced at $499. Contact 
Windham Software Inc., 29-31 Ivanhill St., 
Willamantic, CT 06226. 

Reader Service ^592 

Winchester Disk 
Storage Subsystem 

The MSC 9700 Subsystem combines 
the Seagate Technology ST-506 5.25-inch 
Winchester disk drive, the Xebec S1410 
controller, and a 115V/230V power supply. 

Its features include: 22-bit error detec- 
tion, 11-bit error correction, a full sector 
data buffer, and single command disk ini- 
tialization. A one or two-drive version of 
the subsystem is available for either five 
or 10-megabytes of on-line storage 
capacity. 

Through the use of interchangeable 
host adapter personality cards, the sub- 
system can be compatible with a variety 
of microcomputer systems. 

The MSC 9700 is priced at under $3000, 
the Host adapters for under $200, from 
Microcomputer Systems Corporation, 432 
Lakeside Drive, Sunnyvale, CA 94086, 
(408) 733-4200. 

Reader Service ^-583 



Expands Color 
Computer Memory 

The 16 Plus Board expands the Color 
Computer's Memory from 16K to 32K. 

The board does not require soldering, 
plugs in easily, and fits neatly under the 
RF shield cover. Its design allows the 
graphics display to reside anywhere 
within the 32K memory. No modifications 
are required for existing software. 

The board costs $84.95 from Computer- 
ware, Box 668, 1472 Encinitas Blvd., En- 
cinitas, CA 92024, (714) 436-3512. 

Reader Service ^584 



Cookbook on a Disk 

Dinner on a Disk, a completely 
automated cookbook, contains over 100 
full screen "pages" of proven recipes. 

Published directly on a five-inch disk, 
this cookbook requires no technical train- 
ing or knowledge. 

The disk is available for TRS-80 Models 
for $14.95 from The Computerized Shop- 
per, 683 Towles, Palo Alto, CA 94306 (415) 
856-7467 

Reader Service ^585 



Speedup Enhancement 

The 4MHz Speedup Enhancement dou- 
bles the processor speed of the MTI Mod 
III plus 140, 240 or 280 systems when used 
with the DOS plus operating system. The 
enhancement is software selectable. 

The 4MHz speedup enhancement, Mod- 
el #1414, sells for $149. A retrofit/installa- 




The 16 Plus Board. 

tion is available for $50 for owners of Mod 
III plus or TRS-80 Model III owners. Con- 
tact Microcomputer Technology Inc., 3304 
W. MacArthur Blvd., Santa Ana, CA 92704, 
(714)979-9925. 

Reader Service ^586 

Morse Code Tutorial 

Code Class is a machine language 
Morse Code tutorial program for the 
Models I and III. 

This program is interactive and pre- 
sents a variety of formats, non-repetitive 
sequences, and user-adjustable speeds. It 
is available on disk for $39 and on cas- 
sette for $29. For additional information 
contact Macrotronics Inc., 1 125 N. Golden 
State Blvd., Suite G, Turlock, CA 95380, 
(209) 667-2888. 

Reader Service ^587 




The MSC 9700 Series. 
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An Index to 
Your Data Base 



Newtrieve replaces Basic sequential 
searches with a machine language se- 
quential search program. 

When installed in a Basic program, 
Newtrieve locates key words to further ac- 
cess a data base. As an in-memory, recur- 
sive package, it has the ability to sequen- 
tially search an array of 500 40-character 
search string indexes quickly. Switches 
allow for Excluding, Divide Index, Single 
Search, in-memory changes, re-write of 
load module, and selectively browsing 
through the index. 

Once a program has been established, 
either interactively or from an external 
data file, a load module may be created to 
facilitate start-up in less than 10 seconds. 
Additional indexes can be written and 
successively loaded and searched using 
the same or an alternate Basic program. 

Newtrieve is available for $49.95 and is 
available from Unique Printing and Sta- 
tionery Company Inc., 11 Maiden Lane, 
New York, NY 10038, (212) 732-2244. 

Reader Service »^575 



Introduction 

To Word Processing 

Introduction to Word Processing ex- 
plains in non-technical language what 
word processing is and how it can in- 
crease personal productivity. 

This step-by-step guide provides a com- 
plete, comparative analysis of currently 






' 




The Orbitrak Screen Display. 



available equipment for anyone consider- 
ing buying a system. 

Contact Sybex, 2344 Sixth St, Berkely, 
CA 94710, (415) 848-8233 for information. 
The book is priced at $12.95. 

Reader Service ^-576 



Taxpro 



Taxpro enables the user to compute the 
most profitable way of completing tax 
returns. All popular tax forms are avail- 
able, as well as many of the more compli- 
cated ones. 

Available for the Model I and III, Taxpro 
is priced at $149.95 for the first edition, 
and $60 for each yearly revised edition. 
For information contact Videotronics, 
4086 Honolulu Dr., Sarasota, FL 33583, 
(813)371-7255. 

Reader Service ^577 










The Ultraswitch Self-contained Switchbox. 



Satellite tracking 

With the Color Computer 

Orbitrak is a real-time satellite tracking 
program for the Color Computer. The pro- 
gram displays a map of the world and 
plots the ground track of the satellite as 
its orbit progresses. 

Of special interest to ham radio opera- 
tors for use in tracking the Oscar satel- 
lites, Orbitrak also tracks the space shut- 
tle or other objects in the earth's orbit. 

The program requires a 16K Color Com- 
puter. It is distributed on cassette for 
$14.95 from California Information Com- 
pany (CALICO), Box 462, Torrance, CA 
90508,(714)828-5429. 

Reader Service ^578 



Pilot Directional Finder 



Economical navigational program 
enables you to locate your position, 
distance to destination, heading to desti- 
nation, I D's and their altitudes, and recal- 
culates your position, distances and 
headings as radials change. The program 
is compact, portable and pocket size, no 
installation is necessary. Navigational 
Systems are available for the entire U.S. 
(except Hawaii & Alaska). Three adjacent 
states per cassette tape program are 
provided. 

This system may be used on a TRS-80 or 
Sharp PC-1211 Pocket computer and 
printer interface with any tape cassette re- 
corder with ear and remote hook-up. Con- 
tact PDF, 4388 Alpine Road, Portola Val- 
ley, CA. 94025", for additional information. 

Reader Service ^579 



Self-Contained Switch Box 

Ultraswitch is a self-contained switch 
box that allows for expansion of your sin- 
gle Centronics-style port to dual ports. 
This allows the user to activate a second 
peripheral device through software selec- 
tion or the flip of a switch, eliminating con- 
stant plugging and unplugging of periph- 
eral cables. 

Fully buffered inputs and outputs 
shield against noise interference. Ultra- 
switch is software-selectable. Each port 
buffers and controls eight datalines, one 
data strobe, and two status lines. 

Priced at $165, Ultraswitch is available 
from Leonard N/C Systems, 1677 North 
Marshall Road, Suite C, El Cajon, CA 
92020,(714)448-8020. 

Reader Service ^580 
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COMPUTER . AUDIO 
CASSETTES ►* CASSETTES 





® 



96K CP/M 

(For your TRS-80* Model II) 
Multiple Job Executive 

Add a whole new dimension to your 
TRS-80 Model II. Let it work while you 
work!! 

ATON's unique JobStream™ CP/M 2.2, along with additional RAM memory; allows you to 
simultaneously compile, assemble, or link in one 64K background partition (62K TPA) while you 
edit files, and spool to the printer, and communicate with another computer in up to four 32K 
foreground partitions (28K TPA). 

As you expand memory beyond 64K, you also enter the amazing world of TrackMode BIOS™ 
which not only multiplies diskette speed up to five times, but also automatically performs read 
after write checks for the ultimate in data reliability. 

•Gain hard disk performance for a fraction of the cost — and no backup problems!!! 

•Works in 32K, add RAM memory to 256K using standard Radio Shack memory boards. 

• Supports two sided expansion disk drives (1.2 megabytes per diskette). 

• Allows 6K 7K more space for user programs (62K TPA). 

JobStream CP/M 2.2 (with Z-80** Debugger) $235 

Omni Writer™ Video Text Editor $150 

Z-80 Debugger Source Code $ 50 

Package of above (a $435 value) $295 



"Software with Service" 



>" ^ Internat 



on 



ional 



Inc. 



Prepaid, Visa, MasterCard or COD. 
Shipping and handling extra. 
California residents add 6% sales tax. 
Product price and availability subject to 
change without notice. 

CP/M" Digital Research. Inc. "'"Zilog Corp. 
JobStream. TrackMode BIOS'" ATON Intl. 
Omni Writer'" Omnigraphics ''"Tandy Corp. 

260 Brooklyn Avenue, San Jose, CA 95128 
(408) 286-4078 ^ 92 J 



NEW PRODUCTS 



Book Covers 
Microprocessors 



Introduction to Microprocessors: Ex- 
periments in Digital Technology is a guide 
to the use of integrated circuits. 

The book's seven chapters contain 35 
experiments encouraging the reader to 
construct electronics projects using in- 
tegrated circuits. The use of microproces- 
sors in microcomputers is stressed, with 
emphasis on construction, function and 
programming. 

Priced at $10.95, the book is available 
from Hayden Book Company Inc., 50 Es- 
sex Street, Rochelle Park, NJ 07662, (800) 
631-0856. 

Reader Service ^588 



Video Glare Screens 

Low-cost glare filters are now available 
for the Model I and III with a free home trial 
period. 

The filters are four-layered optical fil- 
ters, with two spectral responses. One is a 
neutral density filter (appearing grayish) 
and the other is a blue-green filter. The 
combination enhances contrast, even in 
brightly lit rooms, without greatly at- 
tenuating the image lines. 

These filters are priced at $10 and are 
available from The National Institute for 
Rehabilitation Engineering, 97 Decker 
Road, Butler, NJ 07405, (201) 838-2500. 

Reader Service ^589 



Air Combat 
Computer Games 

Two new air combat computer games, 
Dawn Patrol and Chennault's Flying 
Tigers, are now being marketed. 

Dawn Patrol deals with World War II, 
while Chennault's Flying Tigers covers 
the air war over China and the Pacific in 
1937-1942. Both games feature real-time 
animated graphics. 

In each game you fly a choice of a 
dozen or more fighter planes into combat 
against a computer-controlled force of op- 
ponents. Success or failure depends upon 
your ability to learn and exploit the advan- 
tages and weaknesses of every aircraft. 

These games are available for the Mod- 
el I, Level II and Model III machines on a 
16K machine language cassette from Dis- 
covery Games, 936 W. Highway 36, St. 
Paul, MN 55113. 

Reader Service .--590 
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Centronics 730 

Same as Radio Shack 
Line Printer II 



Once $995 



ytf?& now buaU 



While they last 



Plus $10 for shipping & insurance 





5 1 /4 Disc Drives 

ForTRS-80 Mod. 1 35 or 40 track capability 



$279 



■■ 1 1 Single Or double density (with proper interface) 

Choice of M PI or Tandom drives 

Add $7.50 for shipping 



5 1 /4 Discs for TRS-80 and Apple 

Prime First Quality 

MEMOREX Discs as low as $1.89 per disc 




In lots of 100 



Part No. 

3401 

3431 withHubrlng 



10 or More 
$2.09 
$2.35 



50 or More 
$1.99 
$2.25 



100 or More 
$1.89 
$2.15 



MiniMicrolVlsrt , Inc 

S 943 W.Genesee St. Syracuse, N.Y. 13204 (315)422-4467 



WE WILL NOT BE UNDERSOLD 



CP/M® Software Software/Manual only 

Computer Pathways 

Pearl (level 1) $ 99/S25 

Pearl (level 2) $299/$40 

Pearl (level 3) $549/$50 
Digital Research 

PL/l-80 $459/$35 

BT-80 $179/ $30 

Mac $ 85/$15 

Sid $ 65/$15 

Z-Sid $ 90/$15 

Tex $ 90/$15 

DeSpool $ 50/$10 
Micropro 

WordStar $319/$60 

Customization Notes $ 89/$na 

Mail-Merge $109/$25 

WordStar/Mail-Merge $419/$85 

DataStar $249/$60 

WordMaster $119/$40 

SuperSort I $199/$40 

Spell Star $175/$40 
Microsoft 

Basic-80 $289/$na 

Basic Compiler $329/$na 

Fortran-80 $349/$na 

Cobol-80 $574/$na 

M-Sort $124/$na 

Macro-80 $144/$na 

Edit-80 $ 84/$na 

MuSimp/MuMath $224/$na 

MuLisp-80 $174/$na 
Organic Software 

Milestone $269/$30 
Supersoft 

Diagnostic I $ 49/$20 

Diagnostic II $ 84/$20 

Disk Doctor $ 84/$20 

Forth (8080 or Z80) $149/$30 

Fortran $219/$30 

Fortran w/Ratfor $289/$35 

Other less 10% 
Unicorn 

Mince $149/$25 

Scribble $149/$25 

Both $249/$50 
Data Base 

FMS-80 $649/$45 

dBASE II $595/$50 

Access/80 $699/$50 

PdSCdl 

Pascal/MT+ $429/$30 

Pascal/M $189/$20 
Miscellaneous 

SpellGuard $299/$25 

The Last One $549/$na 

SuperCalc $259/$50 

CBASIC-2 $ 98/$20 

MicroStat $224/$25 

StatPak $449/$40 

Micro B+ $229/$20 
Apple Software (Business) 
Micropro 

Wordstar $239 

MailMerge M $ 89 

Wordstar/MailMerge m $349 

SuperSort I $159 

Spellstar $175 
Personal Software M 

Visicalc 3.3 $229 

CCA Data Mgr '/. $ 99 
Desktop/Plan II ^mmM^ $229 

Visiterm $139 

Visidex $229 

Visiplot $185 



Personal Software (cont.) 

Visitrend/Visiplot 

Zork 

Miscellaneous 

Micro Courier 

Super-Text II 

ASCII Express 

Apple Software (Entertainment) 

Wizard & Princess 
Mystery House M 

Flight Simulator 
Raster Blaster 
Space Eggs §■ 

Sargon II 
ABM 

Micropainter 'iliilillllll? 

Apple Panic 
Pool 1.5 

Apple Accessories 
Z-80 Softcard 
Keyboard Enhancer 
Apple Joystick 
Sup-r Mod 

CPS Multifunction Card 
Videx Board 
16K Card 
Sup-r Fan 
ALF9 Voice Board 
CCS Cards 

CCS Parallel Model 7720 
CCS Serial Model 7710D 
CCS Centronics Model 7728 
Disk Drives For TRS-80* Model 1 
CCI-100 5 1 /.", 40 Track 

I Add-ons for Zenith Z-89 
CCI-189 5V4", 40 Track 
Z-87 Dual 5Va" system 
Drives for Z-90 
External card edge and power supply 
included. 90 day warranty/one year on 
power supply. 

Corvus 5M 
Corvus 10M 
Corvus 20M 
Corvus Mirror 

Shugart 8" 801 R Raw Drive 

TANDON 5Va" Raw Drive 

Power Supplies 

Diskettes— Box of 10 

Maxell 5 Va" $ 40 

Maxell 8" $ 45 

BASF/ Verbatim 5 Va" $26.95 

BASF/ Verbatim 8" $ 36 

Plastic File Box— Holds 50 5'/4" dskts. $ 19 

Plastic Library Case 5 Va" $ 3 

Plastic Library Case 8" $ 4 

Head Cleaning Diskette $ 25 

Floppy Saver $10.95 

Floppy Saver Rings $ 6.95 

16K RAM Kits 

One Kit $13.95 

Two Kits $25.00 

200ns for TRS-80*, Apple II, 

(specify): Jumpers $ 2.50 

Computer Systems 

Altos ACS8000 Series $ Call 

Atari 400 $ 359 

Atari 800 $ 789 

Call for other Atari products 

Zenith Z89, 48K $ Call 

Zenith Z90, 64K $ Call 

Call for other Zenith products 

For fast delivery, send certified checks, money orders or 
call to arrange direct bank wire transfers. Personal or 
company checks require one to three weeks to clear. All 
prices are mail order only and are subject to change 
without notice. Call for snipping charges. 



$275 
$ 34 

$219 
$127 
$ 59 

$ 28 
$ 24 
$ 29 
$ 26 
$ 18 
$ 29 
$ 22 
$ 29 
$ 28 
$ 26 

$299 
$110 
$ 49 
$ 25 
$199 
$249 
$159 
$ 39 
$149 
$Call 
$Call 
$Call 
$Call 

$299 

$389 
$995 
$Call 



$3089 
$4489 
$5429 
$ 699 

$ 399 
$ Call 
$ Call 




Terminals 

Adds Viewpoint 

Zenith Z-19 

Televideo 910 

Televideo 920C 

Televideo 950 

S-100 California Computer Systems 

Mainframe 

Z80 CPU 

64K RAM 

Floppy Disc Cntrl 

Integrated Sys. w/int. cables, tstd. 

2P + 2S I/O 

4 Port Serial I/O 

4 Port Parallel I/O 

Casio Calculators 

Pocket Comp. FX702 

Desk Printr/Calc. FR100 



$ 349 
$ 239 
$ 569 
$ 339 
$1975 
$ 269 
$ 249 
$ 179 



Scientific Calc. 
Game Watch 
Game Watch 
Calendar Watch 
Printers 



$185.00 
$ 79.95 
$ 49.95 
$ 49.95 
$ 69.95 
$ 59.95 




FX8100 
CA90 Plastic 
CA901 Steel 
AX210 
NEC Spinwriter 

7710 R.O. Ser $2395 

7710 Ser w/tr. $2595 

7720 KSR w/tr. $2795 

7730 R.O. Par $2395 
7730 R.O. Par w/tr. $2595 
NEW 3500 Series $ Call 

Epson MX-70 $ Call 

Epson MX-80 $ Call 

Epson MX-80FT $ Call 

Epson MX-100 $ Call 

PaperTiger 445 Gr. & 2K $ Call 

PaperTiger 460 Gr. & 2K $ Call 

PaperTiger 560 Gr. $ Call 

IDS Prism 80 $ Call 

IDS Prism 132 $ Call 

PaperTiger Access. $ Call 

Anadex DP-8000 $ 849 

Anadex DP-9500/01 $1389 

Okidata Microline 80 Fric. & pin feed $ Call 

Okidata Microline 82A Fric. & pin feed $ Call 

Okidata Microline 83A 120 cps $ Call 

Okidata 84 200 cps $ Call 

Centronics 739 $ 739 

C.ltoh Starwriter I 25 cps, par. $1525 

C.ltoh Star writer I 25 cps, ser. $1620 

C.ltoh Starwriter II 45 cps, par. $1950 

C.ltoh Starwriter II 45 cps, ser. $2075 

Axiom GP-80M $ 319 

Data South 180 cps $ Call 

Olivetti DY 211 Daisy Wheel $ Call 
Monitors 

Leedex 12" B&W $ 129 

Leedex 12" Green Screen $ 139 

Leedex 13" Color $ 329 

Sanyo 9" B&W $ 149 

Sanyo 9" Green Screen $ 189 

Sanyo 12" Green Screen $ 249 

Sanyo 12" B&W $ 239 

Sanyo 13" Color $ 449 

Zenith 13" Color $ 349 

Zenith 12" Green Screen $ 129 
Telecommunications 

Prentice Star Modem 1-yr. guar. $125 

Univ. Data System UDS103LP $ 135 

Univ. Data System UDS103JP $ 175 

Novation Cat $ 139 

Novation D-Cat $ 149 

Novation Auto-Cat $ 199 

Novation Apple Cat II $ 299 

D.C. Hayes Smart. Modem $ 249 

D.C. Hayes Micro-Modem II $ 295 

CCI Telnet Com. Package $135 



dealer (national/international) inquiries invited Send for FREE Catalogue 



The 



TO ORDER CALL TOLL FREE 1-800-343-6522 

TWX: 710-348-1796 Massachusetts Residents call 617/242-3361 



420-423 Rutherford Ave., Dept. M03M, 

Charlestown, Massachusetts 02129 

Hours 9 AM-8 PM (EST) Mon.-Fri. (Sat. till 5) 

■•See List ot Advertisers on page 402 



Technical Information call 617/242-3361 
Massachusetts Residents add 5% Sales Tax 
Tandy Corporation Trademark/' Digital Research 



master charge 



VISA 
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Why use their flexible discs: 

Athana, BASF, Control Data, Dysan, IBM, Maxell, Nashua, 
Scotch, Shugart, Syncom, 3M, Verbatim or Wabash 

when you could be using 

MEMOREX 

for as low as $1.94 each? 

Find the flexible disc you' re now using on our cross reference list... 
then write down the equivalent Memorex part number you should be ordering. 
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Memorex Flexible Discs... The Ultimate in Memory Excellence 



Quality 

Memorex means quality products that you can depend on. 
Quality control at Memorex means starting with the best 
materials available. Continual surveillance throughout the 
entire manufacturing process. The benefit of Memorex's years 
of experience in magnetic media production, resulting, for 
instance, in proprietary coating formulations. The most sophis- 
ticated testing procedures you'll find anywhere in the business. 

100 Percent Error Free 

Each and every Memorex Flexible Disc is certified to be 100 
percent error free. Each track of each flexible disc is tested, 
individually, to Memorex's stringent standards of excellence. 
They test signal amplitude, resolution, low-pass modulation, 
overwrite, missing pulse error and extra pulse error. They are 
torque-tested, and competitively tested on drives available 
from almost every major drive manufacturer in the industry 
including drives that Memorex manufacturers. Rigid quality 
audits are built into every step of the manufacturing process 
and stringent testing result in a standard of excellence that 
assures you, our customer, of a quality product designed for 
increased data reliability and consistent top performance. 

Customer-Oriented Packaging 

Memorex's commitment to excellence does not stop with a 
quality product. They are proud of their flexible discs and they 
package them with pride. Both their packaging and their 
labeling have been designed with your ease of identification 
and use in mind. The desk-top box containing ten discs is 
convenient for filing and storage. Both box labels and jacket 
labels provide full information on compatibility, density, sec- 
toring, and record length. Envelopes with multi-language care 
and handling instructions and color-coded removable labels 
are included. A write-protect feature is -wailable to provide 
data security. 

Full One Year Warranty — Your Assurance of Quality 

Memorex Flexible Discs will be replaced by Memorex if they 
are found to be defective in materials or workmanship within 
one year of the date of purchase. Other than replacement, 
Memorex will not be responsible for any damages or losses 
(including consequential damages) caused by fhe use of 
Memorex Flexible Discs. 



Quantity Discounts Available 

Memorex Flexible Discs are packed 10 discs to a carton and 
10 cartons to a case. Please order only in increments of 100 
units for quantity 100 pricing. We are also willing to accom- 
modate your smaller orders. Quantities less than 1 00 units are 
available in increments of 10 units at a 10% surcharge. 
Quantity discounts are also available. Order 500 or more 
discs at the same time and deduct 1%; 1,000 or more saves 
you 2%; 2,000 or more saves you 3%; 5,000 or more saves you 
4%; 1 0,000 or more saves you 5%; 25,000 or more saves you 
6%; 50,000 or more saves you 7% and 1 00,000 or more discs 
earns you an 8% discount off our super low quantity 1 00 price. 
Almost all Memorex Flexible Discs are immediately available 
from CE. Our warehouse facilities are equipped to help us get 
you the quality product you need, when you need It. If you need 
further assistance to find the flexible disc that's right for you, 
call the Memorex compatibility hotline. Dial 800-538-8080 
and ask for the flexible disc hotline extension 0997. In California 
dial 800-672-3525 extension 0997. 

Buy with Confidence 

To get the fastest delivery from CE ol your Memorex Flexible Discs, send 
or phone your order directly to our Computer Products Division. Be sure 
to calculate your price using the CE prices in this ad. Michigan residents 
please add 4% sales tax. Written purchase orders are accepted from 
approved government agencies and most well rated firms at a 10% 
surcharge for net 10 billing. All sales are subject to availability, 
acceptance and veritication. All sales are final. Prices, terms and 
specifications are subject to change without notice. Out ot stock items 
will be placed on backorder automatically unless CE is instructed 
differently. Minimum order$50.00. International orders are invited with 
a $20.00 surcharge for special handling in addition to shipping charges. 
All shipments are F.O.B. Ann Arbor, Michigan. No COD'S please. Non- 
certified and foreign checks require bank clearance. 

Mail orders to: Communications Electronics, Box 1002, Ann 
Arbor, Michigan 48106 U.S.A Add $8.00 per case or partial-case of 
100 8-inch discs or $6.00 per case of 100 S'.i-inch mini-discs for 
U.P.S. ground shipping and handling in the continental U.S.A. If you 
have a Master Card or Visa card, you may call anytime and place 
a credit card order. Order toll-free in the United States. Call 
anytime 800-521-4414. If you are outside the U.S. or in Michigan, 
dial 313-994-4444 Dealer inquiries invited. All order lines at 
Communications Electronics are staffed 24 hours 






VISA 



MasterCard) 



Order Toil-Free! 
(800)521-4414 

In Michigan (31 3) 994-4444 




For Data Reliability — Memorex Flexible Discs 
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Computer Products Division 

854 Phoenix D Box 1 002 D Ann Arbor, Michigan 48 1 06 U.S.A. 
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345 Discovery Games 398 
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193 Documan Software 325 
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570 Dynan-ic Micor-ooMssor Asso: Inc 394 

216 E.A.P. Company 369 

49 ESI LYNX 289 

177 E-Z Sohwarn 96 

295 Edu-Ware 357 

338 Ehlen Enterprises 393 
154 Eigen Sysiems 299 

• 80 MIc-'DCcmpuung '25 
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159 Electronic Specsi-sts 359 
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36 Fantast : Software 117 
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336 JMC Corporation 357 
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42 JPC Products 301 
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354 K&K Compiler Peripherals 243 
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■ Kengce Co-pn'at'on :w 389 



163 Keyline Computer 86 

359 Kwik Software 201 

30 LNW Resea-rh 6 

31 LNW Researr n 95 

32 LNW Researcl 333 

33 LNW Resea-cr. 259 
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571 Microcomputer Apt nations 394 
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586 Microcomputer Teen mr 3* 
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327 Software Suppo" '21 
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205 Starbuck Data Company 368 
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180 Sturdivant & Dui . 325 
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■ Subscription Problems 201 

558 Summerville Ervcnses 191 

285 Sun Research 359 

576 Sybex 397 

233 Synergetic Solutions 107 

• Synergistic Sola- Inc 266 
176 Syntex Electron c innovations 96 
174 Syracuse R&D Center 201 
189 Tab Sales Compan. 150 

70 Taranto S Assoc ales 221 

510 Tasso, Scott C 369 

335 TatumLabs 357 

204 Technical Softwa-e Systems 264 

568 Telecompute Integrated Systems, mc >92 

59 Texas Compute- Systems 17/291 

81 Total Access... '99 

37 Traxx 39 

Twenty First Century Software 215 

Unique Printing s Stationery Co mc 397 

University Mlorol.lms 336 

VRDataCorpcali.nn i'O 171 

Van Horn Office Supply 233 

Videotronics... 349 

Videotronics... 197 

Voicetek 393 

Volks Microcom; jter Sysiems Inc 363 

Walonick Assor. ales 259 

Warren Instrotech Ltd 392 
Wayne Green Hooks 310 Jit. 312. 313 

Western Operations 43 

White River Pr.-xijcls 257 

Williams Enterpr.ses 395 

Wilson Software 395 

Windham Softwa.e 396 

workbench Software 243 

XYZT Computer C mens ons mc 359 

York 10 Compute-ware 328 



For further information from our advertisers, please use the Reader Service card. 
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SERVICE 



Reader Service: To receive more information from any of the advertisers in this issue of 80 Microcomputing. 
circle the number on the postage-paid Reader Service Card that corresponds with the Reader Service 
number on the ad in which you are interested. You will find numbers, preceded by a -• , near the logo of each 
advertiser. Complete the entire card, drop into a mailbox and in 4-6 weeks you will hear from the advertiser 



This card is valid until April 30, 1982 

Please help us to bring you a better magazine — 
by answering these questions. 



A. What It your occupation? 

D 1. Professional 

D 2. Engineer 

U 3. Data Processing 

; : 4. Business 

i J 5. Education 

U 6. Technician 

U 7. Government 

1 : 8. Student 

. 9 Other 



B. What an your primary Interests In applications 
ol your TRS-80? Rata all that apply on a scale ot 1 
II aaati to S (moat). 
: 1. Business 
'.1 2. HobDy 

U 3. Home Management/Finance 
I i 4. Education 
i 1 5. Science or Technical 
: 6. Other 



C. la your computer uae: 

U 1. Connected with your occupation 
U 2. Not connected with your occupation 
U 3. Both of the above apply 

0. What ol type ot TRS-oO do you own? 

1. Model I Level I 

2 Model I Level II 

3. Model II 

4. Model III Level I 

5. Model III Level II 
. 6. Color 

7 Pocket Computer 

E. On average, how many of each Issue's program 
listings do you actually type Into your microcom- 
puter? 



F. Are you currently a member of t 

1. Yes Which one' 



Q. To what types of software us< 
belong? 

2 General Club 

3 College Organization 

4 Other 



H. From what companies have you purchaaed soft- 
ware? 

1. Hayden 

2 Hewlett-Packard 

3 Inslant Software 
4. Microsoft 

5 Personal Software 

6. SAMS 

7 Other 

I. How many people read your copy of 80 

Microcomputing? 



J. Where did you obtain this copy ot 80 Microcom 
puling? 

1. Subscription copy 
2 Newsstand 
3. Computer store 

4 Friend 

5 Other 

K. Please enter the month and page number ot your 
favorite 80 Microcomputing article published 
during the last 12 months 



L. On a scale of (no Interest) to 5 (great Interest) 
pleaae rate your Interest In the following col- 

1. Remarks 

. 2. Inside SO 

3. 80 Applications 

4 Education 80 

5. News 

6 Exclusive 80 

7 80 Accountant 

8 Kitchen Table Software 

9 The Assembly Line 

10 Input 

11 New Products 
12. Reviews 

M If you are not a subscriber please circle 500. 



directly. 
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BOOKS 



80 Microcomputing 
Peterborough NH 03458 



Please send me the following 80 
Microcomputing products: 



Oty. 


Catalog * 


Title 


Unit Price 


Total 









































































SUBSCRIPTION 



microcomputing 



subscribers save $10 

off the 

newsstand price. 



Shipping and handling charges: 

S 1 .50 I st book, $ 1 .00 each additional book 

(UPS, u.se street address) 

SI 0.00 each book overseas airmail 



Shipping/handling 
Total 



Enclosed $_ 
Bill: D AE 

Card# 



D MC 



□ Check 
DVISA 



□ M.O. 



□ New subscription 
D 1 year— $24.97 



D Renewal 



Enclosed $ D Check D M.O. 

Bill: □ MC a Visa D AE U me 



Exp date. 



Interbank # 



Signature 
Name 



Address 
City 



State 



Zip 



Card# 

Signature 

Name 

Address _ 
City 



Exp. date. 



Interbank # 



State 



Zip. 



Please allow 4-6 weeks for delivery 



No C.O.D. orders accepted. 



Canada— S27. 97, 1 year only, US funds. 
Foreign Surface— S44. 97 1 year only, US funds. 
Foreign Air— Please inquire. 



^,A 



323B89 



NO POSTAGE 

NECESSARY 

IF MAILED 

IN THE 

UNITED STATES 



BUSINESS REPLY MAIL 

FIRST CLASS PERMIT NO. 30 DALTON MA 01226 



POSTAGE WILL BE PAID BY ADORESSEG 




microcomputing 



P. O. BOX 306 
DALTON, MA 01226 
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Please call 
(213)7060333 

Our Epson prices 
are so low, 
we're not allowed 

to print them. 
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EPSON MX-80 $CALL EPSON INTERFACES a OPTIONS 

60 cps/9x9 matrix/Lower case with trs-so vioof- i. mi cablf 
true descenders/Bi-directional & T Rss C model Ke/boaru i^rfaco 
Logic seek.ng/Adjustable tractor/ J^gSJSS^ r 
Expanded printing/Block graphics/ iZLl ^sinterf-ace 

Forms control/Compressed printing/ sfr al ti rfacl 

Double-strike printing/Correspon- 
dence quality/Emphasized printing 
mode/Standard parallel interface 

EPSON MX-80 F/T SCALL 

Same features as the MX-80 plus Fric- 
tioi i Feed. Adjustable removable trac- 
tor is standard for ease of handling 
forms and single sheets. 

EPSON MX-100 F/T SCALL 

Same features as the MX-80 & MX-80 
F/T but on 15'/2 inch carriage for print- 
ing 132 columns with standard 10 cpi 
font or 232 columns in the com- 
pressed character font. The MX-1 00 is 
complete with Dot Resolution 
Graphics 31245 LA BAYA DRIVE, WESTLAKE VILLAGE, CALIFORNIA 91362 




We built a reputation on our 
prices and your satisfaction. 

We guarantee everything we sel! for 30 days. II anything 
is wrong, just return the item and we* II make it right 
And. ol course, we'll pay the shipping charges. 

We accept Visa and Master Card on all orders. COD 
accepted up to $300.00. We also accept school pur- 
chase orders. 

Please add $2.00 for standard UPS shipping and 
handling on orders under 50 pounds, delivered in the 
continental U.S. Call us for shipping charges on items 
that weigh more than 50 pounds. Foreign, FP0 and AP0 
orders please add 15% for shipping. California res- 
idents add 6% sales lax. 



I 




Frustrating isn't it! No matter how 
much you speed up your program 
it still seems to take forever to save 
data onto a cassette. Wouldn't it 
be great if someone could design a 
mass storage system with the speed 
of a disk, but at half the cost? 
Exatron did, the Exatron Stringy 
Floppy (ESF) . 

Totally self-contained, the ESF 
is an extremely fast, reliable, and 
economical alternative to cassette 
or disk storage of programs or 
data. All of the ESF's operations 
.ire under the computer's control, 
with no buttons, switches, knobs or 
levers to adjust or forget. 

The ESF uses a miniature tape 
cartridge, about the size of a busi- 
ress card, called a wafer. The 
transport mechanism uses a direct 
drive motor with only one moving 
part. Designed to read and write 



digital data only, the ESF suffers 
from none of the drawbacks of 
cassettes - without the expense of 
disks. 

Several versions of the ESF are 
available, for the TRS-80, Apple, 
PET, OSI and an RS 232 unit 
Even .:he slowest of the units is 15 
times faster than a cassette, and all 
are as reliable as disli drives - in 
fact a lot of users say they are more 
i ;liable! 




excellence in electronics 

exatron 



To get further information about 
the ESF give Exatron a call on 
their Hot Line 800-538 8559 
(inside California 408-737 7111). 

If you can't wait any longer then 
take advantage of their 30 day 
money-back guarantee, you've 
nothing to lose but time! 

181 Commercial Street 
Sunnyvale, CA 94086 





TRS-8G, Apple and PET are tr.-demarks of Tandy, Apple and Commodore respectively. 



